[DELPHI 5]String auf Zahlen überprüfen

Hi !

Wahrscheinlich stehe ich gerade tierisch auf dem Schlauch, aber mir fällt einfach nicht ein, wie man einen String auf Zahlen überprüft.

Hintergrund : Ich will verhindern, daß in ein Edit-Feld andere Zeichen außer 0 bis 9 eingegeben werden…

Danke im voraus

Daniel

Hi Daniel,

verwende das Ereignis TEdit.KeyDown.
Da bekommst Du den ASCII-Code des Zeichens, daß der Benutzer eingegeben hat. Wenn dieser zwischen 48 und 57 liegt ist es eine Ziffer, anssonsten mußt Du dem Code den Wert 0 zuweisen.

Manfred.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Guten Morgen Daniel!!

Also ganz einfach: in das OnKeyPress-Ereignis folgenden Code:

procedure TFChart.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if (key>=‚0‘) AND (key

Danke Euch ! (o.T.)
ohne Text