请教F1Book直接赋值为什么提示无效的参数？(10分)

N

net_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-11

• #1

直接赋值F1book_Test.TextRC[3, 3] := 'good';系统提示无效的参数
错误提示指向TTF160_TLB文件的下面行：
InterfaceVariant.TextRC := Param3;

有遇到这个问题的朋友吗？

 

M

myid0602

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-11

• #2

用的是delphi7吧，
把在delphi5下安装时创建的那个单元文件复制下来,然后用它覆盖掉delphi下的那个单元文件

 

N

net_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-11

• #3

myid0602你好，谢谢你的指点，我用的是delphi7, F1Book是6.1版本，那个单元文件能否帮我整一个，我这里没有delphi5。邮箱是net_morning@tom.com，非常感谢！

 

网

网中戏

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #4

To
net_morning 你好
F1Book6.1版本那里有下？

 

N

net_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #5

网中戏你好，下载地址忘记了，好像是源动力那个网站？你的邮箱告诉我，我发一个给你。

 

V

vvyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #6

在 F1book 源码中找到 Set_TextRC 这个函数，改成如下形式：
procedure TF1Book.Set_TextRC(nRow: Integer;
nCol: Integer;
const Param3: WideString);
var
InterfaceVariant: OleVariant;
begin
InterfaceVariant := DefaultInterface;
InterfaceVariant.TextRC[nRow, nCol] := Param3;
end;
Delphi 7 引入这个 ActiveX 的时候把 TextRC 的参数给丢了。源码中凡是有 Warning 的地方都有错误，自己把参数添上就结了，这样的错误有多处。
Delphi 5 引入的虽然没有这方面的错误，但是有其他方面的错误，还不如 Delphi 7。

 

N

net_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #7

谢谢vvyang大侠，我刚才试了一下,delphi5的好像是有些别的问题。
另外请教那个打印预览的事情，怎么才能让这个打印预览正常？而且可以显示汉字？
我的是英文6.1版的。是不是安装个6.0中文版的就可以搞定？

 

V

vvyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #8

嗯，网上有很多汉化包。
不过 F1book 的打印预览本来就很狗屎。

 

N

net_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #9

vvyang大侠你好，请教个问题，你的打印预览是怎么整的？
能不能发一份汉化的或者给个网址？net_morning@tom.com

 

V

vvyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-12

• #10

我没动 F1book 的打印预览，按正常用就行。
如果你觉得太狗屎可以自己写一部分代码，我好久没用那玩意了。

 

网

网中戏

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-14

• #11

To
net_morning
我的电邮 wzxdn@163.com

 

N

net_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-17

• #12

多人接受答案了。