Ver Mensaje Individual
  #4  
Antiguo 02-03-2008
TeAOrco TeAOrco is offline
Registrado
 
Registrado: oct 2006
Posts: 5
Reputación: 0
TeAOrco Va por buen camino
Modificado:
Código Delphi [-]
 
 
var
  Modulo: HModule;
  ClaseFrame: TCustomFrameClass;
  FrameC: TFrame;
begin
  Modulo:=LoadPackage('FramePru.bpl');
  if Modulo<>0 then
    begin
    ClaseFrame:=TCustomFrameClass(GetClass('TfraVerde'));
    if ClaseFrame<>Nil then
      begin
      FrameC:=TFrame(ClaseFrame.Create(Self));
      FrameC.Parent:=Self;
      FrameC.Align:=alBottom;
      FrameC.Height:=200;
      FrameC.Visible:=True;
      end;
    end;

Mismo error en la misma linea.
Responder Con Cita