Código
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;
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009