Delphi Fehlermeldung - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

Fehlermeldung

Ein Thema von Raffy · begonnen am 28. Jul 2004 · letzter Beitrag vom 28. Jul 2004

Antwort

Grumble

Registriert seit: 19. Mär 2003
Ort: Dresden
203 Beiträge

Delphi 6 Enterprise

Re: Fehlermeldung

28. Jul 2004, 08:55

markieren

Code:

			procedure Tll.Button7Click(Sender: TObject); 

begin 

edit_eingabe.Text := edit_eingabe.text+'9'; 

end;

ich glaub das is dein code fuer den druck auf 9

du muesstest jetzt eigentlch bei jeder zahlentaste abfragen ob der edit_eingabe.text nur 0 ist und wenn ja den loeschen, also

markieren

Code:

			procedure Tll.Button7Click(Sender: TObject); 

begin 

if edit_eingabe.text='0' then edit_eingabe.text:='';

edit_eingabe.Text := edit_eingabe.text+'9'; 

end;

gruss
grumble