Hallo,
erstens solltest du das Randomize ins OnCreate der Form tun:
Delphi-Quellcode:
procedure Tfrmgrundrechenarten.OnCreate(Sender: TObject);
begin
//Randomize nur einmal aufrufen - am besten hier im OnCreate der Form
randomize;
end;
Was ich auch nicht versteh ist, wieso du
Delphi-Quellcode:
x1 := random(9999);
x2 := random(6666);
so oft aufrufst.
Kann es sein dass
Operatorzeichen auch mal ein anderes Zeichen ausgeben kann, ausser +, -, /, *?
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<