为什么我的数据写不进数据库?在线等待!

我用的是ClientDataSet,数据库采用的是SQL servers,但程序运行后数据内容没有被写进数据库.请各位高手多多指教.我的代码如下:
     ClientDataSet.Append ;
     ClientDataSet.FieldByName('型号').AsString :=myText ;
     ClientDataSet.FieldByName('数量').Asinteger :=1;
     ClientDataSet.post;
     ClientDataSet.ApplyUpdates(-1);