Daten aus einem MySQL Server in Editfeld ausgeben

[Ykcim]

Hallo zusammen,

ich bekomme es einfach nicht gebacken... :kotz:

Ich habe noch nie mit TQuerys gearbeitet. Meine Verbindung zu MySQL ist auch ohne Komponenten, sondern mit der mysql.pas und der libmySQL.dll... (keine Ahnung, ob das wichtig ist)

Ich habe jetzt die unterschiedlichsten Versuche gemacht, das Problem, dass ich auf eine select-Abfrage einen Wert zurückbekomme und diesen in ein Edit-Feld schreiben lassen möchte. Wie schon iben erwähnt, ein StringGrid bekomme ich mit FillGrid befüllt.

Das habe ich als letztes ausprobiert:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  query1.SQL.Add('select Disponent from auftrag where FA_NR=100001');
  query1.Open;
  test.Text:=query1.fieldbyname('Disponent').asstring;
end;

Dabei ist 'Disponent' der Spaltenname des einzelnen Wertes, den ich in das Edit-Feld schreiben lassen möchte.

ABer wenn ich das Programm dann ausführe, bekomme ich folgende Fehlermeldung:
"Unknown Database. ALias: NedCom'.

Ich hatte den Name meiner MySQL Datenbank im TQuery unter Databasename eingetragen (NedCom).

Das kann doch alles nicht so schwer sein... :wall:

Ich verzweifel langsam - seit fast drei Wochen schlage ich mich mit diesem Problem herum, daher wäre ich für eine Erklärung für große DUMMIES sehr froh!

Vielen Dank im Voraus

[Mackhack]

Hi,

hier siehst du wie man es loesen koennte mit Hilfe einer Listview zum anzeigen deiner Gesamten Datensaetze. Wenn die Datensaetze in der Listview sind kannst du per Mausklick oder mit den Pfeiltasten Hoch und Runter durch die Listview gehen und so die Daten die darin stehen in deinen Editfeldern anzeigen lassen!

[Ykcim]

Die Lösung:

Delphi-Quellcode:

MenueUnit.ExecQuery(DB, query, Cols, Rows);
      FANR1.Caption:=rows[0,0];
      FANR2.Caption:=rows[1,0];
      ArtikelNr.Caption:=rows[2,0];
      Artikelbez1.Caption:=rows[3,0];
      Artikelbez2.Caption:=rows[4,0];
      Sollmenge.Caption:=rows[5,0];
      FAStatus.Caption:=rows[6,0];