Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   MySQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=21)
-   -   Mydac con Treeviwew como listar Bases de Datos y Tablas (https://www.clubdelphi.com/foros/showthread.php?t=36394)

JXJ 10-10-2006 20:21:02

Mydac con Treeviwew como listar Bases de Datos y Tablas
 
Hola,. esoty probando los componentes mydac con unas base de datos
y servidor mysql 4.1

lo que quiero es poder mostrar las bases de datos y sus tablas
en el treeview se cargen los datos a los nodos
en una estructura gerarquica de datos.
algo asi

<a href="http://img166.imageshack.us/my.php?i...ewmydactb7.jpg" target="_blank"><img src="http://img166.imageshack.us/img166/1...ydactb7.th.jpg" border="0" alt="Free Image Hosting at www.ImageShack.us" /></a>


por ejemplo usando el DBGrid,
ejecuto la sentencia [sql]show databases[sql], y se listan en el DBGrid
las bases de datos que tengo
y despues ejecuto [sql]use database Pruebas[sql]
y despues [sql]show tables[sql]
se muestran las tablas de la base de datos,



Hasta ahora este es mi unico codigo, dentro de un boton
Código Delphi [-]
var
  tnode, tchild : TTreeNode;
 begin
tnodehost := DBtree.Items.Add(nil, Myconnection.Username+ '@' + Myconnection.Server);  // Host or Root
  tnodehost.ImageIndex := 41;
  tnodehost.SelectedIndex := 41;
end;

no se como parsear el resultado del un show databases y pasarlos
como items o nodos al treeview y de estos ejecutar por cada item o subnodo
un show tables

gracias por su atencion


La franja horaria es GMT +2. Ahora son las 05:42:31.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi