Delphi XE5 lite 8.0 百度盘下载

image

为了便于在 Lite 8.0 中集成 freecat、huayan889、sinner、yuto 等大侠的特别补丁,写了这个:Activator.exe

主要作用:

1、整合 freecat、gateway、huayan889、sinner、yuto 的特别补丁、sn、cglm.ini 等
2、经测试,yuto 提供的方法较为稳定,Keygen.exe 方法暂时保留

相对原始部署方式,这个 Activator 实现“一键激活”!

继续阅读

[转]SlickEdit 16.0.3 Crack

SlickEdit 16.0.3 Crack 方法(从 http://zhiwei.li/text/2011/05/slickedit-2011/ 中归纳总结):

从官网下载 slickedit 16.0.3 并安装后;用 HEX 编辑器( 比如 Ultraedit 或者 vim ) 打开 slickedit/win/vs.exe 或者 slickedit/bin/vs (视系统而定);

找到偏移位置,修改相应的16进制。

系统 偏移地址 修改内容
Linux 64 0x1AD6C  89 D8 -> B0 01
Linux 32 0x190EC 0F B6 45 D7 -> B0 01 90 90
Windows 32 0xD80A 8A C3 -> B0 01
Windows 64 0xF0EB 40 0F B6 C7 -> B0 01 90 90

 

如果不幸 slickedit 的官网不再提供 16.0.3 版本下载,可去 baidu 网盘 提取:

 

【linux 32】

http://pan.baidu.com/netdisk/singlepublic?fid=222268_3122385817

【linux 64】

http://pan.baidu.com/netdisk/singlepublic?fid=266947_2710628153

【windows 32】

http://pan.baidu.com/netdisk/singlepublic?fid=222302_2014882351

【windows 64】

http://pan.baidu.com/netdisk/singlepublic?fid=276441_1400629773

 

 

转自:http://smartgeek.iteye.com/blog/1541845

XE3 安装

资料来自board4all

1.下载xe3的iso文件

http://altd.embarcadero.com/download/radstudio/xe3/delphicbuilder_xe3_win.iso 

2.使用以下序列号安装

MAFA-A3D7PD-FJBBAE-FACN

 

 

 

 

3.使用以下链接中的破解文件覆盖

http://www.board4allcz.eu/showthread.php?t=520512

 

 

其实就是个borlndmm.dll

eXcEl3rator100.zip

覆盖后,启动rad,第一次会让你输入序列号校验等,直接以后再说,重启就显示已破解了

image 继续阅读

Delphi 中获取文件类型说明

就是根据文件名,获取文件类型说明,如.bat文件,可获取到“Windows 批处理文件”

代码:

var
  FileInfo: TSHFileInfo;
begin
  Result := INFO_UNKOWN_TYPE; //’未知类型’
  try
    SHGetFileInfo(pchar(AFileName), 0, FileInfo, sizeof(FileInfo), SHGFI_TYPENAME);
    Result := FileInfo.szTypeName;
  except
  end;
end;

 

需包含单元ShellAPI。

TListView自定义排序

image

Delphi中TListView的排序步骤,主要使用到两个事件

FOnColumnClick: TLVColumnClickEvent;

FOnCompare: TLVCompareEvent;

简单点的说,就是定义FOnCompare事件,即下面的lvPCCompare,指定每个列,即column的比较方法,返回compare正负值。

然后实现FOnColumnClick事件,就是点击标题事件,下面的代码,主要的处理都是一个箭头图标的处理,关键在lv.CustomSort(nil, Column.index);的调用。

继续阅读

窗体handle的一个小问题

最近在做一个小项目,需要更新一个窗体上的memo

原先使用的是event,经常会发现界面锁死,无响应了

后干脆使用message,postmessage不等待处理,直接返回,而sendmessage等待处理

当然使用sendmessage了。

由于该form是嵌入到一个tabsheet上的,原先的代码是

//创建baselist实例,嵌入到tabsheet中

frmClient := TfrmClient.Create(Self);

frmClient.BorderStyle := bsNone;

frmClient.Align := alClient;
tmpclient.LogReceiver:=frmClient.Handle;

frmClient.Parent := ts;
frmClient.Show;

测试时,发现,frmclient里面,无论如何,无法收到message

经调试才发现设置时的handle,即tmpclient.LogReceiver,和实际的handle不一样。

后才发现form设置parent属性时,是有可能更改本身的handle值的。

把setparent属性移动到取handle之前,即可。

access 用myodbc 访问mysql乱码问题

要把access的数据导入的mysql的方法,要么用专门的工具,如db2mysql,或者,就是连接两者,然后用sql语句操作。

ms access 连接mysql数据库的方法:

1.安装myodbc,3.51即可

2.在access中,使用外部链接表,把mysql数据表连接到access中,这样,mysql的表就跟access本身的表格一样处理。

中间,就是中文乱码的问题,

网上的解决办法都是:MYSQL ODBC 乱码的解决方法

大概就是在mysql的odbc连接选项中,在数据源配置项 Initial Statement 中填入 SET CHARACTER SET GBK

这种方法,显示的时候没有问题,中文能正常显示,但是,当你插入中文数据到mysql中时,照样是乱码。

其实,在代码中,访问mysql时,处理这种情况,就是在执行sql语句前,执行 set names GB2312

设置连接过程中的字符集。

但是,直接在access的sql模式中执行的话,会显示因为不是select ,update等sql语句而失败。

解决办法:就是把之前的陪着数据源的选项中的set character  set,直接改成 set names GB2312,即可。

参考:http://bugs.mysql.com/bug.php?id=3348