Ver Mensaje Individual
  #1  
Antiguo 28-07-2003
danytorres danytorres is offline
Miembro
 
Registrado: may 2003
Ubicación: Venezuela. Edo Carabobo
Posts: 361
Reputación: 22
danytorres Va por buen camino
Question Crear un objeto?

Hola a todos los del foro. El problema que tengo es que creo un componente en un formulario1 pero quiero que aparesca en el formulario2 como hago este es el codigo que tengo que esta ubicado en en formulario1.

codigo
__________________________

procedure TFormulario1.Button2Click(Sender: TObject);
Var
RxCheckListBox1: TRxCheckListBox;
begin
RxCheckListBox1 := TRxCheckListBox.Create (Self);
RxCheckListBox1.parent:=Self;
RxCheckListBox1.Left:= 7;
RxCheckListBox1.Top:=91;
RxCheckListBox1.Width:= 434;
RxCheckListBox1.Height:= 299;
RxCheckListBox1.CheckKind:= ckCheckMarks;
RxCheckListBox1.AutoScroll:= False;
RxCheckListBox1.BorderStyle:= bsNone;
RxCheckListBox1.Color:= clBtnFace;
RxCheckListBox1.Columns:= 2;
RxCheckListBox1.Font.Charset:= ANSI_CHARSET;
RxCheckListBox1.Font.Color:= clWindowText;
RxCheckListBox1.Font.Height:= -9;
RxCheckListBox1.Font.Name:= 'Arial';
RxCheckListBox1.Font.Style:= [];
RxCheckListBox1.GraySelection:= True;
RxCheckListBox1.IntegralHeight:= True;
RxCheckListBox1.ItemHeight:= 13;
RxCheckListBox1.ParentFont:= False;
RxCheckListBox1.TabOrder:= 2;
RxCheckListBox1.Visible:=true;
end;



_______________________
Un saludo a todos....
Responder Con Cita