Thema: Delphi Löschabfrage

Einzelnen Beitrag anzeigen

Benutzerbild von norbert3
norbert3

Registriert seit: 24. Mai 2006
Ort: Sachsen
65 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Löschabfrage

  Alt 24. Sep 2006, 17:08
Hey,
Delphi-Quellcode:
procedure TMainForm.Stundenlschen1Click(Sender: TObject);
begin
   with ABSQuery1 do
   begin
   sql.Text := 'Delete from tblBstAZ '
              +'WHERE Datum BETWEEN :von and :bis ';
    ParamByName('von').AsDateTime := StrToDateTime(InputBox('InputBox','Erstes Datum angeben!','Anfangswert'));
    ParamByName('bis').AsDateTime := StrToDateTime(InputBox('InputBox','Zweites Datum angeben!','Endwert'));
   open;
   end;
    MessageDlg('Daten gelöscht!', mtInformation,[mbOk], 0);
end;
Das Problem ist leider immer noch.

mfg Norbert
Norbert Springer
  Mit Zitat antworten Zitat