Hi,
Ich will, das wenn man auf einen Knopf drückt, ein Zufallswert zwischen 1 und 6 in Edit1 eingefügt werden soll. Folgenden code habe ich:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
i:=random(5)+1;
Edit1.Text := inttostr(i);
end;
Das Problem ist: Das der Zufallswert erst angezeigt wird, wenn ich das 3. mal auf den Button klicke. Beim ersten und zweiten klick steht nur 1 in Edit1. Warum geht das nicht gleich beim ersten klick ?
MFG