Delphi - база знаний


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


Открытие 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 перед созданием окна и после того, как создание будет завершено.

Взято с





Начало  Назад  Вперед



Книжный магазин