Увеличение размера Image->Canvas
на форме ToolBar с кнопкой, Edit1 и Image1 с Align=alClient.
При уменьшении размера формы все работает нормально, а при
увеличении белый прямоугольник первоначального размера Image1
не изменяется, за его пределами ничего не рисуется и Image1 мерцает.
В Edit1 размеры выводятся правильные. Как это объяснить или исправить? И что такое этот белый прямоугольник?
Код:
void __fastcall TForm1::ToolButton1Click(TObject *Sender)
{
Image1->Canvas->Pen->Color=clRed;
Image1->Canvas->MoveTo(0,0);
Image1->Canvas->LineTo(Image1->Width-1,Image1->Height-1);
Edit1->Text=String(Image1->Height)+" "+String(Image1->Width);
}
Вопрос видимо простой, но не могу понять. Может кто подскажет
на форме ToolBar с кнопкой, Edit1 и Image1 с Align=alClient.
При уменьшении размера формы все работает нормально, а при
увеличении белый прямоугольник первоначального размера Image1
не изменяется, за его пределами ничего не рисуется и Image1 мерцает.
В Edit1 размеры выводятся правильные. Как это объяснить или исправить? И что такое этот белый прямоугольник?
Код:
void __fastcall TForm1::ToolButton1Click(TObject *Sender)
{
Image1->Canvas->Pen->Color=clRed;
Image1->Canvas->MoveTo(0,0);
Image1->Canvas->LineTo(Image1->Width-1,Image1->Height-1);
Edit1->Text=String(Image1->Height)+" "+String(Image1->Width);
}
Используй в TImage Proportional. Вот что написано в Help-е:
Indicates whether the image should be changed, without distortion, so that it fits the bounds of the image control.
__property bool Proportional = {read=FProportional, write=SetProportional, default=0};
Description
Set Proportional to true to ensure that the image can be fully displayed in the image control without any distortion such as occurs with the Stretch property. When Proportional is true, images that are too large to fit in the image control are scaled down (while maintaining the same aspect ratio) until they fit in the image control. Images that are too small are displayed normally. That is, Proportional can reduce the magnification of the image, but does not increase it.
When the image control resizes, the image resizes also.
To resize the image so that it fits exactly in the image control, even if that causes distortion, use the Stretch property instead.
To resize the control to the image rather than resizing the image to the control, use the AutoSize property instead.
The default value for Proportional is false.
Note: Proportional has no effect if the Picture property contains an icon.