Zitat:
Delphi-Quellcode: markieren
procedure TForm1.Edit1Change(Sender: TObject);
begin
if Ansipos(DecimalSeparator, Edit1.Text) > 0
then Button1.Enabled := False
else Button1.Enabled := True;
end;
okay danke für den code, aber jetzt bräuchte ich nochmal ein bisschen erklärung:
Also procedur ist klar das soll das Edit Feld sein, Decimalseperator soll die Trennung der Dezimalzahl durch das Komma sein.
aber was hat das >0 am ende zu bedeuten :S
Zitat:
Zur Beantwortung deiner ersten Frage wirst du wohl
ein bisschen Quellcode zeigen müssen
Hab die Frage jetzt beantwortet gekriegt aber poste trotzdem auf Wunsch meinen Code
Danke an alle die mir geholfen haben
Die Welt des Programmierens öffnet sich nur denen, die sich die Zeit nehmen sich damit zu beschäftigen!