Installing Ro SDK in Lazarus and its simple example

Source: Internet
Author: User

Http://hi.baidu.com/tintinsoft/blog/item/a901af8e8eb6b2e7f11f36af.html

Supplement: If Lazarus was previously installed, the RO control would be deleted from Lazarus, And Lazarus would also be deleted from my documents. Then I would like to thank my Russian friends for cracking the control, thank you for your visit.

 

Supplement: 1. Download Indy and decompress it to any folder.
2. Start Lazarus in administrator Mode
3. Open the package and select Indy/Lazarus/indylaz. LPK.
3. Add the idglobal. PAS and idstreamvcl. PAS files in the Indy/FPC folder.
4. Compile, install, and complete

 

 

 

Lazarus
Recently, it has become popular and can be developed on Windows, Linux, and UNIX platforms. What's more attractive is that you can use kol to develop the wince program. Recently, many control vendors have supported
Lazarus, such as remobjects (ro sdk + DA + hy) and devart (Unidac. The following is a brief introduction
Install Ro SDK (ro sdk 6.0.39) in Lazarus (Windows, v0.9.27 ).

1,

Install

Remobjects_core_lazarus_windows.lpk

Then install remobjects_synapse_lazarus_windows.lpk.

To install the RO control of Indy, you must download the FPC version 10.2.3 from the Indy official website.

2. Install remobjects_everwood_lazarus_windows.lpk under Everwood.

3. Install the remobjects ide package, that is, the IDE path remobjects_ide_lazarus_windows.lpk under sources.

 

If not found during installationZlib1.dll
To download the file from the official website Lazarus, or the Delphi fpr php Directory also contains the zlib1.dll file. Put it in the current directory of Lazarus.

A simple example (usingTrosynapsesupertcpchannel
) To obtain the server time and IP Address:

 

Compile and run:

 

The server uses super synapse TCP.

 

Lazarus's Ro client programming is no different from that in Delphi. For example, if xxx_intf is referenced, the interface unit can still be generic.

Statement:

Remoteservice: iservcommfunc;

Create:

Remoteservice: = coservcommfunc. Create (binmsg, Channel );

Call:

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;

(MustZlib1.dll
Put it in the Client Program)

Lazarus + RO is expected to run the server on Ubuntu and use a variety of Windows desktop programs on the client.

I have installed Ubuntu 9.0.4 on a virtual machine. I need to add some knowledge about Linux in the next step.

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.