TCustomDockForm.Caption:='???????' [D5, D7, Win95/98]
NeVIP © (2004-08-27 18:45:00)
Бодрого времени суток!
Появилась проблема с TCustomDockForm...
Использую я интерфейс Drag&Dock, переносисмым
объектом являеться, ну, скажем - кнопка, приёмником
некая панель. Когда я отпускаю кнопку вне
компонента - прёмника, то как известно, для этого
случая создаётся окно - носитель; и хочется
задать Caption этого окна, но в этом то и проблема...
Вот форма носитель :
type
TDockForm = class(TCustomDockForm)
public
constructor Create(AOwner: TComponent); override;
end;
constructor TDockForm.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
BorderIcons:=[];
// Пытаюсь задать текст в заголовке
Caption:='Положь обратно!';
Width:=300;
end;
Связываю :
procedure TCSKForm.FormCreate(Sender: TObject);
begin
Button1.FloatingDockSiteClass:=TDockForm;
end;
BorderIcons:=[]; - работает на Ура!, а вот Caption не
отображается никак...
Подскажите как с этим бороться.
Respect.
NeVIP (2004-08-27 21:28:00) [1]
Up
Наверх 
ЧАТ |
Орешник |
|
