Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Vor dem Setzen des Filters prüfen, ob DS vorhanden sind (https://www.delphipraxis.net/61199-vor-dem-setzen-des-filters-pruefen-ob-ds-vorhanden-sind.html)

torud 18. Jan 2006 09:18

Datenbank: Access • Zugriff über: Jet

Vor dem Setzen des Filters prüfen, ob DS vorhanden sind
 
Hallo Wissende,

ich habe einen Filter, den ich benutze, um in einer Access-Tabelle zu filtern. Nun möchte ich vor dem Setzen des Filters, welches bei einem Klick auf ein DB-Grid ausgelöst wird, sicherstellen, dass es auch einen Datensatz in dieser Tabelle gibt, denn wenn sie leer ist, erhalte ich nen Fehler...

Delphi-Quellcode:
    ADOTable3.Filtered:=false;
    ADOTable3.Filter:='BlaID='+QuotedStr(ADOTable2.FieldbyName('ID').AsString);
    ADOTable3.Filtered:=true;
Wie kann man so was machen???

torud 18. Jan 2006 09:21

Re: Vor dem Setzen des Filters prüfen, ob DS vorhanden sind
 
Ich habe es erstmal so gemacht

Delphi-Quellcode:
    if not(ADOTable2.FieldbyName('ID').AsString<>'') then exit;

marabu 18. Jan 2006 09:37

Re: Vor dem Setzen des Filters prüfen, ob DS vorhanden sind
 
Hi Tom,

die Eigenschaft RecordCount eines TADODataSet sollte 0 sein, wenn die Tabelle leer ist.

Freundliche Grüße vom marabu

dfried 18. Jan 2006 09:37

Re: Vor dem Setzen des Filters prüfen, ob DS vorhanden sind
 
Zitat:

Zitat von torud
Ich habe es erstmal so gemacht

Delphi-Quellcode:
    if not(ADOTable2.FieldbyName('ID').AsString<>'') then exit;

Nur so als Anmerkung, ich glaube:

Delphi-Quellcode:
    if ADOTable2.FieldbyName('ID').AsString = '' then exit;
wäre einfacher zu "lesen" als die doppelte Verneinung :-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:47 Uhr.

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