tablas y combobox

[veloki]

Buenas.
Tengo el siguiente problema, quisiera recoger las tablas de una base de datos, si por ejemplo tengo dos tablas que empiezan por client quiero que las muestre en un combobox, pero no soy capaz, estoy usando ADO
gracias de antemano

[Neftali [Germán.Estévez]]

Pasa los nombres de tabla a un TStrings y luego lo recorres y añades las que quieras al combo...


var
TS:TStrings;
i:Integer;
begin
TS := TStringList.Create();
ADOConnection.GetTableNames(TS, False{SystemTables});
try
// recorrido
for i := 0 to (TS.Count - 1) do begin
// Escoger las que quieras...
if (AnsiStrLComp(TS.Strings[i],'client', 6) = 0) then begin
ComboBox1.Add(TS.Strings[i]);
end;
end;
finally
TS.Free;
end;


Te lo he puesto de memoria, así que tal vez he cometido algun error de sintaxis, pero debería funcionar...

[veloki]

muchas gracias por tu ayuda :)