Einzelnen Beitrag anzeigen

Benutzerbild von yankee
yankee

Registriert seit: 10. Mär 2004
1.134 Beiträge
 
Lazarus
 
#12

Re: [mySQL]: Fehler in der Abfrage, aber wo?

  Alt 9. Mai 2004, 19:11
So funzt es:
Delphi-Quellcode:
var ITitel, ILehrer, IVerlag, IBestellnr:string;
    IPreis: Double;
    IAnzahl: Integer;
begin
    ITitel :=ZQuery2.fieldbyname('Titel').AsString;
    IAnzahl :=ZQuery2.fieldbyname('Anzahl').AsInteger;
    ILehrer :=ZQuery2.fieldbyname('Lehrer').AsString;
    IVerlag :=ZQuery2.fieldbyname('Verlag').AsString;
    IBestellnr :=ZQuery2.fieldbyname('Bestellnr').AsString;
    IPreis :=ZQuery2.fieldbyname('Preis').AsFloat;

    ZQuery2.SQL.Text :='DELETE FROM `bestellungen` WHERE `Titel` = :ITitel AND `Anzahl` =:IAnzahl AND `Lehrer` =:ILehrer AND `Verlag` =:IVerlag AND `Bestellnr` =:IBestellnr AND CONCAT( `Preis` ) =:IPreis LIMIT 1';
    ZQuery2.ParamByName('ITitel').Value :=ITitel;
    ZQuery2.ParamByName('IAnzahl').Value :=IAnzahl;
    ZQuery2.ParamByName('ILehrer').Value :=ILehrer;
    ZQuery2.ParamByName('IVerlag').Value :=IVerlag;
    ZQuery2.ParamByName('IBestellnr').Value :=IBestellnr;
    ZQuery2.ParamByName('IPreis').Value :=IPreis;
    ZQuery2.ExecSQL;
    LoadAlreadyOrdered;
Die Procedure LoadAlreadyOrdered läd einfach das DBGrid neu. Thx für eure Hilfe!!
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.

Have a lot of fun!
  Mit Zitat antworten Zitat