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

Вниз

Окаймление для Edit.   Найти похожие ветки 

 
denik   (2004-12-21 20:39) [0]

Подскажите пожалуйста, как поменять цвет бордюра Edit`a на какой-нибудь свой.


 
Yanis ©   (2004-12-21 22:56) [1]

Ручками наверное надо делать. Сделай компонент на основе TEdit. Посмотри Frame3D.


 
denik   (2004-12-21 23:50) [2]

Зачем мне создавать новый компонент. Мне нужно только сделать бордюр Edit`a синим цветом.

Как рисовать на Edit`e?


 
Yanis ©   (2004-12-22 00:30) [3]

> Как рисовать на Edit`e?
Нарисовать то можно. Хотя бы вот так:


var
 c: TCanvas;
begin
 C := TCanvas.Create;
 with c do
   begin
     Handle := GetDc(Edit1.Handle);
     Pen.Color := clBlue;
     Brush.Style := bsClear;
     Rectangle(Edit1.ClientRect);
   end;
 C.Free;

Только Edit все время придётся прерисовывать.


 
DVM ©   (2004-12-22 10:17) [4]

Переопределить оконную процедуру его и в WM_PAINT добавить рисование рамки после вызова стандартной процедуры обработки сообщения. С темами XP возможны проблемы.



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
14-1103479570
Cobalt
2004-12-19 21:06
2005.01.09
.Net


8-1096551619
Yustas
2004-09-30 17:40
2005.01.09
Меню во Flash


3-1101907432
Yurij-7
2004-12-01 16:23
2005.01.09
защита БД


3-1102476143
dolphin
2004-12-08 06:22
2005.01.09
filter глюкует в инспекторе пашет а програмно нет


1-1103823883
focor
2004-12-23 20:44
2005.01.09
EnabledButton