Lazarus 最近风头正茂,可以在 windows、Linux平台下开发,更诱人的是,可以用KOL开发 wince程序。最近不少的控件厂商都支持 Lazarus ,比如 remobjects(RO SDK+DA+HY)和 Devart(UniDAC) 等公司。下面简单介绍在 Lazarus(windows,V0.9.27) 下安装 RO SDK(RO SDK 6.0.39 )。
1、
![Lazarus 下安装 RO SDK及其简单的例子。 - yyimen - yyimen的博客 Lazarus 下安装 RO SDK及其简单的例子。 - yyimen - yyimen的博客](http://img.bimg.126.net/photo/bodQWk-_kUQ1-CWrxNEUAw==/5783184871497396464.jpg)
先安装
RemObjects_Core_Lazarus_Windows.lpk
然后在安装 RemObjects_Synapse_Lazarus_Windows.lpk。
如果想装 indy的RO控件,需要去indy官方网下载 10.2.3的FPC版本,请注意区分OS平台。
2、安装Everwood下的RemObjects_Everwood_Lazarus_Windows.lpk。
3、安装 Remobjects的IDE包,即Sources下的IDE路径 RemObjects_IDE_Lazarus_Windows.lpk。
![Lazarus 下安装 RO SDK及其简单的例子。 - yyimen - yyimen的博客 Lazarus 下安装 RO SDK及其简单的例子。 - yyimen - yyimen的博客](http://img.bimg.126.net/photo/Ih_1ixYm32dvNQdmW189iA==/5783184871497396465.jpg)
如果安装过程中 出现 找不到 Zlib1.DLL,到Lazarus官方网去下载,或delphi fpr PHP目录也自带了Zlib1.DLL文件。放在Lazarus当前目录下即可。
简单些了一个例子(使用 TROSynapseSuperTCPChannel),获取服务端的时间和IP地址:
如图:
![Lazarus 下安装 RO SDK及其简单的例子。 - yyimen - yyimen的博客 Lazarus 下安装 RO SDK及其简单的例子。 - yyimen - yyimen的博客](http://img.bimg.126.net/photo/Edgkog1rI_qnA4ET4_UiEA==/5783184871497396466.jpg)
编译运行:
服务端用了 super synapse TCP 。
Lazarus的RO客户端编程和Delphi下没有什么区别,比如引用XXX_Intf,接口单元还是可以通用的。
声明:
RemoteService: IServCommFunc;
创建:
RemoteService := CoServCommFunc.Create(BinMsg,Channel);
调用:
procedure TForm1.Button1Click(Sender: TObject);
var
DT:TDateTime;
IP:string;
begin
IP := RemoteService.GetAppIPAddr;
//ShowMessage(IP);
DT := RemoteService.GetAppServTime;
//ShowMessage(DateTimeToStr(DT));
Self.Caption := IP + ':'+DateTimeToStr(DT);
end;
(须将Zlib1.DLL放到客户端程序)
Lazarus +RO, 值得期待的是,将服务端运行在 Ubuntu上,客户端用 多姿多彩的windows桌面程序。
我已经在虚拟机安装了 Ubuntu 9.0.4,下一步 需要恶补一点 linux 知识。