Új hozzászólás Aktív témák

• #800 g4dg3t senior tag Notes #790

  Új Válasz 2005-05-18 00:56:53 #800

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  g4dg3t

  senior tag

  válasz Notes #790 üzenetére

  A gond ott van hogy elobb hivatkozol a parameterekre es csak kesobb hozod oket letre. Mikor meghivod a ParamByName metodust az SQL stringnek mar tartalmaznia kell a lekerdezest a parameterhivatkozasokkal egyutt!
  
  Tehat helyesen:
  

  
  ...
  with Query1, SQL do begin
    Close;
    Clear;
    Add('SELECT *');
    Add('FROM TranzTabla');
    Add('WHERE (Datum>= :KezdDatum) AND (Datum<= :VegDatum)');
    if LekerdFelhComboBox.ItemIndex > 0 then
      Add('AND (Felhasznalo= :Felhaszn)');
    if LekerdPartnerComboBox.ItemIndex > 0 then
      Add('AND (Partner= :Partn)');
  
    ParamByName('Felhaszn').AsString:=LekerdFelhComboBox.Text;
    ParamByName('Partn').AsString:=LekerdPartnerComboBox.Text;
    ParamByName('KezdDatum').AsDate:=LekerdDatePicker1.Date;
    ParamByName('VegDatum').AsDate:=LekerdDatePicker2.Date;
  
    Prepare;
    Open;
  end;
  ...
  

  
  
  Lathatod azt is hogy mikor kell hivni a Prepare metodust (Open elott). Ez annyit csinal, hogy elore lefoglalja a Query futtatasahoz szukseges eroforrasokat igy a lekerdezes vmivel gyorsabban lefut!
  
  [Szerkesztve]
• #797 Robiba tag Notes #790

  Új Válasz 2005-05-17 23:37:15 #797

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Robiba

  tag

  válasz Notes #790 üzenetére

  Add ('AND (Felhasznalo= elhaszn)'); helyett
  Add ('AND (Felhasznalo='+QuotedStr(Felhaszn)+')');
  és ue. a Partn-nél is.
  
  Mivelhogy az SQL ott stringet vár.

Új hozzászólás Aktív témák