Tatsache. Sie sind ale 0, aber warum?
Die Getippten_Zahlen sind im 2.Durchgang alle 0. Dabei schreibe ich doch in die Procedure beim 1.Durchlauf:
Delphi-Quellcode:
for i:= 1 to 6 do
begin
Getippte_Zahlen[i]:=Lottozahlen[i];
TLabel(FindComponent('label'+inttostr(lottozahlen[i]))).Font.color:=clred;
TLabel(FindComponent('label'+inttostr(lottozahlen[i]))).Font.size:=18;
TLabel(FindComponent('label'+inttostr(lottozahlen[i]))).Top:=TLabel(FindComponent('label'+inttostr(lottozahlen[i]))).Top-2;
TLabel(FindComponent('label'+inttostr(lottozahlen[i]))).Left:=TLabel(FindComponent('label'+inttostr(lottozahlen[i]))).Left-2;
end;
Bin ich heute zu blöd dafür?
