Deutsches Lazarusforum

Hallo Chris, im Form ein EditFeld defieren (Name zB edCounter), dann edCounter Text 0 zuweisen und Event OnKeyPress verwenden:   procedure TForm1.edCounterKeyPress(Sender: TObject; var Key: char); begin Key := #0; edCounter.Text := IntToStr(StrToInt(edCounter.Text) + 1); end;...

Moin Moin, kurze Vorstellung als Lazarus Neueinsteiger. Ich bin seit 30 Jahre Hobbyprogrammierer - angefangen Mitte der 80er mit Turbo Pascal unter CP/M hin zu Delphi XE3 unter Windows. Habe aber auch verschiedene andere Sprachen, wie C++, Java und Visual Basic gelernt. Für Desktop Anwendungen habe ...