Como saber si un DBComboBox esta incluido en un TDBCtrlGrid

[[David]]

Hola

He descubierto una forma, algo cutre, pero funciona. Si el DBCombobox esta en un panel o en el formulario, la propiedad parent no esta vacia, pero si esta dentro del control DBCtrlGrid, entonces parent esta vacio. Asi pues

if TDBComboBox.parent.name = '' then
// esta en el TDBCtrlGrid, ya que de mometo todos los controles o pertencen a formulario o a un panel.

No me gusta mucho esta forma, pero de momento salgo del paso.

[jorge82]

Hola, el DBCtrlGrid tiene un TDBCtrlPanel y es en éste donde están los componentes, entonces parece que hay que preguntar si el Parent del DBComboBox es de la clase TDBCtrlPanel y no TDBCtrlGrid.

Código Delphi [-]
for I := 0 to Self.ComponentCount-1 do
  begin
    C := Components[i];
    if (C is TDBComboBox) then
      if TDBCombobox(C).Parent.ClassType = TDBCtrlPanel then
      ...
  end;