Danke schon mal für eure Antworten.
Zitat von
onkelmehli:
schon mal so versucht?
SQL.Add('SELECT * FROM Products, Discounts WHERE (Discounts.ProduktFKID = Products.PKID) AND (EAN = ''0123456789'')'); Ja, gleiche Fehlermeldung wie oben.
Zitat von
DeddyH:
Oder so?
Delphi-Quellcode:
procedure TDatenbank.DiscountExists(EAN:
string);
begin
if fConnection.Connected
then
with fQuery
do
begin
Close;
SQL.Clear;
SQL.Add('
SELECT [Products].*,[Discounts].* FROM [Products] ');
SQL.Add('
INNER JOIN [Discounts] ON [Discounts].ProduktFKID = [Products].PKID');
SQL.Add('
WHERE EAN = :EAN');
Parameters.ParamByName('
EAN').Value := EAN;
try
Open;
// fConnection.CommitTrans;
except
// fConnection.RollbackTrans;
end;
end;
end;
Neue Fehlermeldung:
Zitat:
---------------------------
Benachrichtigung über Debugger-
Exception
---------------------------
Im Projekt MeinProgramm.exe ist eine
Exception der Klasse EOleException mit der Meldung 'Für mindestens einen erforderlichen Parameter wurde kein Wert angegeben' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------
In EAN: string steht aber etwas drinn.
Wenn ich
Delphi-Quellcode:
SQL.Add('
WHERE EAN = 0123456789');
// oder
SQL.Add('
WHERE EAN = ''
0123456789''
');
schreibe kommt wieder die Fehlermeldung mit dem Standardwert von oben.