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

Вниз

Рамка   Найти похожие ветки 

 
Hyboid   (2004-11-02 22:32) [0]

Как проще всего сделать черную рамку вокруг Memo шириной в один пиксел ?


 
DrPass ©   (2004-11-02 22:43) [1]

Это задачка на сообразительность. Ты должен решить ее сам


 
Hyboid   (2004-11-02 22:49) [2]

Перепробовал все варианты с полями:
BevelInner
BevelKind
BevelOuter
BorderStyle
- не помогает... =(


 
DrPass ©   (2004-11-02 23:06) [3]

Положи под нее TPanel черного цвета, или TShape, или на канве формы рисуй четыре черные линии. Или... в общем, вариантов миллион


 
Stexen   (2004-11-03 02:23) [4]

ну так по-моему не плохо:

...
var
 DC: HDC;
 Indx, Indy: integer;
begin
 DC := GetDC(Memo1.ParentWindow);
 Rectangle(DC, Memo1.Left - 1, Memo1.Top - 1, Memo1.Left + Memo1.Width + 1, Memo1.Top + Memo1.Height + 1);
end;

куда нибудь на OnPaint повесь, должно работать но не обещаю импровезировал!


 
Kair ©   (2004-11-03 10:49) [5]

BorderStyle := bsSingle;
Ctl3D := False;



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

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

Наверх




Память: 0.47 MB
Время: 0.039 c
14-1099495858
Drakon
2004-11-03 18:30
2004.11.21
Философский вопрос


4-1097056444
BVV
2004-10-06 13:54
2004.11.21
Получения списка файлов


14-1099423377
ArMellon
2004-11-02 22:22
2004.11.21
Привет всем пишу чат на PHP но тормознулся на


3-1098682997
Gloomer
2004-10-25 09:43
2004.11.21
Как узнать, установлена ли BDE на компе


1-1099474155
dimbo
2004-11-03 12:29
2004.11.21
блокировка ctrl+alt+del