Ver Mensaje Individual
  #14  
Antiguo 23-02-2007
Avatar de gluglu
[gluglu] gluglu is offline
Miembro Premium
 
Registrado: sep 2004
Ubicación: Málaga - España
Posts: 1.455
Reputación: 21
gluglu Va por buen camino
Me refiero a que en el momento de crear el Form, no está disponible el valor 84 del parámetro que tengo que pasar.

Hablo del valor concreto, en este caso del ejemplo, 84.

En el OnCreate inicializo varios campos y hago varias operaciones que precisan del valor 84.

El valor 84 se asigna justo después de haber terminado el OnCreate.

Mi caso concreto. Al crear en este caso por ejemplo mi Form BookingMain, necesito saber el número de reserva al que se refiere. (Supongamos : 84). En el OnCreate de TBookingMain hago varias operaciones que necesitan del valor 84.

Código Delphi [-]
TMain.ButtonClick(Sender: TObject)
  BookingMain := TBookingMain.Create(Self);
  BookingMain.Param := 84;
  BookingMain.Show;
Código Delphi [-]
TBookingMain.Create(Sender: TObject);
begin
  ....
  // Aquí no está disponible el valor 84 de Param
  ...
end;
 
TBookingMain.Activate(Sender: TObject);
begin
  ...
  // Aquí si está disponible el valor 84 de Param
  ...
end;

No niego que a lo mejor quedaría más claro llamar a un proceso 'Initialize' :
Código Delphi [-]
TMain.ButtonClick(Sender: TObject)
  BookingMain := TBookingMain.Create(Self);
  BookingMain.Param := 84;
  BookingMain.Initialize(nil);
  BookingMain.Show;
Código Delphi [-]
TBookingMain.Initialize(Sender: TObject);
begin
  ....
  // Realizar aquí todas las operaciones de Inicialización de la Rva. 84
  // al estar disponible aquí el valor Param = 84
  ...
end;
__________________
Piensa siempre en positivo !
Responder Con Cita