以下我增加记录的代码,但传递不到数据库去啊 ,请问用ClientDataset怎么添加记录啊//增加记录 begin with frmdm.DS_R_Department do begin Insert; FieldByName('code').AsString:=trim(suiEdit1.Text); FieldByName('name').AsString:=trim(suiEdit2.Text); FieldByName('updepart').AsString:=trim(suiEdit3.Text); FieldByName('manager').AsString:=trim(suiEdit4.Text); FieldByName('manaphone').AsString:=trim(suiEdit5.Text); FieldByName('type').AsInteger:=StrToInt(trim(suiEdit6.Text)); FieldByName('people').AsInteger:=StrToInt(trim(suiEdit7.Text)); post; frmdm.DS_R_Department. end;
你将客户端的socketConnetion 设置成服务器端的连接名就可以
ClientDataset的ProviderName属性设置成服务器端的就可以。
begin
with frmdm.DS_R_Department do
begin
Insert;
FieldByName('code').AsString:=trim(suiEdit1.Text);
FieldByName('name').AsString:=trim(suiEdit2.Text);
FieldByName('updepart').AsString:=trim(suiEdit3.Text);
FieldByName('manager').AsString:=trim(suiEdit4.Text);
FieldByName('manaphone').AsString:=trim(suiEdit5.Text);
FieldByName('type').AsInteger:=StrToInt(trim(suiEdit6.Text));
FieldByName('people').AsInteger:=StrToInt(trim(suiEdit7.Text));
post;
frmdm.DS_R_Department.
end;