Tema: InheritsFrom
Ver Mensaje Individual
  #4  
Antiguo 20-11-2003
tango01 tango01 is offline
Miembro
 
Registrado: jun 2003
Ubicación: Mar del Plata - Argentina
Posts: 46
Reputación: 0
tango01 Va por buen camino
debo tener otro problema porque si creo un proyecto nuevo con un boton y un groupbox
Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if GroupBox1.InheritsFrom(Tcontrol) then
    showmessage('si')
  else
    showmessage('No');
end;
funciona bien.
__________________
El secreto de la libertad está en no tener miedo.
Responder Con Cita