Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.02.01;
Скачать: CL | DM;

Вниз

сохранение DFM   Найти похожие ветки 

 
Дмитрий   (2008-12-19 14:37) [0]

Как сделать чтобы форма сохраняла в .DFM не фактические размеры (Height, Width), а клиентские (ClientHeight, ClientWidth);


 
Сергей М. ©   (2008-12-19 14:49) [1]

Лезем в генофонд, видим там следующее:

function TCustomForm.IsClientSizeStored: Boolean;
begin
 Result := not IsFormSizeStored;
end;

function TCustomForm.IsFormSizeStored: Boolean;
begin
 Result := AutoScroll or (HorzScrollBar.Range <> 0) or
   (VertScrollBar.Range <> 0);
end;


Делаем вывод:

на момент сохранения должны быть соблюдены условия

AutoScroll = False
HorzScrollBar.Range = 0
VertScrollBar.Range = 0


 
Дмитрий   (2008-12-19 14:52) [2]

Большое спасибо



Страницы: 1 вся ветка

Текущий архив: 2009.02.01;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.024 c
2-1229523838
Ru
2008-12-17 17:23
2009.02.01
Напомните по WinAPI


2-1229374412
bit
2008-12-15 23:53
2009.02.01
TListView get item


6-1197906837
AllTrueIst
2007-12-17 18:53
2009.02.01
Локальный прокси(перехват всех запросов программой)


9-1167021706
MonoLife
2006-12-25 07:41
2009.02.01
puzzle


15-1228791800
alshtam
2008-12-09 06:03
2009.02.01
нужна программа для построения блок схем