Thema: Delphi Werte prüfen

Einzelnen Beitrag anzeigen

krügi

Registriert seit: 11. Sep 2003
16 Beiträge
 
#3

Re: Werte prüfen

  Alt 23. Sep 2003, 12:40
Hi!

Danke für den Tip! Habe in der Zeit mit SELECT gefiltert und frage, ob Wert vorhanden.

begin
with DM_LPSN.LP do
begin
Close;
SQL.Clear;
SQL.Add('SELECT * FROM T_LP WHERE LPSN = '+ txtLPSN.Text);
Open;
end;
if (DM_LPSN.LPLPSN).AsString = txtLPSN.Text then
begin
MessageDlg('Leiterplatte mit LPSN '+ txtLPSN.Text +' ist bereits vorhanden.
end;

Scheint zu klappen! Weiß auch nich, warum mir das vorhin nicht eingefallen ist. Trotzdem Danke Bis bald....
krügi
  Mit Zitat antworten Zitat