Zitat von
omata:
Delphi-Quellcode:
if Form2.Label2.Caption = '' then
Form2.Label2.Caption := frkt
else if Form2.Label3.Caption = '' then
Form2.Label3.Caption := frkt
else
Form2.Label4.Caption := frkt;
Man sollte dann noch die Variable Form2 weglassen. Das spart nicht nur Schreibarbeit.