delphi7 constructor 问题
delphi2010下代码如下：
TXRegionRect = packed record
X: Integer;
Y: Integer;
Width: Integer;
Height: Integer;
public
constructor TXRegionRect(AX,AY,AWidth,AHeight: Integer);
end;

constructor TXRegionRect.TXRegionRect(AX,AY,AWidth,AHeight: Integer);
begin
X := AX;
Y := AY;
Width := AWidth;
Height := AHeight;
end;
要想在delphi7用应该怎么改？