Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.04.24;
Скачать: [xml.tar.bz2];

Вниз

Изменеие размеров 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
14-77112
sucer
2003-04-04 15:52
2003.04.24
Кто такой Рихтер?Что за книгу он написал?


1-76965
tararasyk
2003-04-11 20:09
2003.04.24
Timer и цикл


1-76916
Ольга
2003-04-03 20:11
2003.04.24
Работа с файлами.


14-77122
Андрей22
2003-04-07 20:28
2003.04.24
Где можно найти исходники для программы


1-76905
Arch-vile
2003-04-11 23:00
2003.04.24
Процедура sleep





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский