Открытие MDI-окон определенного размера
Материал из DRKB
Открытие 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 перед созданием окна и после того, как создание будет завершено.
Source: Взято с http://delphiworld.narod.ru
ID: 00493