
Lazarus
love3s
这个作者很懒,什么都没留下…
展开
-
Lazarus打开URL及文件(适用于WinCE)
uses LCLIntf;procedure TForm1.Button1Click(Sender: TObject); begin //--打开网页 LCLIntf.OpenURL('www.hao123.com') //必须至少加上w原创 2011-09-05 18:42:23 · 1606 阅读 · 0 评论 -
WinCE下使用Lazarus获取设备名
uses Registry;function GetDeviceName: string;var aReg:TRegistry;begin aReg := TRegistry.Create(KEY_READ); try aReg.RootKey原创 2011-08-18 09:49:08 · 1233 阅读 · 0 评论 -
Lazarus下WinCE调试
Lazarus下的WinCE调试终于成功了,喜美了! 现在将调试步骤记下来,备忘,同时分享给需要的人。 需要的工具: 1、Lazarus + WinCE —— 废话,没有这个工具,何来调试之需! 2、设备仿真管理器 3、ActinveSy原创 2011-10-10 16:42:33 · 4872 阅读 · 0 评论 -
Lazarus 下如何让非可视化组件(类)截获事件
二话不说直接上源码,很简单,哈哈unit uMessageTest;{$mode objfpc}{$H+}interfaceuses Windows, LMessages, Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls, InterfaceBase;c原创 2011-09-03 10:33:01 · 1735 阅读 · 0 评论 -
获取计算机名及用户名
{$ifdef WINDOWS}uses Windows;{$endif}{$ifdef UNIX}uses BaseUnix;{$endif}{$ifdef UNIX}function GetUserName: String; begin Result:=GetEnvironmentVariable('USER'); end;{$endif}{$if转载 2012-04-10 17:02:59 · 2220 阅读 · 0 评论 -
Lazarus Gif控件
下载地址:http://115.com/file/anqcnx2t#gifanim.zip原创 2012-04-25 17:02:23 · 1637 阅读 · 1 评论 -
Linux下使用Lazarus创建快捷方式
procedure TFormClientAgent.ActAppCreateLinkExecute(Sender: TObject);var vFileName: string; iniFile: TIniFile;begin try vFileName := GetDeskTopDir + '/AR.desktop'; IniFile := TIn原创 2012-05-05 14:10:49 · 1431 阅读 · 0 评论 -
绿色便携版Lazarus的制作教程
本文来源: www.fpccn.com原作者:逍遥派掌门人 本教程不用更改lazarus的任何源代码,安全性很高。1、先到Lazarus wiki下载所需要的版本。2、安装到硬盘的任何地方,如安装目录: d:\lazarus。3、安装好各种所需要的组件、控件,并退出 lazarus 的IDE。4、在安装目录里建一个新的目录,如:config ,则路径转载 2012-04-11 16:50:01 · 4046 阅读 · 0 评论