Thema: Delphi DateTimePicker

Einzelnen Beitrag anzeigen

Luca Haas

Registriert seit: 23. Aug 2017
Ort: Bad Breisig
139 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#4

AW: DateTimePicker

  Alt 25. Sep 2017, 11:03
Okay ich versuche das ganze jetzt so:
Delphi-Quellcode:
procedure TForm1.DateTimePicker3Change(Sender: TObject);
begin
  if CheckBox1.Checked = True then
    KST_LagerbewertungQuery.SQL := ('SELECT * FROM KST_Lagerbewertung' +
      'WHERE ''SollGeliefert'' BETWEEN DateTimePicker3 AND DateTimePicker4')
  else
    KST_LagerbewertungQuery.SQL := ('SELECT * FROM KST_Lagerbewertung' +
      'WHERE ''IstGeliefert'' BETWEEN DateTimePicker3 AND DateTimePicker4')
end;

procedure TForm1.DateTimePicker4Change(Sender: TObject);
begin
  if CheckBox1.Checked = True then
    KST_LagerbewertungQuery.SQL := ('SELECT * FROM KST_Lagerbewertung' +
      'WHERE ''SollGeliefert'' BETWEEN DateTimePicker3 AND DateTimePicker4')
  else
    KST_LagerbewertungQuery.SQL := ('SELECT * FROM KST_Lagerbewertung' +
      'WHERE ''IstGeliefert'' BETWEEN DateTimePicker3 AND DateTimePicker4')
end;
aber ich bekomme die Fehlermeldung
Code:
[dcc32 Fehler] Unit1.pas(161): E2010 Inkompatible Typen: 'TStrings' und 'string'
in den Zeilen mit else und end;

Geändert von Luca Haas (25. Sep 2017 um 11:12 Uhr)
  Mit Zitat antworten Zitat