간단한것 같은데 머가 잘못되었는지 몰라서 질문드립니다.ㅜ.ㅜ

폼에 에디트를 두개 넣고 첫번째 에디트에 a칼럼의 내용을 넣고 버튼을
누르면 두번째 에디트에  내용이 뿌려지기 하는 겁니다.

칼럼 a         b        : 테이블이 이렇게 있다고 할때
내용 1         가
       2         나
       3         다
       4         라
그러니까 이런 경우는 첫번째에 "1"이라고 치고 버튼을 누르면
두번째 텍스트에 "가"라는 내용이 써져야겠죠.
소스는 이렇게 했습니다.

procedure TForm1.Button1Click(Sender: TObject);
var i , j, k  : string;
begin
        database1.Connected := true;
        i := edit1.Text;
        query1.SQL.Clear;
        j := 'select a, b ' +
             'from 테이블'+
             'where a =:i';
        query1.SQL.Add(j);
        query1.Open;
        k := query1.fieldbyname('b').asstring;
        edit2.Text := k;
end;

그런데 아무리 돌려봐도 두번째 텍스트에는 공백이군여..ㅡㅡ;
이게 왜 이런건지 그리고 제대로 뜨게 하려면 어떻게 해야하는건지
알고싶습니다. 여기있는 질문들을 찾아보긴 했는데.. 이것과 비슷한 질문은
없는것 같아서요.. 부탁드립니다.