用TQuery或者TADOQuery以及TADOCommand等
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
解决方案 »
- 删除文件的程序
- 指针和记录 使用的问题
- 不使用 /install 服务应用程序如何安装
- 如何知道一个二维数组的维数?
- 一个小问题,为什么ADoQuery在BatchUpdate方式时,对于插入的多个空行后,再取消时老时会报错无法定位已删除的行?
- delphi中写sql语句真烦人,请帮忙修改一个sql,谢谢了!!!
- 如何从Sql server 临时表里返回数据
- 如何高效实现邮件群发
- 《Delphi 5.X分布式多层应用系统篇》的第一个例子
- 如何把oracle中一张表的数据写入Access中的表
- 请问“学delphi应该注意些什么东西”
- 在哪里有installshield下载? 安装完了installshield后,执行文件叫什么名字?
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Insert Into MyTable Values(1,23,''aa'')');
Query1.ExecSQL;
如果是Select 语句则把Query1.ExecSQL改为Query1.Open.用TADOQuery同上.用TADODataset(只能Select):
ADODataset1.Close;
ADODAtaset1.CommandText:='Select * from MyTable';
ADODataset1.Open;用TADOCommand(不能Select):
ADOCommand1.CommandText:='Insert Into MyTable Values(1,23,''aa'')';
ADOCommand1.Execute;