![]() |
Re: Sql Tabelle nacht Datum sortiren / Filtern
Noch ein kleiner Tipp.
Wenn Du das Datum nicht mit Parametern an die Abfrage übergibst sondern versuchst dies mit DateToStr zu machen musst Du daran denken das der mySQL alle Datumsangaben in diesem Format möchte : yyyy-mm-dd. |
Re: Sql Tabelle nacht Datum sortiren / Filtern
also die datumsangaben kommen von einem TdateTimePicker...
wie kann ich die auf :start :ende zuweisen? gruss Silicium |
Re: Sql Tabelle nacht Datum sortiren / Filtern
Statt start_datum und end_datum in Sharkys Beispiel oben einfach DateTimePickerStart.Date bzw DateTimePickerEnde.Date.
|
Re: Sql Tabelle nacht Datum sortiren / Filtern
:wall:
Mein Code hatte einige Fehler :oops:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin with query do begin SQL.Text := 'SELECT * FROM tabelle ' + #10 + 'WHERE (datumsfeld BETWEEN :start AND :ende)'; ParamCheck := True; ParamByName('start').AsDateTime := DateTimePicker1.Date; // DTP 1 für start ParamByName('ende').AsDateTime := DateTimePicker2.Date; Open; end; end; |
Re: Sql Tabelle nacht Datum sortiren / Filtern
cool danke :)
ez muss ich das nurnoch in einen MyCommand packen, ma probieren :) thx |
Re: Sql Tabelle nacht Datum sortiren / Filtern
toll :D
2 fragen: 1. kann mir jemand bei dem codeschnpsel helfen:
Delphi-Quellcode:
procedure TForm1.filter_von_timeChange(Sender: TObject);
var von, bis : tdatetimepicker; begin von := (filter_von_time); bis := (filter_bis_time); mycommand2.SQL.Text := 'SELECT * FROM t_pd_spesendetail ' + #10 + 'WHERE (DAT_datum BETWEEN von AND bis)'; //das VON und BIS sollte definiert werden, wie mach ich das? mycommand2.Execute(); end; 2. und wie kriege ich das ganze jetzt in eine wwDBgrid? gruss |
Re: Sql Tabelle nacht Datum sortiren / Filtern
es funktioniert nun :D
hier der Code:
Delphi-Quellcode:
danke euch allen für die hilfe
procedure TForm1.check_filterClick(Sender: TObject);
{********************* **Variablendefinition* *********************} var von, bis : string; begin {************************************** **Wenn checkbox filter aktiv markiert** **************************************} if check_filter.checked then {********************* **VariablenZuweisung** *********************} von := DateToStr(filter_von_time.Date); bis := DateToStr(filter_bis_time.Date); {********************* *** MySQL Kommando *** *********************} mycommand2.SQL.Text := 'SELECT * FROM t_pd_spesendetail ' + #10 + 'WHERE (DAT_datum BETWEEN '+von+' AND '+bis+')'; edit3.text := mycommand2.SQL.Text; mycommand2.Execute(); end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:56 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz