Einzelnen Beitrag anzeigen

Benutzerbild von yankee
yankee

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

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

  Alt 9. Mai 2004, 17:33
Also ich habe meinen Code abgeändert:
Delphi-Quellcode:
var ITitel, ILehrer, IVerlag, IBestellnr:string;
    IPreis: Double;
    IAnzahl: Integer;
begin
    ZQuery2.Active :=False; //Das
    ZQuery2.Close; //und das habe ich mal wegegelassen
    ITitel :=ZQuery2.fieldbyname('Titel').AsString; //Hier ist der Fehler
    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.Open;
    ZQuery2.Active :=True;
Fehlermeldung: ZQuery2: Field 'Titel' not found
Also es hat sich nichts verändert!
Und nochwas: Die Exception tritt wieder gaanz oben auf (siehe kommentierung)
Und das gibt es noch zwei Teile. Wenn ich die weglasse, löscht er den entsprechenden Eintrag, aber es gibt eine Adress Violation...
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