No mostrar un Ítem en especifico dentro de un Combobox

[feliz-58]

Saludos amigos.

Lo que pasa es lo siguiente: tengo un combobox, su trabajo es obtener la lista de ítem del nombre de las tablas que están en una base de datos, los obtengo con el siguiente código:

Código Delphi [-]
 procedure Templeados.FormCreate(Sender: TObject);
begin
  ComboBox1.Clear;
  ComboBox1.Style := csDropDownList;
  with ADOConnection1 do
  begin
    Connected := True;
    GetTableNames(ComboBox1.Items);
  end;
  ComboBox1.ItemIndex := 0;
end;

Como ven esta en el FormCreate.

Lo que quiero hacer es que en la base de datos tengo una tabla que se llama "Tablaprincipal" como hago para que aparezcan todas las otras tablas menos esa.

Gracias de antemano.

[ecfisa]

Hola feliz-58.

Código Delphi [-]
procedure Templeados.FormCreate(Sender: TObject);
begin
  ComboBox1.Clear;
  ComboBox1.Style := csDropDownList;
  with ADOConnection1 do
  begin
    Connected := True;
    GetTableNames(ComboBox1.Items);
  end;
  ComboBox1.Items.Delete(ComboBox1.Items.IndexOf('Tablaprincipal'));
  ComboBox1.ItemIndex := 0;
end;

Saludos.

[feliz-58]

Empezado por ecfisa

Hola feliz-58.

Código Delphi [-]
procedure Templeados.FormCreate(Sender: TObject);
begin
  ComboBox1.Clear;
  ComboBox1.Style := csDropDownList;
  with ADOConnection1 do
  begin
    Connected := True;
    GetTableNames(ComboBox1.Items);
  end;
  ComboBox1.Items.Delete(ComboBox1.Items.IndexOf('Tablaprincipal'));
  ComboBox1.ItemIndex := 0;
end;

Saludos.

Excelente Gracias