Tema: BUtton
Ver Mensaje Individual
  #2  
Antiguo 30-06-2006
esocrates esocrates is offline
Miembro
 
Registrado: may 2003
Ubicación: Argentina
Posts: 210
Reputación: 22
esocrates Va por buen camino
Un ejemplo para hacer lo que pedís.
Código Delphi [-]
Var
MiBoton : TButton; //Puntero a la clase
begin
MiBoton := TButton.Create(Form1); // Se crea el Botón en el Form 1

with MiBoton do //Con el Botón creado hacer
begin
Parent := Form1; // Contenedor del Botón
height := 30;
width := 120;
caption := 'Mi Botón';
left := (Form1.ClientWidth - width) div 2;
top := (Form1.ClientHeight - height) div 2;
end;
end;
Un saludo

Última edición por esocrates fecha: 30-06-2006 a las 04:31:36.
Responder Con Cita