【搞定】第三方控件问题[问题]**

新来小职员 · 发表于 2008-1-4 15:44:34

我找的一个delphi控件，不知道是否可以引入到x3，图中列出了控件的所有文件，我的同事说缺少.ocx，但我引入到delphi6中成功了，觉得应该可以用的，所以请你们帮忙看看

alang · 发表于 2008-1-4 15:57:04

不好说，你贴上来我看看

新来小职员 · 发表于 2008-1-4 16:17:42

给你控件

alang · 发表于 2008-1-4 16:23:59

我看了，可以导入，没有问题
不过用到了DBTables这个单元，不好，你修改一下，把这个单元去掉，不然需要BDE了

新来小职员 · 发表于 2008-1-4 16:28:52

DBTables在哪个位置，可以帮忙标出来吗？

alang · 发表于 2008-1-4 16:38:20

sncDBCurrency.pas

新来小职员 · 发表于 2008-1-4 17:20:02

我编译控件时不通过，和原来没问你之前一样。

新来小职员 · 发表于 2008-1-4 17:22:42

我用的是这两个文件，对不？

新来小职员 · 发表于 2008-1-4 17:26:21

为什么出现这样的状态？

alang · 发表于 2008-1-4 17:35:16

我导入到平台上，存在以下问题
1 放到表格文档中编译的话，不能超过一行，如果有多行，就会不断的闪，没法用
2 用表格文档打印的话，每一行都是第一条记录的值

第二个问题可以解决，在 TsncDBCurrencyEdit 增加一个函数
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
实现部分这样写
procedure TsncDBCurrencyEdit.WMPaint(var Message: TWMPaint);
begin
if (csPaintCopy in ControlState) and (FDataLink.Field <> nil) then
Value := FDataLink.Field.AsFloat;
inherited;
end;

第一个问题就只能是编辑时候在表单文档中使用了

		自动登录	找回密码
密码			立即注册