W
wangjyy
Unregistered / Unconfirmed
GUEST, unregistred user!
在往一个表中写数据，如何判断这个写入的数据是否重名？
以下事件对吗？
Procedure FfrmRole.ADOTable1BeforePost(Dataset: Tdataset);
begin
if EDIT1.TEXT := ADOTable1.FieldByName('RoleName').AsString then
begin
ShowMessage('重名了');
EDIT1.Clear;
end
else
if EDIT1.Text :='' then
begin
ShowMessage('对不起，身份不能为空！');
end
end;
请问是不是在传送表数据前写该事件！
以下事件对吗？
Procedure FfrmRole.ADOTable1BeforePost(Dataset: Tdataset);
begin
if EDIT1.TEXT := ADOTable1.FieldByName('RoleName').AsString then
begin
ShowMessage('重名了');
EDIT1.Clear;
end
else
if EDIT1.Text :='' then
begin
ShowMessage('对不起，身份不能为空！');
end
end;
请问是不是在传送表数据前写该事件！