Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.08.03;
Скачать: CL | DM;

Вниз

Перестал работать компонент   Найти похожие ветки 

 
Alex_C   (2008-07-03 08:46) [0]

Непонятка. Сделал простеникий компонент, наследник от TMemo. Установил его в Дельфи, все нормально работало. А вот вчера при попытке разместить его на форме, пишет ошибку:
Control "" has no parent window
Пробовал переустанавливать - все тоже самое. В чем причина?


 
Dennis I. Komarov ©   (2008-07-03 09:08) [1]

Удалено модератором
Примечание: создание пустых сообщений...


 
Юрий Зотов ©   (2008-07-03 09:10) [2]

> Alex_C   (03.07.08 08:46)  

> В чем причина?

В коде компонента. Похоже, в конструкторе.


 
Alex_C   (2008-07-03 09:13) [3]

Код то простенький
 THxMemo = class(TMemo)
   constructor Create(AOwner: TComponent); override;
   destructor Destroy; override;
...
//*****************************************
constructor THxMemo.Create(AOwner: TComponent);
begin
 inherited Create(AOwner);
 Windows.HideCaret(Handle);
 // Уменьшение мерцания
 ControlStyle := ControlStyle + [csOpaque];
 WordWrap := True;
 DoubleBuffered := False;
 ReadOnly := True;
 IsTelnetMemo := False;
 HighlightURL := False;
 FImage := TBitmap.Create;
end;

Вроде как проблема только в конструкторе может быть... Вот только где?


 
Anatoly Podgoretsky ©   (2008-07-03 09:13) [4]

По запросу "Control has no parent window" Гугл выдает 2 500 000 ссылок.


 
Юрий Зотов ©   (2008-07-03 09:20) [5]

Windows.HideCaret(Handle);

Перенесите эту строку в метод CreateWnd (после inherited).


 
Anatoly Podgoretsky ©   (2008-07-03 09:23) [6]

А вот здесь есть обсуждение с участием Юрия
http://delphimaster.net/view/5-1181549169/&toprint=1


 
Alex_C   (2008-07-03 09:33) [7]

То Юрий Зотов: Большое спасибо! Все заработало.
Также спасибо Анатолию Подгорецкому за интересную ссылку по этому вопросу!


 
Anatoly Podgoretsky ©   (2008-07-03 10:36) [8]

> Alex_C  (03.07.2008 9:33:07)  [7]

Там вообще то несколько миллионов ссылок, и насколько я помню вопрос задается с 1995 года, потому и много.
Это к тому, что прежде стоило посмотреть в любой поисковой системе и достаточно просмотреть ответы только на первой странице.



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

Текущий архив: 2008.08.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.017 c
15-1213818601
Сергей_77
2008-06-18 23:50
2008.08.03
Ошибка установки, как побороть.


15-1213864819
Сергей_77
2008-06-19 12:40
2008.08.03
Виртуальная Машина


2-1215154961
lewka
2008-07-04 11:02
2008.08.03
Событие для ListBox


3-1203489861
Kolan
2008-02-20 09:44
2008.08.03
Как добавить в DataSet колонку.


2-1215265172
NaRuTo
2008-07-05 17:39
2008.08.03
Возникает вопрос с компонентом TTabbedNotebook