Delphi - generar tshape en tiempo de ejecucion

 
Vista:

generar tshape en tiempo de ejecucion

Publicado por armando montoya (28 intervenciones) el 17/04/2003 20:42:56
gracias por leer mi pregunta, necesito saber como puedo hacer para que los componentes creados en tiempo de ejecucion se vean en mi form, si tengo el siguiente codigo, pero no aparecen:
var
NewDisk:TPanel;
I:Integer;
begin
For I:=1 To StrToInt(meDiscos.Text) Do
Begin
NewDisk:=TPanel.Create(vtTorresDeHanoi);
NewDisk.Name:='Disco'+IntToStr(I);
NewDisk.Color:=clYellow;
NewDisk.Width:=130-(I*10);
NewDisk.Height:=10;
NewDisk.Top:=450-(I*10);
NewDisk.Left:=110-(NewDisk.Width Div 2);
NewDisk.Visible:=True;
End;
end;

Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:generar tshape en tiempo de ejecucion

Publicado por Delfino (1216 intervenciones) el 17/04/2003 21:13:39
Te falta q especifiques a quien pertenece el control visual q quieras crear en tiempo de ejecucion, todos los controles visuales necesitan esa especificacion, lo haces con la siguiente sentencia:
NewDisk.Parent := Form1
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar