Q&A

  • 델파이5.0에서 질문드려요(관련: 콤보박스,SQL쿼리

제가 콤보박스와 에디트1로 DB그리드를 검색할때
콤보박스문
procedure TForm2.ComboBox1Change(Sender: TObject);
begin
Case ComboBox1.ItemIndex  of
       0 : Table1.IndexFieldNames := 'Ucode';
       1 : Table1.IndexFieldNames := 'Uname';
       2 : Table1.IndexFieldNames := 'Uage';
       3 : Table1.IndexFieldNames := 'Urrn';
       4 : Table1.IndexFieldNames := 'Uadd';
       5 : Table1.IndexFieldNames := 'Upon';
     end;

end;
버튼문
//if (Input.Text = '') then
//         MessageDlg('검색자료를 입력하시오.', mtError, [mbOK], 0)
//     else
//    if not Table1.FindKey([Input.Text]) then
//      MessageDlg('일치하는 자료가 없습니다.',
//              mtInformation, [mbOK], 0)
//end;
//     end;
이렇게썼거든요?

이렇게 검색하면 모든 내용이 있는 상태서 그 위치만 가더라구요..

근데 Data Access 에 있는 SQl(쿼리)이걸루 저 콤보박스와 Edit1(네임은 Input로변경)

을 사용으로 버튼1을 눌러서 되게 할수있나요??
procedure TForm2.Button2Click(Sender: TObject);
var
begin
  with Query1 do
    begin
      Close;
      SQL.clear;
      SQL.Add('select Ucode, Uname, Uage, Urrn, Uadd, Upon');
      SQL.Add('From User1');
      SQL.add('Where );
       Prepare;
      Open;
      end;
      end;
      end.

아예 여기에서 막혔습니다..;;; ...
0  COMMENTS