poScreenCenter-dá pra fazer novamente dps do form já abert

31/08/2004

tenho um form q diminuo o tamanho dele na primeira abertura, mas dentro dele tem um botão para habilitar outras funções que, aumenta o tamanho do form, e logo na primeira abertura ele estava com a posição de poScreenCenter, e qdo clico no botão q aumenta o tamanho dele, ele fica fora da tela, não fica no centro. Será q tem como centralizar novamente qdo ele fica maior?


Janete

Respostas

31/08/2004

Janete

tenho um form q diminuo o tamanho dele na primeira abertura, mas dentro dele tem um botão para habilitar outras funções que, aumenta o tamanho do form, e logo na primeira abertura ele estava com a posição de poScreenCenter, e qdo clico no botão q aumenta o tamanho dele, ele fica fora da tela, não fica no centro. Será q tem como centralizar novamente qdo ele fica maior?


tentei repedir o comando Form1.Position := poScreenCenter; quando clico no botão, mais dá um erro access violation


Responder Citar

31/08/2004

Sandra

Janete,

Qual o seu código? Em qual evento está utilizando?


Responder Citar

01/09/2004

Janete

Janete, Qual o seu código? Em qual evento está utilizando?


é em um botão:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
Form1.Height:=536;
Form1.Position := poScreenCenter;
end;


Responder Citar

01/09/2004

Sandra

Janete,

Tentei aqui com esse código e o poScreenCenter funcionou normalmente, ou seja, após redimensionar o form, ele é novamente centralizado. Tem mais algum código diferente no evento deste SpeedButton?

Você diz, no primeiro post, que diminui o tamanho na primeira abertura. Como assim? É em tempo de execução? Em qual evento? Coloque também o código para analisarmos.


Responder Citar

01/09/2004

Nildo

Se continuar não funcionando, tente assim:

Form1.left := ( Screen.Width div 2 ) - ( Form1.Width div 2 );
Form1.Top := ( Screen.Height div 2 ) - ( Form1.height div 2 );


Responder Citar

01/09/2004

Janete

Janete, Tentei aqui com esse código e o poScreenCenter funcionou normalmente, ou seja, após redimensionar o form, ele é novamente centralizado. Tem mais algum código diferente no evento deste SpeedButton? Você diz, no primeiro post, que diminui o tamanho na primeira abertura. Como assim? É em tempo de execução? Em qual evento? Coloque também o código para analisarmos.


Simplesmente eu já deixo o form menor qdo é aberto pela primeira vez, depois lá dentro tem um botão q se a pessoa clicar nele, irá abrir outras opções (campos) dentro do form, e é nessa hora q peço para centralizar novamente. A única coisa q tem no botão é:

Form1.Height:=536;
Form1.Position := poScreenCenter;
Edit2.Setfocus;


Responder Citar

01/09/2004

Sandra

:? Que estranho!!

Janete, não sei se tem algo a ver, mas procure pela propriedade DefaultMonitor está setada para [b:fe0d1f9849]dmActiveForm[/b:fe0d1f9849].

Para maiores informações, veja no help on-line do Delphi. Boa sorte!!


Responder Citar