Ver Mensaje Individual
  #1  
Antiguo 15-06-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
Actualizar Caption de un elemento de Array of TLabel's

Hola compañeros !

Tengo definido un Array de TLabels en mi formulario principal.

Código SQL [-]
public
  Arr_DesktopL : Array of TLabel;

Cuando intento actualizar el título de los labels contenidos en dicho Array, me lo hace bien, pero no me lo cambia en la 'presentación' del formulario principal hasta que no fuerzo un repintado tal como pasando otra ventana por encima de dicho Label, o cambiando a otra aplicación de Windows y volviendo a la mía.

Código Delphi [-]
procedure TMainForm.Icons_On_DeskTop_Update(i: Integer; AuxS1: String);
begin
  Arr_DesktopL[i].Caption := AuxS1;
end;

Como puedo 'forzar' el repintado del Label para que se actualize ?

He probado con Arr_DesktopL[i].Repaint;, con Arr_DesktopL[i].Refresh;, Arr_DesktopL[i].Update; e incluso con MainForm.Repaint; pero nada. En ningún caso me actualiza el caption.

Lo dicho, si por el contrario después de la instrucción de arriba, muevo otra ventana por encima o abro otra aplicación diferente en Windows y vuelvo a la mía, aparece ya de nuevo el Label con el Caption correcto.

ClNaU2
__________________
Piensa siempre en positivo !
Responder Con Cita