segunda-feira, 25 de maio de 2009

Como evitar efeito de maximização?

{Se você já desenvolveu uma aplicação MDI com um formulário MDIChild que tem que ser exibido em estado Maximizado (WindowState=wsMaximized), provavelmente você já se deparou com aquele deselegante problema em que o usuário acompanha a maximização do seu formulário. Para evitar isto, faça o seguinte: Antes de criar o seu formulário para a exibição, utilize LockWindowUpdate(Handle);

Após a criação do formulário, utilize LockWindowUpdate(0);

Com isto, você dará um efeito mais profissional às suas aplicações.

Exemplo:}

procedure MainForm.ItemArqCadFor(Sender: TObject);
begin
LockWindowUpdate(Handle);
with TFrmCadFor.Create(self) do Show;
LockWindowUpdate(0);
end;

Nenhum comentário:

Postar um comentário