Datenbankeinträge durch einen listbox-klick anzeigen lassen

[mkinzler]

http://www.delphi-treff.de/tutorials...ittene/page/6/

[DeddyH]

Du brauchst keine TTable, die TQuery übernimmt die Aufgabe komplett. Du musst diese also statt der Table als Dataset angeben, dann funktioniert das auch.

[Ouou]

Zitat:

Du brauchst keine TTable, die TQuery übernimmt die Aufgabe komplett. Du musst diese also statt der Table als Dataset angeben, dann funktioniert das auch.

hab jetzt die TTable entfernt. Kann aber bei Dataset nichts zuweissen...?

[DeddyH]

Du hast doch eine Datasource, oder? Da stand vorher als Dataset die TTable drin, da muss nun die TQuery rein.

[Ouou]

ja genau aber jetzt kann ich nichts mehr auswählen bei dataset. es gibt keine möglichkeit. das feld ist leer

[Ouou]

ok jetzt hab ich es. jetzt steht query innen...

[Ouou]

Delphi-Quellcode:

Query1.Close;
    Query1.SQL.Text := 'SELECT Programmierer FROM KFZ.DB WHERE Programmierer = :Programmierer';
    Query1.ParamByName('Programmierer').Value := ListBox1.Items[ListBox1.ItemIndex];
    Query1.Open;

hab des jetzt mal so gemacht. bei jedem klick auf einen eintrag der listbox kommt bei mir aber eine debugger-exception. (Das Feld Kurzbeschreibung wurde nicht gefunden.)Obwohl es vorhanden ist.

[DeddyH]

Du fragst das Feld ja auch gar nicht ab.

Delphi-Quellcode:

Query1.Close;
    Query1.SQL.Text := 'SELECT Programmierer, Kurzbezeichnung FROM KFZ.DB WHERE Programmierer = :Programmierer';
    Query1.ParamByName('Programmierer').Value := ListBox1.Items[ListBox1.ItemIndex];
    Query1.Open;

[Ouou]

ahh . ja ok hab jetzt alle felder abgefragt und es kommt keine meldung mehr. bei der TQuery muss die Eigenschaft active auf true sein beim kompilieren oder? weil wenn ich sie auf true setzten will kommt ein fehler mit: Quer1: Keine SQL-Anweisung verfügbar.

[DeddyH]

Du kannst Active zur Designtime nur dann true setzen, wenn Du in der SQL-Eigenschaft auch valides SQL eingetragen hast. Aber durch das "Open" zur Laufzeit erzielst Du denselben Effekt.