Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Werte prüfen (https://www.delphipraxis.net/9291-werte-pruefen.html)

krügi 23. Sep 2003 11:46


Werte prüfen
 
Hi!!

Brauche dringend Hilfe! Wie kann ich, nach Eingabe einer Serien-Nummer in Textfeld, herausfinden, ob der Wert in meiner TQuery schon existiert?

Dax 23. Sep 2003 12:05

Re: Werte prüfen
 
Warum holst du dir nicht den String des Wertes und kuckst, ob er in (ich nenn die query mal "q") q.text existiert(mit pos)?

krügi 23. Sep 2003 12:40

Re: Werte prüfen
 
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

MrSpock 23. Sep 2003 13:04

Re: Werte prüfen
 
Hallo Krügi,

du fragst ja in der Query explizit nach dem Wert, den du hinterher überprüfst. Deshalb wäre es einfache mit RecordCout zu überprüfen, ob mindestens ein Datensatz gefunden wurde, der die Bedingung erfüllt. Ansonsten, wenn du nach dem Inhalt anderer Felder suchen willst, wäre die Methode Locate geeignet.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:28 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz