Resource Leak on Form create

Hi, I am using BoundsChecker to detect leaks using Delphi 5.  When I call a modal form, it reports resource leak on inherited Create (owner) line, even though I have tried to call create with different ways, and I even removed the constructor method, and instead put the code in form.Create, but it is still reporting leak.  Amazingly, boundschecker does not report leak in some other modal forms with create or without create constructor.  I must have to remove this leakage.  I am not creating any object like TStringList in constructor.  I will really appreciate your help.  The sample code is as below in which leak reported:

procedure TfrmAR.BitBtn2Click(Sender: TObject);
var
   f: TfsARMST;
   CustNo,CustName: String;
begin
   inherited;
   try
     f := TfsARMST.Create(Self, CustNo, CustName); //<--BoundsChecker shows leak here if no constructor defined.
     if f.Showmodal = mrOK then
          Edit1.Text := CustNo;
   finally
     f.Free;
   end;
end;

//-----------
unit sARMST
. . .
 private
    { Private declarations }
    ReturnValue1 : ^string;
    ReturnValue2: ^String;
    procedure CreateQuery;
  public
    constructor Create(AOwner:TComponent; var Value1:string; Var Value2: String);
  end;

constructor TfsARMST.Create(AOwner:TComponent; var Value1:string; Var Value2:string);
begin
 inherited Create(AOwner);  //<<----BoundsChecker shows leak here if constructor defined.

 Query1.Databasename:= FSDataModule.FSDMDb.DatabaseName;
 ReturnValue1 := @Value1;
 ReturnValue2 := @Value2;
 ComboBox1.ItemIndex := 0;
 EFind.Text := Value1;
 CreateQuery;
end;

procedure TfsARMST.CreateQuery;
Var
   ACN: String;
begin
  with Query1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('Select AR_KY_MST_ACN, ');
    SQL.Add('      AR_FD_MST_NAME, ');
    SQL.Add('      AR_FD_MST_TEL_NO, ');
    SQL.Add('      AR_KY_MST_SNM, ');
    SQL.Add('      AR_FD_MST_CITY,');
    SQL.Add('      AR_FD_MST_STATE ');
    SQL.Add('FROM AR_DS_MST_R ');
   
    if  ComboBox1.ItemIndex=1 then
    begin
        SQL.Add('WHERE AR_KY_MST_ACN Like :ACN' );
        ParamByName('ACN').AsString := EFind.Text+'%';
        if RGSortOrder.ItemIndex=0 then
            SQL.Add(' ORDER BY AR_KY_MST_ACN ASC')
        else
            SQL.Add(' ORDER BY AR_KY_MST_ACN DESC');
    end;
 end;
end;

Thanks