图形控件CadoDraw for D6 的密码 ?(299分)

  • 主题发起人 主题发起人 qdyoung
  • 开始时间 开始时间
Q

qdyoung

Unregistered / Unconfirmed
GUEST, unregistred user!
图形控件CadoDraw for D6
http://www.lts-tools.com/products.htm
正式版已带源码(Zip压缩,自解压,口令保护) 谁知口令 ?
如无口令,它的演示版控件,无源码,时间限制,无口令,如何Crack ?
 
ftp://ftp.51delphi.com/cadodraw41.rar
 
带源码,无需解密直接安装。
 
你说的文件我也已经找到,里面没有包含TcdPolygons

http://www.lts-tools.com/CDDownload.htm
中CadoDraw41_D6.exe [1.7 MB] 的密码是fT4st7iw

TcdPolygons再帮忙找找如何?
 
带源码,无需解密直接安装。?
呵呵
 
TcdPolygons是什么东西? 只在CadoDraw.pas里看到了一下。

to liangdewei:
  呵呵,有何问题? 别人已帮你解开了,当然无需解密直接安装了。
 
多边形控件,例子里有用到,但这个包里没带,是单独的。
 
请教各位如何使用TcdDataMod的FindObject函数:
下面是帮助文件的说明:
FindObject returns a pointer to a graphic object found in the data module.

function FindObject(ConObj: TConType): TcdObject;
Description

The FindObject method searches the data module for a graphic object and returns a pointer to that object if found. Else the FindObject method returns NIL.
The record of the type TConType passed as "ConObj" parameter contains the tool ID and the object ID of the wanted object.

能否给予指点。
 
我也还在摸索。

你有TcdPolygons吗?
 
我也想要TcdPolygons,可是没有找到。
关于Findobject:
具体实现:

var
theObj: TConType;
findobj:TcdObject;
begin
theobj.Contype:=14; //Tool ID or object Classnr
theobj.ConID:=2; //object ID
findobj:=cdDataModule1.FindObject(theobj);
if findobj<> nil then
findobj.mark;
end;
 
嗯,不错

还是没找到
 
我是这么实现的
 
后退
顶部