Redimensionar form sem bordas
10/12/2003
0
Alguém pode me dizer como redimensionar um form sem bordas, usando o cursor do mouse.
Carioca
Curtir tópico
+ 0
Responder
Posts
15/12/2003
Cebikyn
Declare na seção public:
Depois em implementation:
Isto tornará possível redimensionar o form, mesmo que ele não tenha bordas.
procedure CreateParams(var Params: TCreateParams); override;
Depois em implementation:
procedure TForm1.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.Style := (Params.Style or WS_THICKFRAME); end;
Isto tornará possível redimensionar o form, mesmo que ele não tenha bordas.
Responder
Clique aqui para fazer login e interagir na Comunidade :)