[Code] [Delphi] Problem bei MySQL-Abfrage + Memo-Feld

mZet_ · 11. September 2009

[Delphi] Problem bei MySQL-Abfrage + Memo-Feld

Hi

Wir erarbeiten uns gerade ein wenig die ersten Schritte von MySQL in Verbindung mit Delphi.

Im Moment haben wir ein winziges Test-Programm, welches einfach auf eine Datenbank zugreift,
und je nach Befehl, bestimmte Tabellen oder Teile davon in einem Memo-Feld ausgibt.

Das klappt auch alles eigentlich soweit, habe lediglich ein "Schönheitsproblem":

Wenn ich dem Programm zum Beispiel dann auftrage

Code:

select Hersteller, Modell from AutoTabelle

liest er Hersteller inklusive Modell aus unserer Autodatenbank aus und schreibt diese ins Memo-Feld. Jedoch immer unter einander:

Hersteller
Modell
Hersteller
Modell
Hersteller
Modell
Hersteller
Modell

Nach diesem Muster, nur natürlich mit richtigen Namen :>

Jetzt meine Frage, wie bekomm ich das hin, dass die Modellnamen in der selben Zeile wie die Hersteller stehen?

Im Moment schreib ich das ganze folgendermaßen ins Memo-Feld:

Code:

 while not SQLQuery1.EOF do
 begin
 for i := 0 to SQLQuery1.FieldCount-1 do begin
 Memo1.Lines.Add(SQLQuery1.Fields[i].AsString);
 end;
 SQLQuery1.Next;
 end;

Die for-Schleife war schon Ergebnis eines Versuches mit FieldCount zu arbeiten, ist noch nicht zwingend nötig, aber vielleicht ein Ansatz?^^

Danke schonmal

Anzeige

Rushh0ur · 12. September 2009

AW: [Delphi] Problem bei MySQL-Abfrage + Memo-Feld

Hab mit Delphi und SQL noch nicht gearbeitet aber vielleicht so (nicht getestet):

Code:

var I, J: Integer;
 S: String;
[...]
 J := 0;
 S := '';
 for I := 0 to SQLQuery1.FieldCount-1 do
 begin
 S := S + '-' + SQLQuery1.Fields[i].AsString;
 J := J + 1;
 if J = [B][COLOR="Red"]2[/COLOR][/B] then
 begin
 Memo1.Lines.Add(S);
 J := 0;
 S := '';
 end;
 end;

Rot: Anzahl der Felder die Abgefragt wurden.

Schau mal noch in der Komponentenhilfe von Delphi nach eventuelle steht da noch was wie man die Daten auslessen kann ....

Mfg Rushh0ur

mZet_ · 12. September 2009

AW: [Delphi] Problem bei MySQL-Abfrage + Memo-Feld

Klappt wunderbar. Vielen Dank!

BW haste.

Nützliche Suchen

[Code] [Delphi] Problem bei MySQL-Abfrage + Memo-Feld

Videos zum Themenbereich