MDIChild Form에서 MDIChild Form폼을 호출하는데,폼생성시 폼이 기존에 생성되어 있는가를 비교해서,생성되어있으면, 기존의 폼을 보여주고, 생성되어 있지않으면 Create시켜서 폼 Show를 해야하는데, 아래와 같이 코딩을 했는데, 기존의 폼이 앞으로 나와 보여지지가 않습니다... 도움 좀 주셔요.....

procedure TFormBL1A5010.btTax_IssuClick(Sender: TObject);

var

FormBL2A4010: TFormBL2A4010;

ChildForm: TForm;

begin

inherited;

//FindReferWindow => 'TFormBL2A4010'을 찾는 함수

ChildForm := FindReferWindow('TFormBL2A4010');

If ChildForm = Nil Then

Begin

Try

FormBL2A4010 := TFormBL2A4010.Create(Owner);

Except

Exit;

End;

FormBL2A4010.meDate.Text := tdsPers_ClamSTRING2.AsString; //청구월

FormBL2A4010.EditPers_No.Text := tdsPers_ClamSTRING1.AsString; //납책no

FormBL2A4010.Retrieve; //조회

End;

FormBL2A4010.Show;

FormBL2A4010.BringToFront;

// FormBL2A4010.WindowState := wsNormal;

end;