Главная страница
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.024 c
6-1098117504
L.evil
2004-10-18 20:38
2005.01.09
Indy


11-1084948870
RTWolf
2004-05-19 10:41
2005.01.09
Как в заголовок столбца вставить прозрачную картику?


4-1100687524
z0ne
2004-11-17 13:32
2005.01.09
Размеры страницы принтера


4-1101359324
Sik
2004-11-25 08:08
2005.01.09
Контейнер ключей в Крипто-Про


3-1102493647
Ученик
2004-12-08 11:14
2005.01.09
Статический алиас для BDE