Einzelnen Beitrag anzeigen

Benutzerbild von Leuselator
Leuselator

Registriert seit: 18. Mär 2003
Ort: Berlin
589 Beiträge
 
Delphi 8 Architect
 
#2

Re: Mehrere Werte in einen Query-Parameter reinkriegen

  Alt 16. Apr 2004, 12:49
je nach dem, welche DB Du verwendest (welche verwendest Du?), kannst Du "IN" benutzen und in etwa folgendes tun:

abfrage um Bedingung erweitern:
WHERE idFeld in (:IdListe) im Code dann:
Delphi-Quellcode:
var
  ParaString : String;
begin
  Query1.Close;
  Query1.ParamByName('Tabellenname').Value := Tabellenname; //nur 1 Wert
  Query1.ParamByName('Feldbezeichnung').Value := Feldbezeichnung; //nur 1 Wert
  ParaString := '';
  For i:= 0 to (RLSDetailNr.Count-1) do begin
    ParaString := ParaString+RLSDetailNr.Strings[i];
    if i < RLSDetailNr.Count-1
      then ParaString := ParaString+','
  end;
  Query1.ParamByName('IdListe').AsString := ParaString;
  Query1.Open;
end;
Das ganze soll ein Ansatz sein (nicht getestet)
Gruß
Tim Leuschner
Programmierer = moderner Sysiphos: stets wenn er meint, den Stein seiner Dummheit auf den Berg des Wissens gewuchtet zu haben, erblickt er einen völlig neuen Aspekt und der Dummfels poltert mit Getöse zurück ins Tal der Unwissenheit...
  Mit Zitat antworten Zitat