Советы по Delphi

         

Открытие MDI-окон определенного размера


    var
ProjectWindow: TWndProject; begin
If
ProjectActive=false then begin LockWindowUpdate(ClientHandle); ProjectWindow:=TWndProject.Create(self); ProjectWindow.Left:=10; ProjectWindow.Top:=10; ProjectWindow.Width:=373; ProjecTwindow.Height:=222; ProjectWindow.Show; LockWindowUpdate(0); end; end;

Используйте LockWindowUpdate перед созданием окна и после того, как создание будет завершено. [001771]



Содержание раздела