http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=61435

wb.SaveAs(Filename:='C:\t2.txt', FileFormat:=xlText);//這一行

請問各位高手，是什麼原因造成的?
有沒有方法可以解決?感謝感謝 。

編輯記錄

這個程式我沒測，不過就語法來看，依底下紅字部份改一下，看能不能用唄

const應該是常數定義，有可能原先的版本未改好吧，希望可以幫你解決這個問題。


===================引 用 fivker 文 章===================
http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=61435

var
ex, wb: Variant;
//const xlText = -4158;
begin

try
ex := CreateOleObject('Excel.Application');
ex.Visible := true;
wb := ex.WorkBooks.Open('c:\t1.xls');
wb.SaveAs(Filename:='C:\t2.txt', FileFormat:=xlText);
wb.Saved := true; // to avoid quit message
ex.Quit;
except
on E: Exception do
ShowMessage('error: ' E.Message);
end;

end;

我使用上述中，timhuang的程式時，compile時出現下列錯誤訊息。

Undeclared identifier: 'xlText'

請問各位高手，是什麼原因造成的?
有沒有方法可以解決?感謝感謝 。

uses Excel2000

------
不論是否我發的文，在能力範圍皆很樂意為大家回答問題。
為了補我的能力不足之處，以及讓答案可以被重複的使用，希望大家能儘量以公開的方式問問題。
在引述到我的文時自然會儘量替各位想辦法，謝謝大家！

編輯記錄