求一段程序

[airflight]

我现在需要一段用Query组件连接数据库的程序，用于毕设的项目上。最终的数据显示再DBGrid组件上，功能要求有记录的上下移动，插入记录、删除记录、更改记录。
请不要告诉我在那里能找到代码，希望能把代码贴在本贴后面。数据库的字段名是title和bian

[silver_sky]

DBGrid1->DataSource = DataSource 1 ;
DataSource1->DataSet = Query1 ;
Query1->DatabaseName = YourDB ;
//插入
Query1->Close() ;
Query1->SQL->Clear() ;
Query1->SQL->Add(INSERT INTO yourTable(title,bianhao)) ;
Query1->SQL->Add(VALUES(:Title, :BianHao)) ;
Query1->SQL->ParamByName(Title)->AsString = "Title" ;
Query1->SQL->ParamByName(Title)->AsInteger = 12345 ;
Query1->Open();
//其它类似

你也可以直接用Query1继承DataSet的方法
Query1->Insert
Query1->Delete
Query1->Post
...

[airflight]

请问非得用参数列表的方式插入吗

[佣工7001]

可以直接生成语句阿，效率差一点儿
Query1->SQL->CLear();
QUery1->SQL->Add("insert into d value('df','ddd')");
Query1->ExecSQL();