Delphi中如何取得Excel的資料 (2000年11月27日) 

本站更新  分類:   作者:srw  推薦:   閱讀次數(shù):811  
(http://www.codesky.net)  

--------------------------------------------------------------------------------
Delphi中如何取得Excel的資料

DdeClientConv 位于 System 元件表
Function TForm1.InitExcel:bool; 
begin
DdeClientConv1.SetLink( 'Excel', 'Sheet1' ); // 可改 'Sheet1' 為其它黃heet 名稱
if (DdeClientConv1.ddeservice='') or
(DdeClientConv1.ddetopic='')
then
Result:=False
else
Result:=True;
end;