M
Mary
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么在Formula One里填中文时，不能输入词组（只出现一个汉字），
而且有时还显示不出来？
而且有时还显示不出来？
H
huizhang
Unregistered / Unconfirmed
GUEST, unregistred user!
Hello Mary,
Glad to see you again.
F1Book 是有上述问题, 解决办法是使用它的EditBar可以输入汉字词组;
做法是将
F1Book1.ShowEditBar属性设置成True
Glad to see you again.
F1Book 是有上述问题, 解决办法是使用它的EditBar可以输入汉字词组;
做法是将
F1Book1.ShowEditBar属性设置成True
M
Mary
Unregistered / Unconfirmed
GUEST, unregistred user!
谢谢，So I am!
除此之外还有别的办法吗？我听说有在Formula One 6.0，delphi自带的
是3.0，哪里能找到6.0的？
除此之外还有别的办法吗？我听说有在Formula One 6.0，delphi自带的
是3.0，哪里能找到6.0的？
H
huizhang
Unregistered / Unconfirmed
GUEST, unregistred user!
Mary,
再有别的办法就是贴一个 InplaceEditor(TEdit) 到它的上面, 来接受字符输入,回
车后再赋值给 Entry;
我的 Formula one 突然就不好使了, 无法试验了
再有别的办法就是贴一个 InplaceEditor(TEdit) 到它的上面, 来接受字符输入,回
车后再赋值给 Entry;
我的 Formula one 突然就不好使了, 无法试验了
C
CJ
Unregistered / Unconfirmed
GUEST, unregistred user!
可以到公司主页去找，但是是试用版（15M），到目前为止没有CRACK，
ftp://ftp.visualcomp.com/fopro/F1pro.exe
如果还要简单的方法，我到是有个笨的：NOTEPAD-SELECT ALL-COPY-PASTE
GOOD LUCK
BTW:你的关于金钱龟的问题很好玩，以后多题这样的问题！！！！！！！
ftp://ftp.visualcomp.com/fopro/F1pro.exe
如果还要简单的方法，我到是有个笨的：NOTEPAD-SELECT ALL-COPY-PASTE
GOOD LUCK
BTW:你的关于金钱龟的问题很好玩，以后多题这样的问题！！！！！！！
M
Mary
Unregistered / Unconfirmed
GUEST, unregistred user!
关于汉字问题，我采用了各位的方法解决了，谢谢！
不好意思，还有一个问题，怎样做到象Excel一样合并单元格？
我只有10分了。只好在此再问一下。
不好意思，还有一个问题，怎样做到象Excel一样合并单元格？
我只有10分了。只好在此再问一下。
H
huizhang
Unregistered / Unconfirmed
GUEST, unregistred user!
Mary, 好厉害呀, 到底用了什么方法解决的?
合并单元格, 可以用 SetAlignment 为 Selected Cells 设置对齐方式:
1. F1Book1.Selection := 'A1
1';
or
FiBook1.SetSelection(1,1,1,4);
2. F1Book1.GetAlignment(ah, wrap, av, ao);
3. F1Book1.SetAlignment(F1HAlignCenterAcrossCells, wrap, av, ao);
其中参数预先定义为: ah, av, ao: integer;
wrap: boolean;
没有具体试过, 有问题别抱怨
合并单元格, 可以用 SetAlignment 为 Selected Cells 设置对齐方式:
1. F1Book1.Selection := 'A1
1';or
FiBook1.SetSelection(1,1,1,4);
2. F1Book1.GetAlignment(ah, wrap, av, ao);
3. F1Book1.SetAlignment(F1HAlignCenterAcrossCells, wrap, av, ao);
其中参数预先定义为: ah, av, ao: integer;
wrap: boolean;
没有具体试过, 有问题别抱怨
H
huizhang
Unregistered / Unconfirmed
GUEST, unregistred user!
Sister Mary,
看你说的那么可怜, 就教你一招, 在论坛你的信息中通过改变你的信息, 删除你的
现有账号, 然后用相同的"外号"在从新注册, 凭空又得到200大分
看你说的那么可怜, 就教你一招, 在论坛你的信息中通过改变你的信息, 删除你的
现有账号, 然后用相同的"外号"在从新注册, 凭空又得到200大分
M
Mary
Unregistered / Unconfirmed
GUEST, unregistred user!
hi,小心斑主处罚你，减去你200分（作弊），要是我实在没分数了，也可以试试。
另外，我说的是合并，不是对齐。要求四个格子并为一个，内部没有网格线。
另外，我说的是合并，不是对齐。要求四个格子并为一个，内部没有网格线。
H
huizhang
Unregistered / Unconfirmed
GUEST, unregistred user!
Mary,
那个常数 F1HAlignCenterAcrossCells, 就是你所要的;
Excel 的合并单元格实质
上试 AccessCells not JointCells, 不妨先试一下, 如果不对不要分(废话)
那个常数 F1HAlignCenterAcrossCells, 就是你所要的;
Excel 的合并单元格实质
上试 AccessCells not JointCells, 不妨先试一下, 如果不对不要分(废话)
H
huizhang
Unregistered / Unconfirmed
GUEST, unregistred user!
Hi Mary,
This is the way to joint cells:
procedure TForm1.Button1Click(Sender: TObject);
var
ah, av, ao: SmallInt;
wrap: Wordbool;
begin
F1Book1.EntryRC[1,1]:='Hello Mary';
F1Book1.SetSelection(1,1,1,8);
F1Book1.GetAlignment(ah, wrap, av, ao);
F1Book1.SetAlignment(F1HAlignCenterAcrossCells, wrap, av, ao);
end;
This is the way to joint cells:
procedure TForm1.Button1Click(Sender: TObject);
var
ah, av, ao: SmallInt;
wrap: Wordbool;
begin
F1Book1.EntryRC[1,1]:='Hello Mary';
F1Book1.SetSelection(1,1,1,8);
F1Book1.GetAlignment(ah, wrap, av, ao);
F1Book1.SetAlignment(F1HAlignCenterAcrossCells, wrap, av, ao);
end;
M
Mary
Unregistered / Unconfirmed
GUEST, unregistred user!
耽搁了这么长时间，不好意思