Event after form resize

0

I have a project in delphi 2010 in which I am trying to create a after resize event. Is there any way to create the event in a project form?

The goal would be to execute a code only after resizing the form is complete, and not always running that is what happens in onresize of form .

    
asked by anonymous 08.11.2016 / 17:10

1 answer

1

Implement the declarations:

procedure WMEnterSizeMove(var Message: TMessage); message WM_ENTERSIZEMOVE;
procedure WMExitSizeMove(var Message: TMessage); message WM_EXITSIZEMOVE;

procedure TForm9.WMEnterSizeMove(var Message: TMessage);
begin
  {Aqui ele entrou no laço que monitora o redimensionamento, então não Faça nada}
end;

procedure TForm9.WMExitSizeMove(var Message: TMessage);
begin
  {Aqui ele terminou de redimensionar}
  ShowMessage('terminou');
end;

Detail, do not implement the code and then run the shortcut to auto declare the procedures, Delphi will declare without some details, it has to be done manually!

In OS

    
08.11.2016 / 17:52