Thema: Delphi MySQL Tabellen anfragen

Einzelnen Beitrag anzeigen

Pump3r

Registriert seit: 6. Okt 2005
175 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: MySQL Tabellen anfragen

  Alt 28. Jun 2006, 08:53
den inhalt aus einer einzelnen tabelle auslesen, weiß ich eigentlich wie das geht.


ich will die einzelnen tables aus meiner datenbank abfragen.

MySQL Befehl: show tables;

das was da kommt, will ich in eine StringList speichern.

ich weiß nur nicht wie ich das shwo tables sende und die rückgabe abfangen kann.




EDIT: Hat sich erledigt, habs ...

Delphi-Quellcode:
procedure TForm1.gettables;
var
liste : TStringList;
begin
try
liste := TStringList.Create;
ZQuery2.Active := false;
ZQuery2.SQL.Text:='SHOW TABLES';
ZQuery2.active := true;
while not zquery2.Eof do
  begin
  liste.Add(ZQuery2.Fields[0].AsString);
  zquery2.Next;
  end;
zquery1.Active := false;
liste.savetofile(ExtractFilePath(application.ExeName)+'test.txt');

finally
liste.Free;
end;
end;
Christian Hermann
  Mit Zitat antworten Zitat