Текущий архив: 2003.04.24;
Скачать: CL | DM;
Вниз
Изменеие размеров Canvas Найти похожие ветки
← →
Alexander Vasjuk (2003-04-14 11:12) [0]Был ответ уже, хоть убей, не помню.
Как при увеличении TImage увеличить и ее Canvas, не пересоздавая компонент?
Спасибо заранее, мастера.
← →
MBo (2003-04-14 11:21) [1]у свойства Bitmap обнови размеры
← →
Diouzshev (2003-04-14 11:25) [2]Canvas и так имеет размеры ограниченные только системой (ОС).
Попробуй метод Invalidate, чтобы перерисовать компонент.
← →
Alexander Vasjuk (2003-04-14 11:31) [3]MBo © (14.04.03 11:21)
Я не пользуюсь Битмапом, рисую прямо на санве
Diouzshev © (14.04.03 11:25)
Да, но если я начал на нем рисовать он принимает размер image и больше его не меняет.
Invalidate попробую...
← →
Skier (2003-04-14 11:36) [4]
procedure TForm1.Button1Click(Sender: TObject);
procedure DrawOnImage(AImage : TImage;
const AWidth, AHeight : Integer;
const AColor : TColor);
begin
if Assigned(AImage) then begin
AImage.AutoSize := False;
AImage.Width := AWidth;
AImage.Height := AHeight;
AImage.Canvas.Brush.Color := AColor;
AImage.Canvas.FillRect(Rect(0, 0, AImage.Width, AImage.Height));
end; //if
end; //DrawOnImage
Begin
DrawOnImage(Image1, 70, 70, clNavy);
End;
← →
Alexander Vasjuk (2003-04-14 12:25) [5]Skier © (14.04.03 11:36)
Ну а если теперь АImage.Width := АImage.Width * 2;
то Canvas останется прежнего размера.
← →
MBo (2003-04-14 12:36) [6]Повторю для особо упрямых
Image.Picture.Bitmap.Width:=Image.Width;
← →
Alexander Vasjuk (2003-04-14 13:04) [7]MBo © (14.04.03 12:36)
Все-все-все, изменяю...
MBo, а почему именно Bitmap а не Picture. Когда я рисую на канве, я автоматически меняю Bitmap?
(Мой проект дома, я на работе, поэтому немедленно не могу проверить а лишь уточняю, извини)
← →
icWasya (2003-04-14 14:44) [8]>Когда я рисую на канве, я автоматически меняю Bitmap?
При первом обращении к TImage.Canvas , если Image.Picture = Nil? автоматически создаётся Bitmap с размерами Image и рисуется именно на этом Bitmap"е.
← →
Alexander Vasjuk (2003-04-14 20:03) [9]Это для меня откровение.
Спасибо, мастера
Страницы: 1 вся ветка
Текущий архив: 2003.04.24;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.007 c
