Проблема с Image

[Hsilgos]

Короче... На форме компонент Image.
В событии Resize формы - Image так же меняет свой размер пропорционально.
(
Image1.Height := Form1.Height;
Image1.Width := Form1.Width;
)
Но в там, где Image увеличился, нельзя ничего рисовать. Как справится с это проблемой?

 

[zubr]

<!--QuoteBegin-Hsilgos+6:07:2004, 19:47 -->
<span class="vbquote">(Hsilgos @ 6:07:2004, 19:47 )</span><!--QuoteEBegin-->Короче... На форме компонент Image.
В событии Resize формы - Image так же меняет свой размер пропорционально.
(
Image1.Height := Form1.Height;
Image1.Width := Form1.Width;
)
Но в там, где Image увеличился, нельзя ничего рисовать. Как справится с это проблемой?[/quote]
Установи свойство Stretch в True
Image1.Stretch:=True;

 

[Hsilgos]

Установи свойство Stretch в True
Image1.Stretch:=True;

Немного не то... мне не нужно расстягивание изображения...

 

[Barmutik]

А зачем в TImage рисовать ? Используй TPaintBox...

 

[Hsilgos]

Во, нашел как :

Image1.Picture.Bitmap.Width:=Image1.Width;
Image1.Picture.Bitmap.Height:=Image1.Height;