Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Компоненты";
Текущий архив: 2005.09.04;
Скачать: [xml.tar.bz2];

Вниз

Проблема с ActiveX-контролом: "control ... has no parent window"   Найти похожие ветки 

 
3fc ©   (2004-10-13 08:12) [0]

Добрый день, уважаемые мастера!

Помогите, плиз, с данной проблемой. При регистрации ActiveX-компонента Delphi выдает вышеуказанное сообщение. Компонент выводит текст под произвольным углом средствами WinAPI. Код конструктора следующий:
...
type
 TRotateText = class(TWinControl)
 private
   Fdc: HDC;
...
constructor TRotateText.Create(AOwner: TComponent);
begin
 inherited Create(AOwner);
...
 Parent := nil;                      
 Fdc := GetDC(Handle); //далее использую Fdc при выводе текста
...
end;
...
Что я делаю не так?


 
Юрий Зотов ©   (2004-10-13 13:35) [1]

GetDC(Handle)

Обращение к хэндлу окна происходит в конструкторе, когда окно еще не создано. Перенесите в метод СreateWnd ПОСЛЕ вызова inherited. И уберите Parent := nil. А при выводе текста, если есть опасность, что окна еще нет, проверяйте HandleAllocated.


 
3fc ©   (2004-10-14 08:10) [2]

Юрий Зотов

Ок, спасибо за совет, все работает.



Страницы: 1 вся ветка

Форум: "Компоненты";
Текущий архив: 2005.09.04;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.012 c
14-1123910140
***_Diman_***
2005-08-13 09:15
2005.09.04
как с пом. wsprintf отрубить в дате столетия?


2-1061967116
Help
2003-08-27 10:51
2005.09.04
Узнать


3-1121960535
Djek
2005-07-21 19:42
2005.09.04
Вывод неповторяющегося значения поля в ComboBox


1-1124090537
Zadov
2005-08-15 11:22
2005.09.04
Как сохранить форму в файл?


14-1123777139
ДИМОН
2005-08-11 20:18
2005.09.04
Курсоры





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский