Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#2

Re: Einer SQL Abfrage eine zusätzliche Bedingung hinzufügen

  Alt 15. Jan 2008, 18:09
Verwende doch 2 Abfragen, je nachdem, ob mit User oder ohne.
Wenn du nur eine Abfrage möchtest, dann kannst du die Abfrage auch dynamisch zur Laufzeit ändern:
Delphi-Quellcode:
if mitUser then
begin
   Query1.SQL.Lines[13] := 'AND ((Device_User.UserID = :UserIDIncorporateAccessRights AND Device_User.Access = True)';
   Query1.Parameters.ParamValues['UserIDIncorporateAccessRights'] := ... ; // muss der Parametername wirklich so heissen ?
end
else
   Query1.SQL.Lines[13] := '';
Zur Entwurfszeit muss nachtürlich am Ende des SQL-Properties mindestens ein Leerzeile vorhanden sein.
Andreas
  Mit Zitat antworten Zitat