Form2 에서 함수를 맹글어 리턴 시키면됩니다.

procedure GetPost: string;

implementation

procedure GetPost: string;
var Form: TForm2;
begin
  Form := TForm2.CreateNew(Application);
  with Form do
    try
      ShowModal;
    finally
      if Tag = 1 then Result := Edit1.Text  // 우편번호 선택시 폼의 Tag = 1로
                 else Result := '';         // 비정상 종료시
      Free;
    end;
end;

저 같은 경우는 Form2에 우편번호, 주조, 번지 등 Edit박스를 두고
검색된 내용중 더블클릭으로 선택을 하면 해당 Form2에 해당 데이터를 뿌려줍니다.(제 선택이 있을수 있는니깐요...)
더블클릭 이벤트는
Edit_zip.Text   := Query1.FieldByName('').asstring ;
Edit_add.Text  := Query1.FieldByName('').asstring ;
Edit_bunji.Text := Query1.FieldByName('').asstring ;
이런 식으로 뿌려주고
확인 버튼을 클릭시
Form1.Edit.zip    := Edit_zip.Text ;
Form1.Edit.add   := Edit_add.Text ;
Form1.Edit.bunji := Edit_bunji.Text ;

이런 식으로 넘깁니다.
아님 더블 클릭시 바로 넘길수도 있겠죠

Form1.Edit_zip.Text   := Query1.FieldByName('').asstring ;
Form1.Edit_add.Text  := Query1.FieldByName('').asstring ;
Form1.Edit_bunji.Text := Query1.FieldByName('').asstring ;

이렇게요
원하는 답변인지 모르겠네요... ㅋㅋㅋ
별볼일 없는 넘이 지나가다...