Datenbank Tabelle ID-Veknüpfung

[mkinzler]

Zitat von Blup:

Zitat von mkinzler:

Oder eine LookUp-Komponente verwenden

Oberfläche direkt mit Datenbankkomponenten verbinden
Pfui!

So grundsätzlich würde ich das nicht ablehnen.

[thiagojonas]

Zitat:

SELECT Faecher.Name
FROM Lehrer
JOIN Lehrer2Faecher ON Lehrer2Faecher.LehrerId = Lehrer.ID
JOIN Faecher ON Faecher.ID = Lehrer2Faecher.FaecherID
WHERE Lehrer.Name = 'Müller'

Erhalte hierbei eine Fehlermdeldung:

Zitat:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt Valho_Student.exe ist eine Exception der Klasse EOleException mit der Meldung 'Syntaxfehler in FROM-Klausel' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------

[thiagojonas]

Also hiernochma mein Quelltext:

 ADOQuery1.SQL.Text := 'SELECT `Fach.Name` FROM `Lehrkraft` JOIN LehrerFach ON LehrerFach.Lehrer_ID = Lehrer_ID JOIN `Fach` ON `Fach.Fach_ID` = `LehrerFach.Fach_ID` WHERE `Lehrkraft.Name` = ''' + Fach_cb.Text + ''';';

[DeddyH]

Delphi-Quellcode:

ADOQuery1.SQL.Text := 'SELECT Fach.Name FROM Lehrkraft JOIN LehrerFach ON LehrerFach.Lehrer_ID = Lehrkraft.Lehrer_ID JOIN Fach ON Fach.Fach_ID = LehrerFach.Fach_ID WHERE Lehrkraft.Name = :name';
ADOQuery1.Parameters.ParamByName('name').Value := Fach_cb.Text;

[thiagojonas]

Hmm... die Fehlermeldung bleint die selbe.

Hier mein ganzer QuelCode:

Delphi-Quellcode:

procedure Tfach.FormShow(Sender: TObject);
begin
  LoadFach;
end;

procedure Tfach.LoadFach;
begin
  ///////////////////////////////////////////////////////////////////////////
  ///  DB Vorlage öffnen
  ADOQuery1.SQL.Text := 'SELECT Fach.Name FROM Lehrkraft JOIN LehrerFach ON LehrerFach.Lehrer_ID = Lehrkraft.Lehrer_ID JOIN Fach ON Fach.Fach_ID = LehrerFach.Fach_ID WHERE Lehrkraft.Name = :name';
  ADOQuery1.Parameters.ParamByName('name').Value := Fach_cb.Text;
  ADOQuery1.Open;
  ///////////////////////////////////////////////////////////////////////////
  ///  Combobox leeren
  fach_cb.Clear;
  ///////////////////////////////////////////////////////////////////////////
  ///  
  while not ADOQuery1.EOF do
    begin
     fach_cb.Items.Add(ADOQuery1.FieldByName('Fach').Value);
     ADOQuery1.Next;
    end;
end;

[DeddyH]

Evtl. fehlen da Klammern, Access hat doch AFAIK so eine kranke Syntax. Lass Dir das Statement doch einmal von Access selbst erstellen.

[thiagojonas]

Wie kann ich das machen?

[DeddyH]

Da gibt es doch soweit mir bekannt ist einen Abfragegenerator.

[hoika]

Hallo,

wo wird denn diese Fach_cb gefüllt ?
Du benutzt sie ja als Parameter schon in FormShow.
Pack den Aufruf doch mal in ein OnButtonClick zum Test.

Benutz mal F5/F7/F8.


Heiko

[thiagojonas]

Den Test habe ich auch schon gemacht. Daran liegt es nicht.