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라는 에러가 생기네여..
왜그런지..코딩이 잘못되었나여?