Главная страница
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.165 c
14-1103541931
Игорь Шевченко
2004-12-20 14:25
2005.01.09
В продолжение темы о дебилизации: читать наизусть


1-1103738277
Petruchello
2004-12-22 20:57
2005.01.09
Дайте исходник чистильщика...


1-1103812351
stelius
2004-12-23 17:32
2005.01.09
Факториал


4-1100809345
Apophis
2004-11-18 23:22
2005.01.09
Обновление списка оборудования ОС


1-1103564105
Roo
2004-12-20 20:35
2005.01.09
Косяк с высотой Edit-ов