由于数据量比较大，在往excel导数据时，如果有人点击了excel，数据就有可能无法继续传送。为此，如何能让别人在导excel时无法点击excel呢？ 我曾试过在导完数据时，再让excel显现，但好像达不到这个效果，不知为何？ 發表人 - ffprince 於 2004/05/20 20:27:43

Hi, 請問你是使用 Ole Automation 的方式做嗎? 可以不要將 Visible 設為 true, 使用者就看不見囉! 等作業完成後再將 excel 秀出即可! 如:    

procedure TForm1.Button1Click(Sender: TObject);
var
  ex, wb, ws: Variant;
  i: integer;
begin
  ex := CreateOleObject('Excel.Application');
  wb := ex.WorkBooks.Add;
  ws := wb.WorkSheets[1];    // process data export ---------------
  for i:=1 to 1000 do
  begin
    ws.Cells[i, 1].Value := i;
  end;
// end of process --------------------      ex.Visible := true;
end;