Главная страница
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.013 c
2-1229435530
nonamez11
2008-12-16 16:52
2009.02.01
поиск в строке


15-1228473709
GanibalLector
2008-12-05 13:41
2009.02.01
работа с девайсом по GPRS. Как ???


2-1229785639
neveGreen
2008-12-20 18:07
2009.02.01
совместимость версий Делфи


2-1229451823
smartleds
2008-12-16 21:23
2009.02.01
Еще вопрос, у меня долго прорисовывается форма


1-1207128097
Leon161
2008-04-02 13:21
2009.02.01
работа в ячейке StringGrid с различными объектами.