Forum: Software-Projekte der Mitglieder
by leddl,
22. Mai 2007
Naja, hättest du dir den Code mal kurz angeschaut, anstatt einfach nur die Fehlermeldung zu kopieren, hättest du das Problem aller Wahrscheinlichkeit sehr schnell gelöst gehabt :zwinker: Problem ist die eine oder andere fehlende Klammer ;)
Naja, man sollte eben auch mehr machen als nur Copy&Paste :stupid:
Ne angepasste Variante:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key:...
Forum: Software-Projekte der Mitglieder
by leddl,
22. Mai 2007
Zum einen wird das so nicht funktionieren :stupid: und zum anderen ist eine Reaktion im OnKeyPress deutlich besser. Es ist nämlich äußerst nervig, ständig ne Fehlermeldung wegen Falscheingabe zu bekommen. Dann doch besser einfach nur Eingaben erlauben, die auch tatsächlich Sinn machen
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if (not key in ) or
(key = ','...