-
Дмитрий (14.03.13 00:51) [0]Доброго времени суток!
Есть проблема при рисовании эллипса с координатами из 2 label. Один label нужен для координаты x, а другой для координаты y.
Мои попытки не увенчались успехом.
procedure TForm1.Button5Click(Sender: TObject);
var x,y:Integer;
begin
X:= StrToint(label37.Caption);
Y:= StrToint(label38.Caption);
image1.canvas.Ellipse((x)-2, (y)-2, (x)+2, (y)+2);
end;
Выдает ошибку: Can only modify an image if it contains a bitmap.
А еще если значение не целое, а они по формуле часто получаются не целые выдает: (например) "13.5" is not a valid integer value.
Добрые люди! Помогите справиться с этими 2 ошибками. -
brother © (14.03.13 06:22) [1]image1.bitmap.canvas.Ellipse
-
MBo © (14.03.13 07:30) [2]>А еще если значение не целое,
Тогда сделать StrToFloat и округлить до целого Round -
Медвежонок Пятачок © (14.03.13 10:02) [3]Тогда сделать StrToFloat
лучше наоборот. FloatToStr.
Тому, что по формуле часто получаются -
antonn © (16.03.13 13:24) [4]
> brother © (14.03.13 06:22) [1]
>
> image1.bitmap.canvas.Ellipse
вероятно и bitmap не поможет, т.к. скорее всего у него там jpeg какой нибудь -
О-Сознание (18.03.13 18:07) [5]
> antonn © (16.03.13 13:24) [4]
>
>
> > brother © (14.03.13 06:22) [1]
> >
> > image1.bitmap.canvas.Ellipse
>
> вероятно и bitmap не поможет, т.к. скорее всего у него там
> jpeg какой нибудь
Да было такое.
Долго не мог понять чего не работает.