Tdataset是抽象类,不能实例化,所以不能向她插入数据。
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
解决方案 »
- 哪位有三层架构比较完整经典的例子
- 我学DELPHI不久!有个问题!
- 摄像头的YUV2图像转RGB保存
- 三层数据更新问题
- 新手:请大家指点一下网络、数据库编程的基础问题。
- 有谁做过象PHOTO的About这样不规则透明(含如%30这样的透明度)的程序
- 高手们,有没有办法让SQL SERVER中某个表里的内容的变化(如:insert)时通知一个外部程序
- 谁有李维的书!
- 请问在DELPHI4中如何实现DBGRID的列冻结功能?
- 有关ActiveForm的(在线等待)
- 请问这几句话有错误吗,(添在一个button的click事件里)为什么错误告诉我“在sql语句后找到字符”
- 请问怎么得到DBGrid中的数据内容?
Table1->Table2:
Table1.First;
while not Tabel1.Eof do
begin
for I := 0 to Tabel1.FieldCount-1 do0D
begin
Table2.Append;
Table2.Fields.Fields[0].AsVariant := Table1.FieldByName(Table2.Fields.Fields[0].FieldName).AsVariant;
end;
Table1.Next;
end;
Table2.Post;
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
先INSERT到一个adodataset中,再Tdataset:=adodataset.data
又是你哈,看来你都答了我就不用再回答了:)
我就是没办法insert进去啊
该怎么insert呢