Einzelnen Beitrag anzeigen

Kunoishi

Registriert seit: 26. Dez 2002
Ort: Berlin
140 Beiträge
 
Delphi 5 Standard
 
#1

Zahleneingabe in Edit verhindern ?

  Alt 26. Jan 2010, 14:50
ich möchte verhindern, dass in meinem Editfeld Zahlen eingegeben werden.

dazu habe ich schon eine Prozedur (mit eurer Hilfe) worin in meinem Editfeld der erste Buchstabe grundsätzlich in Großbuchstaben geschrieben wird.
Dieses würde ich jetzt gerne erweitern, dass in diesem Editfeld eben keine Zahlen sondern nur Buchstaben eingetragen werden können

Delphi-Quellcode:
procedure TForm.EditTNameChange(Sender: TObject);
var s: string;
begin
  if Length(EditTName.Text)>0 Then
    begin
     s:= EditTName.Text;
     s[1] := AnsiUpperCase(s)[1];
     EditTName.Text:=s;
     EditTName.SelStart := Length(EditTName.Text);
   end;
end;
  Mit Zitat antworten Zitat