DLL и TTabsheet

← →
snake1977 (2004-02-02 18:53) [0]

Здравстуйте! Как передать из DLL не форму , а например TTabSheet со всеми контролами расположенными на нем?

← →
clickmaker (2004-02-02 19:09) [1]

А зачем нужен один табшит? Можно тогда фреймы юзать

← →
snake1977 (2004-02-02 19:10) [2]

Модулей много,основной экзешник должен открывать окошко а все модули так сказать внедрять туда свои TabSheet

← →
snake1977 (2004-02-02 20:13) [3]

Сам решил эту проблемму :)
вышло конечно может и не красиво, зато рещультат на лицо :)
Делаю просто: в DLL создаю обычный наследник от TForm, размещаю на нем все контролы какие нужны, а далее такой финт ушами (а может и нет). Просто в оссновной программе создаю модальную форму на событие onCreate навешиваю создание TabSheet по количеству DLL для каждого из которых вызываю функцию параметром для которой служит созданный TTabsheet (естественно в каждой DLL эта функция описана одинаково). А в DLL таким образом
procedure MakeSheet(parent:TTabsheet); stdcall;
Var fr:TForm3;
Begin
fr:=TForm3.create(Parent);
fr.ParentWindow:=Parent.Handle;
fr.Show;
end;

получается изюмительно :) только у формы form3 надо поставить свойство BorderStyle в bsNone и свойство WindowState в wsMaximized.

DLL и TTabsheet Найти похожие ветки