Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i :integer;
begin
i := StrToInt(Edit1.Text) ; //Warum wird denn i hier der Inhalt von Edit1 zugeteilt?
i := i + 1 ;
if i = 10 then
begin
Panel1.Caption := 'Zehnmal auf den Button geklickt!';
i := 0;
end
else
Panel1.Caption := '' ; //Achtung! Sollen BEIDE folgenden Befehle ausgeführt werden? Wenn ja dann mit begin und end umschließen!
Edit1.Text := IntToStr(i);
end;
(Einrückungen nach meiner Schreibweise korrigiert)
Anfangs dachte ich, dass Edit1 immer mitzählt wie oft man geklickt hat, aber mittlerweile bin ich verwirrt...
Was ist denn jetzt beabsichtigt???