DBEdit Feld überprüfen

[delphientwickler]

Wie kann ich ein DBEdit Feld überprüfen, ob ein Wert drin ist. Die einfache Methode kenne ich aber die ist mit einem Leerschritt im Feld übergangen. DBEdit23.Text=''.

Aber wie kann ich es machen, das es nicht so einfach geht, das er weitermacht wenn ein leerschritt eingegeben wurde.

vielen dank

[Wolfgang Heberger]

Wenn ich recht verstehe, soll verhindert werden, dass der Anwender das Feld DBEdit23 ohne eine Eingabe übergehen kann.

Dies kann durch Aufruf des OnExit-Ereignisses von DBEdit23 verhindert werden.

<PRE>
procedure TForm1.DBEdit23Exit(Sender: TObject);
begin
if DBEdit23.Text = '' then
begin
MessageDlg('Eingabe erforderlich', mtError, [mbOk], 0);
DBEdit23.SetFocus;
end;
end;
</PRE>

Wechselt der Anwender zu einem anderen Feld, wird das OnExit-Ereignis von DBEdit23 aufgerufen. Wurde nichts eingegeben, dann verhindert die Anweisung DBEdit23.SetFocus, dass ein anderes Feld (Control) den Fokus erhält.

Viele Grüße
W. Heberge