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

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.028 c