Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TEdit>мой компонент


Vice____ ©   (2007-11-13 00:01:00) 

создаю наследника от TEdit`a и пытаюсь зарисовать рамку на свою!
каким способом ето можно сделать ???????????


homm   (2007-11-13 07:29:00) [1]

> [5] KilkennyCat ©   (13.11.07 01:08)
> Разве от TCustomEdit сплясать не получится?

Получится. От него и надо плясать. Просто в моем понимании это все-же не «глубже», а то-же самое и есть ;)


KilkennyCat   (2007-11-13 01:28:00) [2]

гм...


Vice____   (2007-11-13 01:26:00) [3]


> KilkennyCat ©   (13.11.07 01:08) [5]
> Разве от TCustomEdit сплясать не получится?

не получится иначе не спрашивал бы)


KilkennyCat   (2007-11-13 01:08:00) [4]


> homm ©   (13.11.07 01:07) [4]


Разве от TCustomEdit сплясать не получится?


homm   (2007-11-13 01:07:00) [5]

> [2] KilkennyCat ©   (13.11.07 00:58)

нет.


> создаю наследника от TEdit`a и пытаюсь зарисовать рамку
> на свою!

NCPAINT. Рамка — это NC — НеКлиентския часть окна.


Vice____   (2007-11-13 01:05:00) [6]


> KilkennyCat ©   (13.11.07 00:58) [2]
>
> ну, наверное не от Тэдика надо создавать, а чуть глубже
> копнуть.

от TObject


KilkennyCat   (2007-11-13 00:58:00) [7]

ну, наверное не от Тэдика надо создавать, а чуть глубже копнуть.


Vice____   (2007-11-13 00:37:00) [8]

нифига не работает зарисовывыется все кроме рамки
CCan:TControlCanvas;
CCan := TControlCanvas.Create;
CCan.Control:=self;

или
Can:TCanvas
Can.Handle:=GetDc(handle);

или
Brush: HBrush;
Brush := CreateSolidBrush(clRed);
FillRect(GetDC(self.WindowHandle),Rect(-5,-5,25,25),Brush);


Наверх

Титульная страница Поиск, карта сайта Написать письмо