안녕하세요~
주소록 프로그램을 만들고 있는데요~
3개의 table을 구성해서 만들고 있는데
아래 코드를 돌리면 자꾸 이상한 값이 나오는데요
어디가 잘못된건지 모르겠습니다.
도와주세요 ㅠ

<!--CodeS-->
procedure TForm2.DBGrid2DblClick(Sender: TObject);
begin
   ZConnection1.Connect;
   Add1_id:=DBG2Table.FieldByName('add1_id').AsString;

    Ashstr:= 'select a.add1_id, a.name, a.post, b.tel1, b.email, b.mes, b.tel2, b.address, c.hobby1 from add_1 a, add_2 b, add_3 c where a.add1_id=b.add1_id and a.add1_id=c.add1_id in ('+Add1_id+')';

   ZQuery1.Close;
   ZQuery1.SQL.Clear;
   ZQuery1.SQL.Add(AshStr);
   ZQuery1.Open;

   DBG2Table.Clear;
   DBG2Table.Assign(ZQuery1);
   DBG2Table.Open;
   ZQuery1.Close;
   ZConnection1.Disconnect;


   Edit2.Text:=DBG2Table.FieldByName('name').AsString;
   Edit3.Text:=DBG2Table.FieldByName('post').AsString;
   Edit4.Text:=DBG2Table.FieldByName('tel1').AsString;
   Edit5.Text:=DBG2Table.FieldByName('email').AsString;
   Edit6.Text:=DBG2Table.FieldByName('mes').AsString;
   Edit7.Text:=DBG2Table.FieldByName('tel2').AsString;
   Edit8.Text:=DBG2Table.FieldByName('hobby1').AsString;
   Edit9.Text:=DBG2Table.FieldByName('hobby1').AsString;
   Edit10.Text:=DBG2Table.FieldByName('address').AsString;
end;

<!--CodeE-->