请选择 进入手机版 | 继续访问电脑版

Lazarus中文社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

Lazarus IDE and 组件 下载地址版权申明
查看: 5342|回复: 4

Lazarus 下安装 RO SDK及其简单的例子。

[复制链接]

该用户从未签到

发表于 2009-6-29 09:06:14 | 显示全部楼层 |阅读模式
Lazarus 最近风头正茂,可以在windows、Linux、Unix平台下开发,更诱人的是,可以用KOL开发 wince程序。最近不少的控件厂商都支持 Lazarus ,比如remobjects(RO SDK+DA+HY)和 Devart(UniDAC) 等公司。下面简单介绍在Lazarus(windows,V0.9.27) 下安装 RO SDK(RO SDK 6.0.39 )。
1、
先安装
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。

如果安装过程中 出现 找不到 Zlib1.DLL,到Lazarus官方网去下载,或delphi fpr PHP目录也自带了Zlib1.DLL文件。放在Lazarus当前目录下即可。
简单些了一个例子(使用 TROSynapseSuperTCPChannel),获取服务端的时间和IP地址:
如图:

编译运行:


服务端用了 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 知识。




本文来自:http://hi.baidu.com/tintinsoft/b ... b6b2e7f11f36af.html

评分

参与人数 1威望 +15 收起 理由
猫工 + 15 优秀文章

查看全部评分

回复

使用道具 举报

该用户从未签到

发表于 2009-6-29 09:13:13 | 显示全部楼层
相当好的东西
回复 支持 反对

使用道具 举报

该用户从未签到

发表于 2010-11-17 19:09:09 | 显示全部楼层
好吧  
  我承认我在刷积分
回复 支持 反对

使用道具 举报

该用户从未签到

发表于 2012-9-2 11:54:26 | 显示全部楼层
我是 lazarus 1.0 的安装出现:D:\\RemObjects SDK for Delphi\\Source\\uROClasses.pas(434,25) Error: No matching implementation for interface method "IUnknown.QueryInterface(constref TGuid,out <Formal type>)ongInt; StdCall;" found
是什么原因呢,
回复 支持 反对

使用道具 举报

该用户从未签到

发表于 2012-10-5 16:33:36 | 显示全部楼层
努力研究并学习中
回复 支持 反对

使用道具 举报

QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1

GMT+8, 2019-8-26 11:12 , Processed in 0.131044 second(s), 28 queries .

Powered by Discuz! F1.0 Build 20160930

© 2001-2019 Comsenz Inc. & Discuz! Fans

快速回复 返回顶部 返回列表