hibernacion del windows da problemas

[roman]

Por lo que comentas, parece no que se pierdan los datos, sino que el grid no se redibuja correctamente al regresar de la hibernación. Podrías intentar hacer un Refresh, ya sea del grid o del formulario, cuando se restaure el sistema. Para ello interceptas el mensaje WM_POWERBROADCAST:

Código Delphi [-]
const
  PBT_APMRESUMESUSPEND = $07;

type
  TForm1 = class(TForm)
  private
    procedure WMPowerBroadcast(var Msg: TMessage); message WM_POWERBROADCAST;
  end;

implementation

procedure TForm1.WMPowerBroadcast(var Msg: TMessage);
begin
  inherited;

  if Msg.WParam = PBT_APMRESUMESUSPEND then
  begin
    {
      Aquí haces el refresh;
    }
  end;
end;

// Saludos

[aladelta]

Gracias Roman por la respuesta y tu interes, voy aprobarlo ahora mismo y cuento los resultados...

Hasta luego

[aladelta]

Perfecto!!!...muchas gracias...

[roman]

Pues vaya que estuvo larga la hibernación

[JerS]

Empezado por roman

Por lo que comentas, parece no que se pierdan los datos, sino que el grid no se redibuja correctamente al regresar de la hibernación. Podrías intentar hacer un Refresh, ya sea del grid o del formulario, cuando se restaure el sistema. Para ello interceptas el mensaje WM_POWERBROADCAST:

Código Delphi [-]const PBT_APMRESUMESUSPEND = $07; type TForm1 = class(TForm) private procedure WMPowerBroadcast(var Msg: TMessage); message WM_POWERBROADCAST; end; implementation procedure TForm1.WMPowerBroadcast(var Msg: TMessage); begin inherited; if Msg.WParam = PBT_APMRESUMESUSPEND then begin { Aquí haces el refresh; } end; end;


// Saludos

Buenas amigo Roman, llevando mas o menos la ide de este hilo, yo necesito hacer algo parecido pero mi problema es que cuando hiberna y vuelve a la normalidad me desactiva los dispositivos USB, me gustaria saber si puedo mandar a reactivar los puertos USB por delphi