mover a msg exibida pelo Application.MessageBox

Delphi

07/03/2003

Quero que a mensagem (application.messagebox) naum aparecesse no centro da tela e sim em um canto específico, como faço isso ???

Grato


AlphaBlend ...


Alphablend

Alphablend

Curtidas 0

Respostas

Aroldo Zanela

Aroldo Zanela

07/03/2003

Quero que a mensagem (application.messagebox) naum aparecesse no centro da tela e sim em um canto específico, como faço isso ??? Grato AlphaBlend ...

Só se você alterar na Unit Forms. Veja você mesmo....
      SetWindowPos(Handle, 0,
        Rect.Left + ((Rect.Right - Rect.Left) div 2),
        Rect.Top + ((Rect.Bottom - Rect.Top) div 2),
        0, 0, SWP_NOACTIVATE or SWP_NOREDRAW or SWP_NOSIZE or SWP_NOZORDER);



GOSTEI 0
POSTAR