Можно ли положить форму на форму?

← →
Sakipiel (2014-07-08 14:49) [0]

Сделал я дизайнер форм, у меня это форма, на ней таб контрол и скрол бокс, а на них положена панель, к которой пририсован заголовок (полоска с именем как у формы), которая и изображает проектируемую форму. А в рантайме вместо панели создается уже настоящая TFORM (ну ее наследник). Подобный подход вызывает массу неудобств т.к. при сохранении и загрузке данных приходится учитывать разницу между панелью и ее свойствами и формой. В связи с чем возникает вопрос, можно ли вместо панели вставить TFORM, но чтобы выглядело это как сейчас.

з.ы. позже добавлю картинку...

← →
Sakipiel (2014-07-08 14:54) [1]

http://s019.radikal.ru/i619/1407/f2/18fa6116a659.png

← →
brother © (2014-07-08 14:54) [2]

бред

← →
Игорь Шевченко © (2014-07-08 15:30) [3]

Можно

STFW: TForm, WS_CHILD

← →
Sakipiel (2014-07-08 16:08) [4]

эм....ну допустим, а как запретить ее перемещать по форме? чтобы только ресайз работал да и то только вправо и вниз чтобы можно было менять размер. И как запретить ей закрываться по крестику....

← →
Sakipiel (2014-07-08 19:58) [5]

мде

FormPrototype := TForm.Create(self); FormPrototype.Top := 3; FormPrototype.Width := 3; FormPrototype.Visible := true; FormPrototype.Parent := ScrollBox1; FormPrototype.FormStyle := fsStayOnTop; FormPrototype.Name := "Form1"; FormPrototype.BorderStyle := bsDialog;

сделал так, в результате, он мне выводит форму без шапки, это нормально? вроде же сделал FormPrototype.BorderStyle := bsDialog; а выглядит так как будто FormPrototype.BorderStyle := bsNone;

← →
Sakipiel (2014-07-08 20:19) [6]

мда.....при запуске к форме еще подгружались все свойства, но т.к. раньше я сохранял свойства панели, то собственно, к новой форме свойства старой панели и подгружались, и тут я удалил базу данных и запустил это счастье с нуля....в результате получается кошмар, форма не лежит на паренте, а возникает где то отдельно от остального приложения ( теперь нужно выяснить что же такого полезного загружалось, что она хотя бы в нужном месте была )

← →
Sakipiel (2014-07-08 20:27) [7]

Удалено модератором
Примечание: Выражения выбираем, не в пивной

← →
Sakipiel (2014-07-08 20:31) [8]

о все, bsSizeable тогда вроде норм...

Осталась одна мега проблема, я могу эту форму сдвинуть с места, чего быть не должно, попробовал в OnMouseMove при входе с нажатой левой клавишей мыши присваивать для Top и Left одни и те же координаты, но почему то это не работает...

← →
Юрий Зотов © (2014-07-08 23:37) [9]

> Sakipiel

Если все это просто потому, что интересно, то смысл есть.

А если нужно получить реальный результат (притом в 100500 раз лучше Вашего), то надо использовать готовый дизайнер.

← →
Sakipiel (2014-07-09 09:15) [10]

align = alCustom закрепляет форму на месте. теперь проблема в том, что перестала работать OnKeyUP на форме, причем пробовал ставить KeyPreview на обоих формах, и нифига (

← →
Sakipiel (2014-07-09 09:18) [11]

> А если нужно получить реальный результат (притом в 100500
> раз лучше Вашего), то надо использовать готовый дизайнер.
>

за готовый надо чатлами платить, родной. вот когда я заработаю на этом 15к тогда да, а так... причем можно купить, а там лажа полная ну вот как FastReport + FastScript и в любом случае нет такого готового, которое не придется дописывать.

← →
Inovet © (2014-07-09 11:05) [12]

> [11] Sakipiel (09.07.14 09:18)
> там лажа полная ну вот как FastReport + FastScript

Подробнее: в каком месте "там лажа полная" и там ли лажа или в другом месте?

← →
Юрий Зотов © (2014-07-09 13:12) [13]

> Sakipiel (09.07.14 09:18) [11]

Что ж, удачи!
:o)

PS
Есть пословица: "Дорогу осилит идущий". И это правда, он ее рано или поздно действительно осилит. Только не дай ему Бог в конце пути понять, что это была не та дорога.

← →
Sakipiel (2014-07-09 20:34) [14]

Почему если зажать левую кнопку мыши на баттоне и вести мышь в сторону, то событие Маус мув работает для баттона, даже если мы вышли курсором мыши за его границы, тоже самое и для лабел и для чек бокс. НО для Мемо и Edit это почему то работать перестало, т.е. когда мы нажимаем левую кнопку внутри мемо и "тащим" его в сторону, то в маус мув оно заходит лишь до тех пор, пока курсор мыши в пределах контрола, а затем события в контрол уже не приходят. Когда родителем была панель, такого не было. В чем может быть проблема?

← →
Sakipiel (2014-07-09 23:06) [15]

общем все понято, форма на форме никогда не активна, но более того, если щелкнуть по контролу на этой неактивной форме или на ней самой, то форма владелец всего этого не получит фокус. Хоть и дочерняя форма обрабатывает все события, поэтому главная форма, не получив фокус и не обрабатывает keyPreview. А некоторые контролы, и странно что не все почему то не захватывают мышку при нажатии кнопки на ней. пришлось на любой клик насильно давать фокус главной форме, а при маусдауне

if Sender is TWinControl then SetCapture((Sender as TWinControl).Handle);

захватывать мышку для контрола. Вроде дела пришли в норму после этого...

> Sakipiel (09.07.14 23:06) [15]
>
> общем все понято

Как использовать пассатижи в качестве отвёртки, паяльника, вольтметра и т.д. уже понятно? Или работа продолжается? Успехов в безнадёжном деле!
:)

← →
Sakipiel (2014-07-10 03:17) [17]

вы ж тока критикуете, ничему не учите, так что приходится делать то, что может предложить мой ограниченный ум, и дела мои и на вашей совести также, не научили же.

Удалено модератором

Sakipiel (10.07.14 03:17) [17]

Чтобы моя совесть была чиста, я тебя забаню. Во избежание.

Можно ли положить форму на форму? Найти похожие ветки