Fórum Impedir que usuário mova o Form? #148989

24/03/2003

0

Bom dia companheiros..

Vejam se podem me ajudar...

Qual a propriedade, ou se não for propriedade do Form, como faço para que os form´s do meu sistema não sejam movidos.

Existe uma propriedade do form que trata isso?
Ou terei que programar este procedimento?


Gostaria de agradecer os companheiros que me ensinaram como evitar que os form´s sejam redimensionados. Agora preciso evitar também que os mesmos sejam movidos.


Pablo_lima

Pablo_lima

Responder

Posts

24/03/2003

Zoom

Propriedade Align setar para alCustom

[]´s
zoom


Responder

Gostei + 0

24/03/2003

Anonymous

fala fio!!! beleza???

gostaria que voce me passase essa manha de nao redimencionamento do form...

agradeço desde ja......


Responder

Gostei + 0

24/03/2003

Aroldo Zanela

Para versões mais antigas:

[list:18885097ff]
community.borland.com

Article #28186: How can one prevent a TForm from being moved or resized?

QUESTION:


How can one disable a TForm from being moved or resized?


ANSWER:


Place the following code in the FormCreate event:



procedure TForm1.FormCreate(Sender: TObject);
var
hMenuHandle : HMENU;
begin
hMenuHandle := GetSystemMenu(Form1.Handle, FALSE); //Get the handle of the Form
if (hMenuHandle <> 0) then
DeleteMenu(hMenuHandle, SC_MOVE, MF_BYCOMMAND); //disable moving
DeleteMenu(hMenuHandle, SC_SIZE, MF_BYCOMMAND); //disable resizing
end;




If you also want to prevent the user from minimizing and maximazing the form, in the Object Inspector, select the form you are concerned with and under the BorderIcons, set the biMinimize and biMaximize properties to False.

Last Modified: 02-JAN-02
[/list:u:18885097ff]


Responder

Gostei + 0

24/03/2003

Inutaishou

Em borderStyle nas propriedades do form coloque bsSingle, assim o usuario não podera mover nem aumentar o tamanho do form...
mas se você quiser só que ele não mova use a propriedade align em alCustom


Responder

Gostei + 0

24/03/2003

Aroldo Zanela

Em borderStyle nas propriedades do form coloque bsSingle, assim o usuario não podera mover nem aumentar o tamanho do form...


Informação equivocada.


Responder

Gostei + 0

24/03/2003

Pablo_lima

Caros companheiros

Obrigado pela orientação, sobre como evitar que o form seja movido.

É ao companheiro que queria saber como evitar que o form seja redimensionado:

Prop. BorderStyle = bsDialog


Um grande abaço a todos....
valeu.


Responder

Gostei + 0

24/03/2003

Inutaishou

Em borderStyle nas propriedades do form coloque bsSingle, assim o usuario não podera mover nem aumentar o tamanho do form... mas se você quiser só que ele não mova use a propriedade align em alCustom


Correção:

bsSingle impede somente que o form seja redimensionado, mesmo que ainda pode ser maximizado usando o icone no canto superior direito, mas para evitar isso é só retirar o ícone setando para false o biMaximize no BorderIcons, e para não ser movido alCustom


Responder

Gostei + 0

24/03/2003

Anonymous

Obrigado a vc RodLima e aos demais pela força...

abraços


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar