TEdit als SQL - Ausgabe

Nalibur · Hält's aus hier Beiträge: 8 WinXP D5

Hallo,
ich habe folgendes Problem:
Ich möchte in einem TEdit-Feld ein AutoVervollständigen realisieren.
Ich weiss auch, das es einen solchen Thread schon gibt. Leider habe ich dazu eine andere Frage.
Folgenden Code habe ich in dem OnChange des TEdit

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.Edit1Change(Sender: TObject);
var t :  string;
begin
   t := Edit1.Text + '%';
   Query1.Close;
   Query1.SQL.Clear;
   Query1.SQL.Add('SELECT Autor FROM test.db WHERE Autor LIKE "'+t+'" ');
   Query1.Active := True;

Zur Zeit erfolgt die Ausgabe der gefilterten Felder über ein DBGrid.
Die Ausgabe soll aber in dem TEdit.Text erfolgen. Geht da überhaupt und wenn ja...Wie???

Mario

Moderiert von UGrohne: Delphi-Tags eingefügt

UGrohne · Verfasst: So 07.09.03 14:10

Grid-Ausgabe in eine Edit? Naja....
Versuchs mal mit ner ComboBox, in der Du nach jeder Abfrage die ganzen Datensätze in die Items reinschreibst und dann das Feld aufpoppen lässt (da weiß ich aber gerade nicht, wie man das macht), oder eben ohne das poppen :wink:

Nalibur · Hält's aus hier Beiträge: 8 WinXP D5

Natürlich soll die Grid-Ausgabe nicht in ein Edit-Feld. Da ich derzeit nicht weiß wie man es richtig macht, erfolgt die Kontrolle der Ausgabe über ein DBGrid.
Ich möchte das Ergebnis einer SQL-Abfrage (s.o.) in einem TEdit-Feld ausgeben. Bei der Ausgabe handelt es sich immer nur um einen einzelnen String pro Edit-Feld.
Ich hoffe das war jetzt eindeutiger.

Mario

UGrohne · Verfasst: So 07.09.03 17:41

Sorry, aber ich versteh Dein Problem immer noch nicht. Wenn Du einen Datensatz-Wert in ein Edit schreiben willst, dann kannst Du doch einfach die Text-Eigenschaft des Edits ändern und ihm z.B. Query1.FieldByName('Name')AsString zuweisen.
:?:

Nalibur · Hält's aus hier Beiträge: 8 WinXP D5

Und genau darauf bin ich nicht gekommen.
Danke. Klappt so wie ich es wollte.

Mario

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme