我使用Delphi和我创建的类型TImage丝毫的十个元素的数组这个名字和结构: Form3.images[1..max] of TImage.
我试图初始化它这样: for x := 1 to max do
begin
images[x] := TImage.Create(Form3);
images[x].AutoSize := True;
images[x
我想用这将在下文中提到 { to resize the image }
function ResizeImg(maxWidth,maxHeight: integer;thumbnail : TBitmap): TBitmap;
var
thumbRect : TRect;
begin
thumbRect.Left := 0;
thumbRect.Top := 0;
if thumb