TQuery 컴포넌트를 이용하여 검색하거나 레코드 추가 방법

1. uses에 'Db' 유닛 추가
2. 검색예
   with Query1 do
   begin
     Close;
     try
       SQL.Clear;
       SQL.Add('SELECT * FROM TABLENAME');
       Open;

       SQL.Clear;
       SQL.Add('SELECT * FROM TABLENAME2');
       Open;
     except on E: EDatabaseError do
       ShowMessage(E.Message);
     end;
     Close;
   end;

3. 레코드 추가 예
   with Query1 do
   begin
     Close;
     try
       SQL.Clear;
       SQL.Add('INSERT INTO TABLENAME (');
       SQL.Add('CODE, NAME )');
       SQL.Add('VALUES (:CODE, :NAME)');
       ParamByName('CODE').AsString := '1';
       ParamByName('NAME').AsString := '사장';
       ExecSQL;

       SQL.Clear;
       SQL.Add('Commit');
       ExecSQL;
     except on E: EDatabaseError do
       begin
         SQL.Clear;
         SQL.Add('Rollback');
         ExecSQL;
         ShowMessage(E.Message);
       end;
     end;
     Close;
   end;

간단하게 예를 들었습니다.
응용해서 사용하세요.