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...

Código Delphi [-]
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