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

Вниз

Линия на форме   Найти похожие ветки 

 
Leonardo   (2006-04-24 20:35) [0]

Нужно нарисовать линию на форме при запуске и при дальнейшем растягивании формы чтобы она всегда была по всей ширине формы:


procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Canvas.Pen.Color := $00CBC7C2;
Form1.Canvas.MoveTo(0, 19);
Form1.Canvas.LineTo(Form1.ClientWidth, 19);
end;


не рисуется в FormCreate, что делать?


 
Джо ©   (2006-04-24 20:36) [1]

> не рисуется в FormCreate, что делать?

Рисовать в OnPaint.


 
Desdechado ©   (2006-04-24 21:39) [2]

а можно использовать TBevel с якорями


 
Hitkliff ©   (2006-04-26 09:08) [3]

Либо рисуй в procedure TForm1.FormResize(Sender: TObject);



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

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

Наверх




Память: 0.47 MB
Время: 0.044 c
15-1145278029
Piter
2006-04-17 16:47
2006.05.14
Какие у Задорнова есть выступления и программы?


3-1143039657
Ega23
2006-03-22 18:00
2006.05.14
Text vs. Image Data Type


2-1146143540
mfender
2006-04-27 17:12
2006.05.14
События в компоненте


3-1142856484
GL00m
2006-03-20 15:08
2006.05.14
Не работает INSERT при работе с БД Access...


4-1140098164
Nick Denry
2006-02-16 16:56
2006.05.14
Требуется наарисовать эллипсградиентный и с увеличивающейся прозр