大家帮我看一下这个问题～

我的程序代码如下：
１、procedure TPK_GradeBrowse.N3Click(Sender: TObject);
　　　var
 　　　　s:String;
 　　　begin
   　　　　s:=Trim(IntToStr(ycol)+IntToStr(yrow));
   　　　　PK_Data.PK_SyllabusSet.Edit;
   　　　　PK_Data.PK_SyllabusSet[s]:='';
   　　　　PK_Data.PK_SyllabusSet.Post;     // 将数据写回数据库
   　　　　StringGrid1.Cells[ycol,yrow]:=''; 　　　end;
２、begin
 　　StringGrid1.Cells[ycol,yrow]:=PK_DB_Course.Text+''+PK_DB_teacher.Text;
 　　s:=Trim(IntToStr(ycol)+IntToStr(yrow));
　　 PK_Data.PK_SyllabusSet.Edit;
 　　PK_Data.PK_SyllabusSet[s]:=PK_DB_Course.Text+''+PK_DB_teacher.Text; //返回值
 　　PK_Data.PK_SyllabusSet.Post;
　　end;
我编完后老是出错，然后我就跟踪，发现问题好象都是出在post这里，写回数据时他就出错！
大家提些建议！