Ver Mensaje Individual
  #8  
Antiguo 09-05-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.557
Reputación: 25
egostar Va camino a la fama
Tienes razón amigo Caral, la sintaxis esta equivocada. Pudo haber sido un error de dedo.

Bueno, de acuerdo a la pregunta de anubis

Cita:
Empezado por anubis
no se puede crear una tlabel en una procedure y asignar valores como en una tlabel de un form?
Pues si, si se puede crear un TLabel en un procedure.

Seria mas o menos así:

Código Delphi [-]
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  pasar: TLabel;
begin
   pasar := TLabel.Create(Form1);
   pasar.Parent  := Form1;
   pasar.enabled := true;
   pasar.name    := 'Label2';
   pasar.Caption := 'Habitacion';
   pasar.Visible := True;
   pasar.Top     := 100;
   pasar.Left    := 100;
   pasar.Width   := 100;
end;

Salud OS.

Edito:

El riesgo que se corre haciendo esto es que si se da click en el botón mas de una vez, habrá un error, así que hay que tener cuidado, además no olvides destruir el TLabel. La idea es que veas que si se puede, las validaciones ya dependen de lo que quieras hacer con el objeto.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney

Última edición por egostar fecha: 09-05-2007 a las 22:00:40.
Responder Con Cita