Hi,
hab mir deine
SQL-
Query mal angeguckt...
Sieht an sich ganz richtig aus...
Du kannst auch gerne Query1.SQL.Text verwenden. Query1.SQL ist ja auch nur eine TStringList und mit der kannst du umgehen, wie mit jeder anderen StringList auch.
Ich vermute den Fehler an einer anderen Stelle als bei
WHERE (Inventarnummern.Inventarnummer = "'+(nummer)+'")
.
Welchen Typ hat denn Inventarnummern.Geratetyp? Ist das Feld auch ein Integer?
Probiers mal so:
Delphi-Quellcode:
procedure TForm1.Button8Click(Sender: TObject);
var nummer: string;
begin
nummer:=Edit1.Text;
Query1.Active:=false;
Query1.SQL.Text := 'SELECT ' +
' inv.Inventarnummer, ' +
' typ.Typ, ' +
' raum.Raumnummer, ' +
' raum.Raumbezeichnung, ' +
' det.Modell, ' +
' det.Baujahr, ' +
' Inv.Status ' +
'FROM Inventarnummern inv ' +
' INNER JOIN Raume raum ON raum.id = inv.ID_Raum ' +
' INNER JOIN Geratetyp typ ON typ.id = inv.Geratetyp ' +
' LEFT JOIN Details det ON det.id = inv.ID_Details ' +
'WHERE inv.Inventarnummer = ' + QuotedStr(nummer);
Query1.Active:=true;
end;
also das Feld inventarnummern.geratetyp ist ein alphafeld
und leider kommt mit deinem Quellcode immer noch der typmismatch-blödsinn :'(
trotzdem danke lg