Radoviny.net

V PHP se celkem často namísto konstrukce:
if ($i % 2 == 0) {
$class = „even“
} else {
$class = „odd“;
}
dá použít jednořádkové řešení za pomoci ternárního operátoru:
$class = ($i % 2)?“odd“:“even“;
V Delphi bohužel tento jednořádkový zápis zapsat nelze. Operátor „?“ zde prostě není. Jedno jednořádkové řešení zde ale přece jen existuje.
varClass := ifThen((cislo mod 2) = [...]

Několik dní zpět jsem se v Delphi zaobíral jedním problémem a narazil při tom na potřebu ověřit, zda určitá část kódu nealokuje při pakovaném běhu stále více paměti. Jistě hned namítnete, že to je přece vidět v TaskMangeru. Souhlasím, ale proč si to nevypsat hned do programu a nemuset se tak přepínat do jiného okna?!
Celkem [...]