5,386
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
clacklin 2000-03-17
- 打赏
- 举报
if f1book.ReadEX('c:\TEST.vts')<>12 then //12 为vts
exit;//or error msg
exit;//or error msg
Un1 2000-03-17
- 打赏
- 举报
好象LittleStar的答案不错呀！
adon 2000-03-17
- 打赏
- 举报
你能给出个例子，以说明从控件到读取到输出的全过程？
LittleStar 2000-03-14
- 打赏
- 举报
var i:smallint;
{ F1FileFormulaOne = 1;
F1FileExcel4 = 2;
F1FileTabbedText = 3;
F1FileExcel5 = 4;
F1FileFormulaOne3 = 5;
F1FileTabbedTextValuesOnly = 6;}
begin
i:=1;
F1Book1.Read('c:\TEST.vts',i);
end;
{ F1FileFormulaOne = 1;
F1FileExcel4 = 2;
F1FileTabbedText = 3;
F1FileExcel5 = 4;
F1FileFormulaOne3 = 5;
F1FileTabbedTextValuesOnly = 6;}
begin
i:=1;
F1Book1.Read('c:\TEST.vts',i);
end;
Un1 2000-03-14
- 打赏
- 举报
使用Formula One控件不就行吗？
