Форум: "Основная";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Вниз

Перетаскивание control ов во время выполнения проги   Найти похожие ветки 

← →
Ilja   (2003-01-06 23:27) [0]

Как сделать чтобы пользователь мог при выполнении программы перетаскивать элементы управления, например кнопкиж, или вообще любые элементы (StringGrid, TreeView ...)???

PS: И если можно с простеньким примером.

---

← →
Rouse_   (2003-01-06 23:49) [1]

Вот на примере TMemo

procedure TForm1.Memo1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Memo1.Perform(WM_SYSCOMMAND, $F012, 0);
end;

Желаю успехов

---

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

Форум: "Основная";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c