求助:vclSkin和DbLookUpTreeView同时 找免费仓库进销存软件
销售管理软件版1楼: 如果不用皮肤,那个DbLookupTreeView很正常,用了皮肤,第一次点DbLookupTreeView,出现了错误,错误标示指向该函数的第一行,见下。以上是在IDE中运行。如果编译成exe,会出错,弹出一个内存犯规的错误,但第二次以后点就正常了。
procedure TCustomdxTreeView.CNNotify(var Message: TWMNotify);
var
pnmlv: PNMLVCustomDraw;
tr: TTreeNode;
htr: HTReeItem;
Color, BkColor: TColor;
St: String;
begin
if (Message.nmhdr^.code = NM_CUSTOMDRAW) {$IFDEF DELPHI5}and not (Assigned(OnAdvancedCustomDraw)
or Assigned(OnAdvancedCustomDrawItem)){$ENDIF} then
begin
pnmlv := PNMLVCustomDraw(TMessage(Message).lParam);
if pnmlv^.nmcd.dwDrawStage = CDDS_PREPAINT then
我用的是3.99,昨天折腾到天亮还是那问题。刚才下载了4.01的,还是一样
procedure TCustomdxTreeView.CNNotify(var Message: TWMNotify);
var
pnmlv: PNMLVCustomDraw;
tr: TTreeNode;
htr: HTReeItem;
Color, BkColor: TColor;
St: String;
begin
if (Message.nmhdr^.code = NM_CUSTOMDRAW) {$IFDEF DELPHI5}and not (Assigned(OnAdvancedCustomDraw)
or Assigned(OnAdvancedCustomDrawItem)){$ENDIF} then
begin
pnmlv := PNMLVCustomDraw(TMessage(Message).lParam);
if pnmlv^.nmcd.dwDrawStage = CDDS_PREPAINT then
2楼: DevExpress DBTree Suite 1.31版 如免费仓库进销存软件
3楼: 我已帮你将这问题提交给了作者[8D]
等消息吧
4楼: vclSkin 的问题太多了:(我们公司还买了他的正版,一样老是报内存出错,现在干脆都把vclSkin控件从单元里删除了~估计这是最快的解决办法!
5楼: vclSkin 用 最新版 的 http://www.delphifans.com/SoftView/SoftView_2128.html
6楼: 晕,我用的是没有花钱的,提交給作者,太尴尬了。
我用的是3.99,昨天折腾到天亮还是那问题。刚才下载了4.01的,还是一样
销售管理软件版7楼: CoolSlob你好,请问作者回信了吗?
8楼: VCLSkin 是越升级问题越多!哎~干脆不用了!
9楼: 为各位VCLSkin爱好者更好地进行交流,特开通QQ群:10310017,欢迎加入。
10楼: 多人接受答案了。