Fórum Evento ao Mover o Form?? #234569
26/05/2004
0
É possível implementar este evento? Preciso desabilitar um Timer quando o usuário começar a mover o form e habilitar ao parar de mover.
Obrigado.
Obrigado.
Earmarques
Curtir tópico
+ 0
Responder
Posts
28/05/2004
Dopi
Realmente fiquei curioso com o tema.... :-)
Reparei que o evento OnCanResize
ocorre varias vezes durante o arrasto do Form...
Em um Form com um Memo fiz varios add´s no memo com o nome de varios eventos do Form...
Exemplo:
procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
NewHeight: Integer; var Resize: Boolean);
begin
Memo1.Lines.Add(´CanResize´) ;
end;
Reparei que o evento OnCanResize
ocorre varias vezes durante o arrasto do Form...
Em um Form com um Memo fiz varios add´s no memo com o nome de varios eventos do Form...
Exemplo:
procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
NewHeight: Integer; var Resize: Boolean);
begin
Memo1.Lines.Add(´CanResize´) ;
end;
Responder
Gostei + 0
28/05/2004
Beppe
Nenhum evento é disparado pelo form. Vc precisa tratar as mensagens por si msm...
http://delphiforum.icft.com.br/forum/viewtopic.php?t=42785&highlight=message
http://delphiforum.icft.com.br/forum/viewtopic.php?t=42785&highlight=message
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)