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

Вниз

Создание своих VCL   Найти похожие ветки 

 
Andre V.   (2002-04-08 10:24) [0]

Различие в design и run-time режимах
Свой визуальный компонент (от TRadioButton, TBitBtn и т.д.) в режиме design отображается нормально, в режиме run-time:
1. не отображается
2. отображается неправильно
3. наследуемые методы не вызываются
4. свои собственные методы (public) не вызываются
ЧТО ЭТО ТАКОЕ, С ЧЕМ ЕГО ЕДЯТ
P.S. Некоторые классы из того же файла работают корректно


 
MBo ©   (2002-04-08 13:33) [1]

вопросы неконкретные.


 
Andre V.   (2002-04-09 10:42) [2]

Уточняю: класс, наследник TBitBtn. Вставляю ейный компонент в форму. Ну его естественно видно, проперты разные у него есть,
установить их можно, поменять и т. д.
Компилирую, линкую, запускаю. Нет моего компонента. Его вооще
не видно. ГДЕ WMPaint?
Аналогично - наследник TRadioButton. Вызывается WMPaint для
TRadioButton.
КОНКРЕТНО:
написано:


private
{ Private declarations }
...
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
...

далее

procedure TSSRadioButton.WMPaint( Var Message : TWMPaint );
Var
AControlState : TControlState;
begin
AControlState := ControlState;
Include( AControlState, csCustomPaint );
ControlState := AControlState;
inherited;
Exclude( AControlState, csCustomPaint );
ControlState := AControlState;
end;

procedure TSSRadioButton.PaintWindow( DC : HDC );
begin
FCanvas.Lock;
try
FCanvas.Handle := DC;
try
TControlCanvas(FCanvas).UpdateTextFlags;
Paint;
finally
FCanvas.Handle := 0;
end;
finally
FCanvas.Unlock;
end;
end;

procedure TSSRadioButton.Paint;
begin
... рисуются феньки...
end;


Вот этих самых фенек и не видно в режиме run-time


 
Игорь Шевченко ©   (2002-04-09 10:48) [3]

День добрый,

Отладчик в руки - и вперед!

С уважением,


 
Andre V.   (2002-04-09 11:15) [4]

Г-ну Шевченко!
Че отлаживать то?
На мой код не выходит. А отлаживать саму Винду???

С уважением,


 
Игорь Шевченко ©   (2002-04-09 11:20) [5]

День добрый, Andre V,

Отлаживать, начиная с TSSRadioButton.WMPaint, TWinControl.WMDrawItem, TWinControl.WMMeasureItem
Для этого создавать свой компонент динамически в run-time и поэтапно смотреть, какие сообщения он вообще обрабатывает.
Кстати, CNDrawItem компоненту от TBitBtn приходит ?

С уважением,



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

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

Наверх




Память: 0.48 MB
Время: 0.019 c
4-70074
Delphi
2002-02-15 21:54
2002.04.22
Win API


14-69996
Oleg Gashev
2002-03-14 22:46
2002.04.22
Release Notes


3-69744
vasilly
2002-04-01 08:43
2002.04.22
Нельзя сохранить из дельф больше чем 256 символов в MS SQL!!!


1-69934
Yaro
2002-04-04 05:59
2002.04.22
Что такое INTERFACE и с чем его едят?


3-69730
NickVal
2002-04-01 16:28
2002.04.22
Paradox : Динамическое изменение параметра индекса