高手指点迷津！(100分)

procedure TForm1.Button1Click(Sender: TObject);
begin
query1.Close;
query1.SQL.Clear;
query1.UnPrepare;
query1.SQL.Add('INSERT.........); //我想用[red]SQL语句[/red]输入dbedit.text的值不知道怎么做呢！
query1.Open;
query1.Prepare;
end;

这一类语句是如何写的，我花了好长时间都实现不了，忘各位大哥帮忙呀！

sql.add(format(
'insert into tab (fieldA,fieldB) values (%d,''%s'');',
[strtoint(edit1.text),edit2.text]));
//第一个为数值型,第二个为字符型

query1.SQL.Add('INSERT.........);
//query1.sql.add('insert ……'+dbedit.text+'……';

提一个合理化建议，所有的sql 都不要直接加入
可以
var
sSQL: string;
begin
sSQL:= '........';
query1.sql.add(sSQL);
end;
执行sql语句大家好像都习惯上写一个函数的
否则你要写多少的close,add,execsql,open 什么的。

procedure zzadd;
var
dw:string;
begin
mainform.zzquy.DisableControls;
viewunit.getdwID(viewform.zz_bm.Text,viewform.zz_dw.Text,dw);
with viewform.ADOCommand1 do
begin
CommandText:='insert zz (name,sex,mz,born,jobdate,dw,idcard,zhh,jnpay,gwpay,eachbt,gsbt,gzbt,ylbt,ylj,gjj,syj) '+
'values name,:sex,:mz,:born,:jobdate,:dw,:idcard,:zhh,:jnpay,:gwpay,:eachbt,:gsbt,:gzbt,:ylbt,:ylj,:gjj,:syj)';
parameters.ParamByName('name').Value:=trim(viewform.zz_name.Text);
parameters.ParamByName('sex').value:=trim(viewform.zz_sex.Text);
parameters.ParamByName('mz').Value:=trim(viewform.zz_mz.Text);
parameters.ParamByName('born').Value:=viewform.zz_born.date;
parameters.ParamByName('jobdate').value:=viewform.zz_jobdate.date;
parameters.ParamByName('idcard').Value:=trim(viewform.zz_idcard.Text);
parameters.ParamByName('zhh').Value:=trim(viewform.zz_zhh.Text);
parameters.ParamByName('dw').value:=dw;
parameters.ParamByName('jnpay').Value:=viewform.zz_jnpay.Value;
parameters.ParamByName('gwpay').Value:=viewform.zz_gwpay.Value;
parameters.ParamByName('eachbt').value:=viewform.zz_eachbt.Value;
parameters.ParamByName('gsbt').Value:=viewform.zz_gsbt.Value;
parameters.ParamByName('gzbt').Value:=viewform.zz_gzbt.Value;
parameters.ParamByName('ylbt').value:=viewform.zz_ylbt.Value;
parameters.ParamByName('ylj').Value:=viewform.zz_ylj.Value;
parameters.ParamByName('gjj').Value:=viewform.zz_gjj.Value;
parameters.ParamByName('syj').value:=viewform.zz_syj.Value;
execute;
end;
mainform.zzquy.EnableControls;

end;

试一下

我是说何解决[red]此类问题[/red]还有delete,updata.请说的细一点，
授人于鱼，不如授人于鱼嘛！
要不给个教程吧。
感谢了！！！

看SQL server的帮助，
其中有sql语法的，很详细的

一：把Query1.Open;该成Query2.ExecSQL;再试一试
二：注意''里面的''，用QuotedStr函数试试，另外推荐人在昆明的说法。

MainQuery.Close;
MainQuery.Sql.Clear;
MainQuery.SQL.Add('insert into input (idex,uid,GiD,时间,Num)');
MainQuery.SQL.Add('valuesidex,:Uid,:GID,:时间,:Num)');
MainQuery.Params[0].AsInteger:=Strtoint(SiereEdit.Text);
MainQuery.Params[1].AsInteger:=Strtoint(Custedit.Text);
MainQuery.Params[2].AsInteger:=Strtoint(Goodsedit.Text);
MainQuery.Params[3].AsString:=Timeedit.Text;
MainQuery.Params[4].AsFloat:=Strtofloat(MountEdit.Text);
MainQuery.ExecSQl;
绝对可以！

多人接受答案了。