Q&A

  • 질문제목과 분류를 꼭 해주시길 부탁드립니다.
IF RADIOGROUP1.ITEMINDEX = 0 THEN

BEGIN

FORM1.QUERY1.CLOSE;

FORM1.QUERY1.SQL.Clear;

// SSQL:= SSQL + Format('PGMID = ''%s''',[Trim(EDIT1.Text)]);



// SSQL := 'SELECT DBPGM.PGMID, DBPGM.PGMTITLE FROM DBPGM where DBPGM.PGMID :DBPGM.PGMID'

// FORM1.QUERY1.FieldByName('DBPGM.PGMID').AsString := TRIM(EDIT1.TEXT);

FORM1.QUERY1.SQL.ADD(SSQL);

TRY

FORM1.QUERY1.OPEN;

SHOWMESSAGE(SSQL);

FORM1.SELECT.FIRST();



STRINGGRID1.Cells[0,0] := '프로그램아이디';

STRINGGRID1.Cells[1,0] := '프로그램제목';

STRINGGRID1.CELLS[0,1]:=FORM1.QUERY1.FIELDS[0].ASSTRING;

STRINGGRID1.CELLS[1,1]:=FORM1.QUERY1.FIELDS[1].ASSTRING;

FORM1.QUERY1.SQL.CLEAR;



EXCEPT

FORM1.Query1.Close;

APPLICATION.MESSAGEBOX('검색도중 에러발생', '에러', MB_OK+MB_ICONINFORMATION);

EXIT;

//Query1.FREE;

end;

FORM1.Query1.CLOSE;

//Query1.FREE;

FORM1.COMMIT;

END;

이라고 코딩을 했는데

검색은 되면서 invaild use of keyword라는 에러가 생기네여..

왜그런지..코딩이 잘못되었나여?



0  COMMENTS