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

Вниз

Динамическое создание TFont, TPen   Найти похожие ветки 

 
konstantinov ©   (2003-06-11 19:55) [0]

Как правильно это сделать?
Пишу:
var Pen: array of TPen;
begin
Setlength(Pen,5);
for i:=0 to 4 do
begin
Pen[i].Create;
Pen[i].Assign(Image1.Canvas.Pen);
end;
Вылетает нарушение прав доступа....

end;


 
clickmaker ©   (2003-06-11 19:58) [1]

Pen[i].Create;

А за такое можно и партбилет на стол положить...

Pen[i] := TPen.Create;



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

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

Наверх




Память: 0.46 MB
Время: 0.016 c
4-84814
1g0r
2003-04-22 13:53
2003.06.26
глубина цвета в HBITMAP, созданной CreateCompatibleBitmap()


3-83860
Empleado
2003-05-27 12:19
2003.06.26
SQL update в одной транзакции


14-84554
Leon_M@ni@k
2003-06-07 17:57
2003.06.26
СРОЧНО СРОЧНО - считанные Часы остались - помогите с отбором инфы


1-84077
Jedi K
2003-06-10 11:17
2003.06.26
потоки


3-83951
yaric
2003-06-03 21:45
2003.06.26
Временные курсоры в теле хранимых процедур