Hallo
Ich als Anfänger stoße wieder einmal an meine Grenzen
Folgendes Problem:
Ich mache immer noch an meinem Taschenrechner rum. Beim ausprobieren habe ich nun folgendes entdeckt. Der Benutzer kann über den Button "Komma" ein Komma in das Editfeld klicken, auch wenn dieses noch keine Zahlen enthält.
Wie kann ich überprüfen, ob ein Edit schon einen Eintrag,bzw schon ein Komma hat? Momentan hab ich ja nur abgefangen, dass er nicht mehrere Kommata eingeben kann und zwar so:
Delphi-Quellcode:
procedure TForm1.Button_kommaClick(Sender: TObject);
begin
if (KommaCount < 1) then
begin
Edit1.Text := Edit1.Text+',';
inc(KommaCount);
end
else
begin
ShowMessage('Wieviel Kommata willst du denn noch eingeben?');
end;
end;
Denn ein weiteres Problem besteht darin, wenn ich z.b. solch eine Rechnung ausführe:
1,1 + 4 > denn hier wir "KommaCount" durch den Plus-Button auf 0 gesetzt und ich könnte dann bei dem Ergebnis von 5,1 nochmalig ein Komma setzten.
Gruß Tobias
