V
vbkiller
Unregistered / Unconfirmed
GUEST, unregistred user!
各位大虾：
小弟现有一个棘手问题，我用delphi+mo想编辑一个shp文件，下面是代码 ans :=MessageBox(HANDLE,'确定更改此项记录么？','友情提示!',MB_YesNo)
if (ans=IDYes)then
if (recset.Updatable =True) then
//不知为何，这句总返回false值
begin
//recset的updatable是怎么确定的
recset.Edit;
recset.Fields.Item(ComboBox1.Items.Strings[ComboBox1.ItemIndex]).Value :=Edit1.Text;
recset.Update;
end
else
ShowMessage('记录处于不可编辑状态，请确认数据是否被他处占用！')
else
begin
recset.CancelUpdate;
Edit1.Text :=editburf;
end;
recset.StopEditing;
小弟现有一个棘手问题，我用delphi+mo想编辑一个shp文件，下面是代码 ans :=MessageBox(HANDLE,'确定更改此项记录么？','友情提示!',MB_YesNo)
if (ans=IDYes)then
if (recset.Updatable =True) then
//不知为何，这句总返回false值
begin
//recset的updatable是怎么确定的
recset.Edit;
recset.Fields.Item(ComboBox1.Items.Strings[ComboBox1.ItemIndex]).Value :=Edit1.Text;
recset.Update;
end
else
ShowMessage('记录处于不可编辑状态，请确认数据是否被他处占用！')
else
begin
recset.CancelUpdate;
Edit1.Text :=editburf;
end;
recset.StopEditing;