Einzelnen Beitrag anzeigen

der_karlheinz

Registriert seit: 13. Sep 2007
10 Beiträge
 
#17

Re: Zugriff auf Access DB sehr langsam

  Alt 19. Sep 2007, 07:22
So, ich versuche jetzt die Datensätze im DBGird zu Filtern,

wenn ich folgendes Versuche (Die Variablen filter_von und filter_bis sind als TDateTime Global definiert)

Delphi-Quellcode:
procedure TTabelle.B_Filter_updateClick(Sender: TObject);
var
Datumsformat: TFormatSettings;
von: String;
bis: String;
begin
  Datumsformat.DateSeparator:='-';
  Datumsformat.ShortDateFormat:='yyyy-dd-mm';
  Datumsformat.TimeSeparator:=':';
  Datumsformat.ShortTimeFormat:='HH:mm:ss';

  von:= (E_von_jahr.Text + ('-') + E_von_monat.Text + ('-') + E_von_tag.Text);
  bis:= (E_bis_jahr.Text + ('-') + E_bis_monat.Text + ('-') + E_bis_tag.Text);
  filter_von:=(StrToDateDef(von, -10, Datumsformat) + StrToTimeDef('00:00:00', -10, Datumsformat));
  filter_bis:=(StrToDateDef(bis, -10, Datumsformat) + StrToTimeDef('23:59:00', -10, Datumsformat));

  Edit1.Text:=datetostr(filter_von);
  Edit2.Text:=datetostr(filter_bis);

  DataModule1.ADOQuery_DBGird.Close;
  DataModule1.ADOQuery_DBGird.SQL.Text := 'SELECT * FROM tabelle WHERE Date BETWEEN filter_von AND filter_bis';
  DataModule1.ADOQuery_DBGird.Open;


end;
bekomme ich beim Ausführen die Fehlermeldung "filter_von" hat keinen Standartwert.

Woran kann das liegen???
  Mit Zitat antworten Zitat