Текущий архив: 2003.06.26;
Скачать: CL | DM;
Вниз
Drag&Drop Найти похожие ветки
← →
Михайлов Антон © (2003-06-11 01:40) [0]Когда я начинаю перетаскивать панельку, у меня появляется какбы отдельное окошко (со строкой заголовка, с кэпшеном и т.п.). Но его размеры можно менять :(
Как сделать чтобы нельзя было изменить размер???
← →
Proton © (2003-06-11 01:55) [1]В указанных версиях есть пример...
← →
Михайлов Антон © (2003-06-11 02:00) [2]чё-то не нашёл...
А мож примерчик напишите?
← →
Babay © (2003-06-11 04:47) [3]Лювой наследник от TControl можно перетаскивать например так
Для панели:
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
const
SC_DragMove = $F012; { a magic number }
begin
ReleaseCapture;
panel1.perform(WM_SysCommand, SC_DragMove, 0);
end;
нашел это по моему в советах от Озерова.
← →
Михайлов Антон © (2003-06-11 12:04) [4]Неетт... дело в том, что мне нужно это окошко...
Мне не нужно, чтобы оно могло менять размер. Ну тоесть отключить Sizeble у этого окна
← →
Набережных С. © (2003-06-11 18:02) [5]property FloatingDockSiteClass
Страницы: 1 вся ветка
Текущий архив: 2003.06.26;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.041 c
