|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
Delphi 12 Athens
|
AW: Database Components
12. Jun 2011, 22:26
Delphi-Quellcode:
Form1.ZConnection1.HostName := ' localhost';
Form1.ZConnection1.Protocol := ' mysql';
Form1.ZConnection1.Port := 3306; //wozu das String-Geraffel?
Form1.ZConnection1.User := ' root';
Form1.ZConnection1.Password := ' ';
Form1.ZConnection1.Connect;
Form1.ZQuery1.SQL.Text := ' SHOW DATABASES';
Form1.ZQuery1.Open;
while not Form1.ZQuery1.EOF do
begin
ShowMessage(Form1.ZQuery1.Fields[0].AsString);
Form1.ZQuery1.Next;
end;
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|