Hola,
Hay una cosa que no hago bien y querria compartilo con vosotros a ver que hago mal. Quiero acceder a la propiedad text de un label de otro form, para ello he creado un procedure publico para llamarlo des de fuera...pero vayamos por pasos:
Quiero mostrar un splashScreen que vaya canviando el texto segun los segundos que yo decido para abrir la aplicación mdi principal. Para ello tengo en el form del splash el siguiente còdigo:
Código:
procedure TwinFormSplash.ExecLoop();
var
x,y:int32;
begin
for x:=0 to 1000000 do
begin
if x=500000 then
label2.Text:='Obrint Fitxers...';
if x=800000 then
label2.Text:='Carregant Interfície...';
Progressbar1.PerformStep;
y:=x;
end;
Self.Close;
end;
Lo que hago desde el proyecto es:
Código:
var
splash: WinformSplash.TWinFormSplash;
[STAThread]
begin
splash:=WinformSplash.TWinFormSplash.Create; //form del splash
Splash.Show;
Splash.Update;
Splash.ExecLoop; //procedure que va canviando valores del label;
Splash.hide;
Splash.free;
Application.Run(Main_Window.TWinForm_Principal.Create);//ventana principal del programa
Pues con ese código la propiedad "text" de label2 nunca es modificada...como lo hago, alguna sugerencia?
Utilizo bds2006 y programo con .NET i BDP.NET
Hala saludos,