Fahrzeughersteller Auswählen und die dazu gehörigen Modelle Filtern ... aber WIE?

[sammynrw]

Zitat von sammynrw:

Zitat von Darlo:

Zitat von sammynrw:

Diese Variante habe ich ausprobiert ... da bekomme ich aber einen syntax fehler ....

MyQuery4.FilterSQL := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

MyQuery4.SQL.Text:= 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

ich probiere das mal aus

Jetzt wird die DBLookupComboBox Deaktiviert .... keine Auswahl mehr vorhanden

[Captnemo]

Zitat von sammynrw:

Diese Variante habe ich ausprobiert ... da bekomme ich aber einen syntax fehler ....

MyQuery4.FilterSQL := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

Bin jetzt nicht sicher, aber ich nehme mal an, dass bei MyDAC FilterSQL bedeutet, dass in der Ergebnismenge der SQL-Abfrage gefiltert werden soll.

Statt MyQuery4.FilterSQL nimm MyQuery4.SQL.Text. Dann bekommst du in der Ergebnismenge auch nur das zurück, was du benötigst und die Filterung übernimmt richtigerweise der SQL-Server.

[Captnemo]

Zitat von sammynrw:

Zitat von sammynrw:

Zitat von Darlo:

Zitat von sammynrw:

Diese Variante habe ich ausprobiert ... da bekomme ich aber einen syntax fehler ....

MyQuery4.FilterSQL := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

MyQuery4.SQL.Text:= 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

ich probiere das mal aus

Jetzt wird die DBLookupComboBox Deaktiviert .... keine Auswahl mehr vorhanden

Wie wär's mal mit mehr Code-Zeilen? Was du überhaupt so machst.

[sammynrw]

Ich möchte bei Auswählen des Hersteller in der 2. DBLookupcombobox die Modelle angezeigt bekommen.

Delphi-Quellcode:

procedure TForm1.DBLookupComboBox2CloseUp(Sender: TObject);
begin

MyQuery4.SQL.Text := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

end;

I

[Captnemo]

Zitat von sammynrw:

Ich möchte bei Auswählen des Hersteller in der 2. DBLookupcombobox die Modelle angezeigt bekommen.

Delphi-Quellcode:

procedure TForm1.DBLookupComboBox2CloseUp(Sender: TObject);
begin

MyQuery4.SQL.Text := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

end;

I

Du musst natürlich das Query auch auch active setzen

Delphi-Quellcode:

procedure TForm1.DBLookupComboBox2CloseUp(Sender: TObject);
begin

MyQuery4.SQL.Text := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';
MyQuery4.active := True;  

end;

[Darlo]

Wie wäre es wenn Du das "Select" auch ausführst

[Darlo]

@ Captnemo:
Da wir eh zur selben Zeit inhaltlich das selbe schreiben darfst Du jetzt übernehmen

[sammynrw]

Zitat von Captnemo:

Zitat von sammynrw:

Ich möchte bei Auswählen des Hersteller in der 2. DBLookupcombobox die Modelle angezeigt bekommen.

Delphi-Quellcode:

procedure TForm1.DBLookupComboBox2CloseUp(Sender: TObject);
begin

MyQuery4.SQL.Text := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';

end;

I

Du musst natürlich das Query auch auch active setzen

Delphi-Quellcode:

procedure TForm1.DBLookupComboBox2CloseUp(Sender: TObject);
begin

MyQuery4.SQL.Text := 'SELECT * FROM fahrzeug_modelle WHERE marken_id = 140';
MyQuery4.active := True;  

end;

OOOOHHHHH MAAANNNNNN .... das warst die ganze zeit .... Vielen dank für deine hilfe

[Captnemo]

Zitat von Darlo:

@ Captnemo:
Da wir eh zur selben Zeit inhaltlich das selbe schreiben darfst Du jetzt übernehmen

Sorry

[Darlo]

Zitat von sammynrw:

OOOOHHHHH MAAANNNNNN .... das warst die ganze zeit .... Vielen dank für deine hilfe

Nicht ganz, FilterSql war auch nicht optimal