|
发表于 2006-12-30 16:07:58
|
显示全部楼层
TSQLDataSet(DataSetBroker1.DataSet) .Close;
TSQLDataSet(DataSetBroker1.DataSet) .SQL.Text := 'Insert TEXT1(ID,Text) Values(:ID,:Text)';
TSQLDataSet(DataSetBroker1.DataSet) .Params.ParamByName('ID').AsString := '2323d';
TSQLDataSet(DataSetBroker1.DataSet) .Params.ParamByName('Text').AsInteger := SysUtils.StrToIntDef(DataEdit1.Text,0);
TSQLDataSet(DataSetBroker1.DataSet) .Execute;
不知道以上代码是不是楼主想要的。 |
|