Текущий архив: 2004.09.12;
Скачать: CL | DM;
Вниз
TCustomDockForm.Caption:= ??????? Найти похожие ветки
← →
NeVIP © (2004-08-27 18:45) [0]Бодрого времени суток!
Появилась проблема с 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) [1]Up
Страницы: 1 вся ветка
Текущий архив: 2004.09.12;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.027 c
