Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi mysql_fetch_field (https://www.delphipraxis.net/158676-mysql_fetch_field.html)

Toby2k 26. Feb 2011 12:10

Datenbank: MySQL • Version: 5.5.9 • Zugriff über: libmysql.dll

mysql_fetch_field
 
Hallo zusammen,

weiß jemand wie sich die Funktion "mysql_fetch_field" verhält?

Versuche damit gerade einen Assoziativen "Array" zu erstellen, wenn man es so nennen kann - basiert auf TStrings.

Delphi-Quellcode:
rRow   := mysql_fetch_row(rResult);
rFields := mysql_fetch_field(rResult);

for i := 0 to mysql_num_rows(rResult) - 1 do begin
   
    aData.Add(Format('%s=%s', [rFields[i], rRow[i]]));
end;
Delphi-Quellcode:
rFields[i] // Funktioniert irgendwie nicht.

VG Toby

Toby2k 26. Feb 2011 13:25

AW: mysql_fetch_field
 
Lösung gefunden:

Delphi-Quellcode:
if mysql_num_rows(rResult) >= 1 then begin

   rRow   := mysql_fetch_row(rResult);

   for i := 0 to mysql_num_fields(rResult) - 1 do begin

      rFields := mysql_fetch_field(rResult);
      aData.Add(Format('%s=%s', [mysql_field_name(rFields), rRow[i]]));

   end;

end;
VG Toby

Sir Rufo 26. Feb 2011 19:24

AW: mysql_fetch_field
 
Was machst du das kompliziert ...
Delphi-Quellcode:
StringList.Values[ AName ] := AStrValue;


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:14 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz