Einzelnen Beitrag anzeigen

Ati

Registriert seit: 16. Okt 2003
Ort: Gelsenkirchen
406 Beiträge
 
Delphi 3 Professional
 
#34

Re: Alle Edit-Felder auf Eingaben prüfen

  Alt 3. Jan 2006, 07:36
Hai Sharky,

nicht das Du denkst ich habe Deinen Tip unter dem Tisch fallen lassen. Hier mal meine Prüffunktion für das Datumsfeld:
Delphi-Quellcode:
function DateEditTest( const aDateEdit : TDateEdit): Boolean;
var dat:Tdate;
begin
  result:=true;
  try
   dat:= strtodate(aDateEdit.Text);
  except
   result:=false;
  end;
end;
Wenn man das eleganter lösen kann bitte ich um Korrektur!!!

Ati
Ich weiß das ich nichts weiß

Sokrates
  Mit Zitat antworten Zitat