exceltotable 字段设置函数返回值有问题**

ggc

点取消也执行,到入数据,代码如下:

procedure TMainForm.Button1Click(Sender: TObject);
var
  s: String;
begin
  if OpenDialog1.Execute then
  begin
    ExcelToTable1.DataSource := DataSource1;
    ExcelToTable1.FileName := OpenDialog1.FileName;
    if Business.Forms.ExcelFieldMapFunc.ShowFieldMapEditor(ExcelToTable1) then
      ExcelToTable1. Execute(s);
  end;
end;

atiger

楼主，你的意思是（见附件），图片中的红色框的两个按钮，对吧，

如果是，是这样的，因为这个确定和取消的值不是返回值的，而是，确定和取消是决定是否更改现有的配置。如果确定，就会用这个设置更改原有的，取消是不改这里不应该这么用，所以，像你这样，应该设置和执行是两个过程（因为不是每次执行前都设置，也不一定设置完就马上执行），这两个没有必然的联系，你修改一下程序的逻辑改就可以了