질문1은 어떻게 사용하셨는지 모르겠는데요....
Frm_1 or Frm_11을 자주 사용하는 폼이 아니라면 Project의 option에서
Create시키시지 말고 실행 될때 마다 Create시켜 주시는 것이 나을것
같은 생각이 드는데요... 그럼 Free를 Create해주면서 바로 해줄 필요
가 없을 것 같거든요...

  public
     FilePath   : String;
     procedure ListFiles(D,Name,SearchName : String);

               이하 생략

procedure TNetConnectFrm.ListFiles(D, Name, SearchName: String);
var
  SR: TSearchRec;
begin
  if D[Length(D)] <> '\' then
    D := D + '\';

  if FindFirst(D+Name, faAnyFile, SR) = 0 then
    repeat
      if (SR.Attr <> faDirectory) and (SR.Name[1] <> '.') then
        if AnsiUpperCase(SR.Name) = AnsiUpperCase(SearchName) then
          FilePath := D;
    Until (FindNext(SR)<>0);
  FindClose(SR);

  if FindFirst(D+'*.*', faDirectory, SR) = 0 then
  begin
    repeat
      if ((Sr.Attr and faDirectory) = faDirectory) and
         (SR.Name[1]<>'.')
     then
        ListFiles(D+SR.Name+'\', Name, SearchName);
    until (FindNext(SR) <> 0);
  end;
  FindClose(SR);
end;


procedure TNetConnectFrm.FormCreate(Sender: TObject);
var
begin
  if FileExists('C:\Temp.db') then
  begin
    Application.CreateForm(TFrm_1, Frm_1);
    Frm_1.ShowModal;
    Frm_1.Free;
  end else
  begin
     ListFiles('c:\','*.*','Temp.DB');
     Showmessage(FilePath);
  end;
end;

이렇게 하시면 Temp.DB가 있는 경로를 찾으실 수 있을것 같은데요....
저도 다 해보지는 않아서.... 대충 위와 같은 식으로 하신다면...
원하시는 답과 비슷한 답을 찾으실 수 있을 것 같거든요....  ^^;

그럼 좋은 코딩 하세요...