Как поместить Форму на TabSheet?

← →
Blacked © (2003-02-01 01:23) [0]

Как поместить Форму на TabSheet?
пробывал:

var S:TMyForm;
begin
S:=TMyForm.CreateParent(TabSheet1.Handle);
// или
// S:=TMyForm.Create(TabSheet1);
S.Parent:=TabSheet1.Handle;
S.Visible:=True;
S.Show;
end;

не выходит...что не так???

← →
Johnmen © (2003-02-01 01:29) [1]

Зачем же так бредить ?!
Может будет достаточно TFrame ?

← →
Blacked © (2003-02-01 01:33) [2]

У меня форма уже создана, и с довольно большим исходником. Создавать всё заново это слишком... Хочу поставить bsNone и выводить на TabSheet...

← →
Johnmen © (2003-02-01 01:41) [3]

Еще раз - может разобраться в сущности и назначении классов ?
В частности TForm ?

← →
Blacked © (2003-02-01 01:49) [4]

...я спрашивал как это сделать...
...что разве невозможно разместить форму на TabSheet... это же тоже окно....а как и любое другой окно оно может выводиться на любые другие окна...на API я бы уже это сделал... а вот как с VCL?

← →
Johnmen © (2003-02-01 01:59) [5]

Я не понял, мы говорим о классе TForm или о созданном тобой ?
Если тобой, то ничто не мешает сконструировать такой, который накроет все твои пожелания...Но ! Времени у тебя на это уйдет не меньше, чем просто задействовать TFrame с необходимыми параметрами...

Вообщемно о моём классе, но вопрос снимаеться, я уже всё решил с TFrame. Спасибо!

← →
Кри Кри (2003-02-02 00:19) [7]

procedure TForm3.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.Style := Params.Style or WS_CHILD;
end;

Как поместить Форму на TabSheet? Найти похожие ветки