Как сохранять позицию компонетв после закрытия программы

← →
-=SV=- (2009-11-05 20:05) [0]

Доброе время суток в программе реализоват перетаскивание копонентов по форме с помощью кода:
procedure TForm1.sBitBtn7MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); const SC_DRAGMOVE = $F012; begin ReleaseCapture; sBitBtn7.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0); end;

И после закрытия программы всё стаёт на свои места.
Как сохранить на том месте как оставил?

← →
Kolan © (2009-11-05 21:28) [1]

Не как, а где?

В ини-файле, в базе...

← →
Медвежонок Пятачок © (2009-11-05 21:35) [2]

Как сохранять позицию

Разве это все?
Сохранить можно в ста местах сотней способов.

Но после закрытия при следующем запуске все контролы снова встанут на места определенные в dfm

← →
TIF © (2009-11-05 22:14) [3]

По способы сохранения см. тут, например:
http://delphimaster.net/view/2-1257362090/

Алгоритм:
* При выходе из программы записать в выбранный источник хранения (файл/реестр) координаты компонентов
* При запуске - считать оттуда записанные координаты и присвоить их компонентам

← →
Германн © (2009-11-06 02:14) [4]

Для самых ленивых подойдёт компонент из RxLib TFormStorage.

← →
-=SV=- (2009-11-06 12:07) [5]

> Для самых ленивых подойдёт компонент из RxLib TFormStorage.

А теперь подробней.что для чего он нужен,и как им пользоватся и где его взять.

← →
Amoeba © (2009-11-06 12:41) [6]

http://www.delphiplus.org/
раздел Бесплатно | Rx Library

> как им пользоватся

Поместить на форму и настроить нужные св-ва. Подробности в справке к библиотеке.

← →
-=SV=- (2009-11-06 13:42) [8]

В каком способе меньше и эфективнее код использовать?

меньше кода тогда, когда вообще не программируешь

Как сохранять позицию компонетв после закрытия программы Найти похожие ветки