Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Crear un objeto? (https://www.clubdelphi.com/foros/showthread.php?t=2548)

danytorres 28-07-2003 19:33:09

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....

delphi.com.ar 28-07-2003 19:39:12

Código:

RxCheckListBox1.Parent := Formulario2;
Saludos!


La franja horaria es GMT +2. Ahora son las 21:46:35.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi