Einzelnen Beitrag anzeigen

andiak

Registriert seit: 1. Nov 2007
89 Beiträge
 
#11

Re: Allgemeine Fragen zu Delphi

  Alt 18. Nov 2007, 16:50
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i :integer;
begin
  i := StrToInt(Edit1.Text) ; //da eine zeichenkette zu einer zahl oder?
  i := i + 1 ;
  if i = 10 then
  begin
    Panel1.Caption'Zehnmal auf den Button geklickt!';
    i := 0;
    end
  else
    Panel1.Caption := '' ;
  Edit1.Text := IntToStr(i);
  end.
soo?
  Mit Zitat antworten Zitat