Главная страница
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.045 c
14-1103288551
shurik_212
2004-12-17 16:02
2005.01.09
Точка на цифровой клаве


3-1102484477
Sirus
2004-12-08 08:41
2005.01.09
EXTERNAL FILE при создании таблицы в Interbase...


14-1103272598
Kerk
2004-12-17 11:36
2005.01.09
Свобода слова на форуме.


3-1101964594
Sirus
2004-12-02 08:16
2005.01.09
Нужно подробное описание работы объединения JOIN


4-1101205001
clickmaker
2004-11-23 13:16
2005.01.09
Правка итема в листвью закрывает диалог