If Anweisung

[jAcK oRsEn]

randomize;

...

if TabelleASpalteA = 0 then ShowMessage('blabla');
if TabelleASpalteA = 1 then random(zahl);