Also, ich bin ein totaler Anfänger von daher Entschuldigung wenn ich nicht alles hinbekomme, ich habe geschrieben, dass ich es versucht habe es aber nicht geklappt hat. Ich habe es bisher so gemacht, vllt ein bisschen unproffesionell aber ich bin ja noch ein Anfänger.
Delphi-Quellcode:
procedure TForm1.KommaClick(Sender: TObject);
begin
if Kom=0 then
sEdit1.Text:=sEdit1.Text+',';
Kom:=1;
end;
Ich hatte es bisher mit einer Variablen überprüfen lassen, allerdings kann ich jetzt einmal mit der Tastatur ein Komma setzen und einmal per Mausklick, das will ich verhindern.