Скачать: CL | DM;

bmp не сделать   Найти похожие ветки 

← →
ВадимММ   (2009-12-15 21:58) [0]

IM: TImage;
кинута на форму, битмап делаем динамически
выравнивает по форме
IM.Left:=20;
IM.Top:=20;
IM.Height:=b;
IM.Width:=a;
IM.Picture.Bitmap.Create;
IM.Canvas.LineTo(0,0);
IM.Canvas.MoveTo(60,60);

где a и b>0 , битмапа нет, черточки не видать!

---

← →
zorik ©   (2009-12-15 22:05) [1]

LineTo и MoveTo поменять местами

---

← →
ВадимММ   (2009-12-15 22:08) [2]

поменял - ничего не произошло,
на форме бип не виден - по идее белым должен стать,
так как все точки цвета clWhite

---

← →
zorik ©   (2009-12-15 22:14) [3]

IM.Left:=20;
IM.Top:=20;
IM.Height:=b;
IM.Width:=a;
IM.Picture.Bitmap := TBitmap.Create;
IM.Picture.Bitmap.Width := a;
IM.Picture.Bitmap.Height := b;
IM.Canvas.MoveTo(0,0);
IM.Canvas.LineTo(a,b);

---

← →
zorik ©   (2009-12-15 22:16) [4]

Работает, но надо разобратся как устроен TImage и его Picture

---

← →
ВадимММ   (2009-12-15 22:37) [5]

спасибо работает,
да битмап надо IM.Picture.Bitmap := TBitmap.Create; вот так задать

---

← →
{RASkov} ©   (2009-12-15 22:57) [6]

> [5] ВадимММ   (15.12.09 22:37)
> да битмап надо IM.Picture.Bitmap := TBitmap.Create; вот
> так задать

не нужно ничего задавать
нужно родителя указать
IM:=TImage.Create({self});
IM.Parent:={Self};
IM.Left:=20;
IM.Top:=20;
IM.Width:=a;
IM.Width:=b;
IM.Canvas.MoveTo(0,0);
IM.Canvas.LineTo(a,b);

---

← →
{RASkov} ©   (2009-12-15 23:05) [7]

> IM.Width:=a;
> IM.Width:=b;

IM.Width:=a;
IM.Height:=b;

---

← →
zorik ©   (2009-12-16 14:36) [8]

> {RASkov} ©   (15.12.09 22:57) [6]


Image ведь кинут на форму написано в [1]

---

← →
{RASkov} ©   (2009-12-16 19:52) [9]

> [8] zorik ©   (16.12.09 14:36)
> Image ведь кинут на форму написано в [1]

Да, просмотрел.... но в любом случае строка:

> IM.Picture.Bitmap.Create;

или "исправленный" ее вариант:

> IM.Picture.Bitmap := TBitmap.Create;

Лишняя. Т.е. из кода в [6] убрать первые две сторки. Будет достаточно.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.007 c