CodeTyphon 6.9 默认CodeTyphon没有开启代码之间连线功能,一直不知道如何调出来,在使用CodeTyphon 和 Lazarus 很渴望也能像Delphi那样有这种功能,实际上它们有这种功能,只是默认没有开启!! 开启步骤: 顶部菜单,tools -> Options,在随后的配置对话框中,选择左侧的"Display" -> "Mark and Mactches",随后选择右侧的“Outline(global)”,随后点击“OK”按钮…

*Delphi之通过代码示例学习XML解析.StringReplace的用法 这个程序可以用于解析任何合法的XML字符串. 首先是看一下程序的运行效果: 以解析这样一个XML的字符串为例: <?xml version="1.0" encoding="UTF-8"?><BookInfo><Owner><OwnerName>张三</OwnerName><OwnerAge>1234</Owner…

[转]如何在html与delphi间交互代码 (2015-11-19 22:16:24) 转载▼ 标签: it 分类: uniGUI uniGUI总群中台中cmj朋友为我们总结了如下内容,对于利用delphi+uniGUI开发应用,可以说是精品,必须掌握.一句话,如何在html与delphi间交互代码,是最好的答案. [ClientEvents操作]Js存取Edit,Memo元件值getValue,setValue    MainForm.Edit1.setValue(“ABCDE”); //把…

DELPHI微信支付代码   不管是微信支付还是支付宝支付, 3个最棘手的问题是:1,如何生成签名2,支付请求如何提交3, 如何验证签名 下面就围绕这二个问题来讲. 我使用的是XE3. 先看微信支付:1,微信支付的签名生成 uses IdHashMessageDigest, NatvieXml; //我使用的是NativeXml4.07 function TMicroPayParamBuilder.GetSign: string;varDigest: TIdHashMessageDigest5;…

[转]如何在html与delphi间交互代码 (2015-11-19 22:16:24) 转载▼ 标签: it 分类: uniGUI uniGUI总群中台中cmj朋友为我们总结了如下内容,对于利用delphi+uniGUI开发应用,可以说是精品,必须掌握.一句话,如何在html与delphi间交互代码,是最好的答案. [ClientEvents操作]Js存取Edit,Memo元件值getValue,setValue    MainForm.Edit1.setValue(“ABCDE”); //把…

CodeTyphon是一个免费的Pascal语言可视化编程工作室软件包,基于Free Pascal和Lazarus.相当于Delphi 的RAD Studio. CodeTyphon支持多平台开发,包括多平台的编译器.RAD IDE和调试器,并集成了大量的组件包(包括源码).支持32位和64位开发,并可以进行跨平台的交叉编译. CodeTyphon提供控制中心,完成平台编译.安装控制.组件包控制.交叉编译.还包括一些其它的工具. 1.CodeTyphon官方网站下载 http://www.pil…

致谢:[XE3]MN,让我加快完成了使用CodeTyphon进行交叉编译! CodeTyphon版本: 6.0 下载:http://www.pilotlogic.com/codetyphon/zips/CodeTyphonIns.zip 主机操作系统:Windows10 X64 企业版 主机操作系统,是当前开发和编译FreePascal程序使用的操作系统,所有编译需要的程序开发.编译.测试都在这个操作系统完成,随后在这个操作系统中,不对源代码进行任何修改的情况下,编译出目标操作系统中的程序. 目…

当前版本的CodeTyphon默认背景色是黑色,看起来很不习惯,通过下面操作,修改了它的代码编辑器的背景色: 1,打开CodeTyphon的菜单“工具”->“选项”. 2,选择左侧列表项目“颜色”,随后选择右侧上面的“颜色方案”,我选择的是“Delphi”,选择后点击“确定”按钮就可以了.…

CodeTyphon 6.9 在菜单[project]-->[project option]的弹出界面中 选择[compiler option]-->[debugging] 1,去掉“Generate debugging info for GDB (slower / increases exe-size)” 2,去掉“display line numbers in run-time error backtraces (-gl)” 重新编译即可.…

真实业务场景的考虑 按照支付宝或者微信支付的开发手册的说法,一个标准的客户端接入支付业务模型应该是这样的,我忽略时序图,只用文字描述: 用户登录客户端,选择商品,然后点击客户端支付. 客户端收集商品信息,然后调用自己业务平台的预付款接口. 业务平台根据客户端提交的商品信息,生成自己的订单号等内容,并按照第三方支付的要求对订单信息进行拼装组合,并编码和签名. 业务平台返回签名后的订单信息给客户端. 客户端根据这个签名信息,呼出客户端的第三方支付系统,完成支付. 1)准备工作: 支付到指定的商家(一…

Delphi在Webbrowser中插入 HTML/java script代码 使用方法将下面的代码赋值到1个记事本里保存,然后保存为xxx.htm就可以看到效果使用PasteHtml实现功能 的事件 Windows Media播放器 mp3 mp4 Windows Real Player Flash Player Mid背景音乐 图片 的方法 ( (WebBrowser1.Document as IHTMLDocument2).selection.createRange as IHtmlTxt…

由于项目需要,需要在qt下实现floatformat的函数.之前写过一个,但是写得不好.决定重新写一个,参考delphi xe2下的实现.把xe2下的相关代码都看了一遍,xe2的代码思路在这里贴出来.xe2下的代码在system.sysutils下,核心函数是InternalFloatToTextFmt.它有汇编的版本跟纯pascal的版本.汇编看不懂,参考的是纯pascal的版本. 整体流程是: 1)解析format格式化字符串 Result := 0; DecimalSep := AForm…

//浮雕procedure Emboss(SrcBmp,DestBmp:TBitmap;AzimuthChange:integer);overload;var  i, j, Gray, Azimuthvalue, R, G, B: integer;  SrcRGB, SrcRGB1, SrcRGB2, DestRGB: pRGBTriple;begin  for i := 0 to SrcBmp.Height - 1 do  begin    SrcRGB := SrcBmp.ScanLine[…

初步的区别: http://www.embarcadero.com/products/delphi/product-editions http://www.embarcadero.com/fr/products/delphi/product-editions 详细的区别(太经典了,本博客也备份了): http://www.embarcadero.com/products/delphi/Delphi-Feature-Matrix.pdf http://files.cnblogs.com/findu…

参数传递方法 李纬的InsideVCL<第一章>中提到Windows定义的回调函数 typedef LRESULT (CALLBACK*WNDPROC)(HWND,UNIT,WPARAM,LPARAM) 为了加快回调函数执行的效率,Microsoft使用了CALLBACK修饰关键词来定义WNDPROC,而CALLBACK则是定义成FAR PASCAL. 那么为什么FARPASCAL就会更快执行呢?以下为我的解释 (1)cdecl: 通常是C/C++所使用缺省的参数传递方式,它的传递方式是由右到…

这个程序可以用于解析任何合法的XML字符串. 首先是看一下程序的运行效果: 以解析这样一个XML的字符串为例: <?xml version="1.0" encoding="UTF-8"?><BookInfo><Owner><OwnerName>张三</OwnerName><OwnerAge>1234</OwnerAge></Owner><BookMes><…

unit Unit1; interface uses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls; type  TForm1 = class(TForm)    test: TMemo;    Button1: TButton;    Memo…

procedure TfrmSetOutPzTradeDeptPerson.grdTradeClientEditing(Sender: TObject;  AColumn: TcxTreeListColumn; var Allow: Boolean);begin  if not Assigned(grdTradeClient.FocusedNode) then Exit;  Allow := grdTradeClient.FocusedNode.Level = 1;end;…

回到Delphi7传统风格 Floating Form Designer You can now detach the form designer in both, VCL and FireMonkey. You can enable or disable the embedded designer in the Form Designer Options. To detach the form designer, go to Tools > Options > Form Designer,…

一,准备目录假设我们准备将整个FreePascal环境安装到D盘的fpc目录下,那么我们需要创建以下几个目录:d:\fpc_svn\bind:\laz_svn二,准备环境1,安装SVN客户端TortoiseSVN和中文支持包,下载地址:http://tortoisesvn.net/downloads2,使用SVN客户端CheckOut以下数据:SVN URL:http://svn.freepascal.org/svn/fpcbuild/trunk/install/binw32目录:d:\fpc_…

Linux Essentials for Delphi Developers   There is currently no way using Delphi to target Linux. Long ago there was a thing called Kylix that worked on one version of RedHat Linux, barely, back in the 1990s. But in the Community road-map, targeting a…

A curated list of awesome Delphi frameworks, libraries, resources, and shiny things. Inspired by awesome-... stuff. Note that only open-source projects are considered. Dead projects are mainly ignored except for those which do not have alive analogs.…

Awesome Delphi  A curated list of awesome Delphi frameworks, libraries, resources, and shiny things. Inspired by awesome-... stuff. Note that only open-source projects are considered. Dead projects are mainly ignored except for those which do not hav…

CodeTyphon和Lazarus的关系相当于就是ubuntu和linux的关系 不过CodeTyphon提供了很多一键配置即可使用的交叉编译配置,而Lazarus就比较麻烦了,我也没用Lazarus交叉编译过 首先假设我们交叉编译是在windows编译出linux可执行程序,那么我们需要做的事情大致上分为以下几步: 下载跨平台交叉工具链(Download Cross Toolchains) 框选出来的两个都可以 然后选择我们所需的linux,平台cpu位数需要自己根据自己的需求来,选择好后点…

移动端的消息推送大家都体验过,智能手机上一大堆广告等各种消息会不时从消息栏中弹出来骚扰你. PC程序中我们有时也会用到消息推送,比如通知之类.通常我们使用的方法可能更多地使用Socket之类来处理,有时效率更低的方法是做数据库的轮询.如果终端多.消息多,数据库的轮询方式是肯定不能被接受的. 现在比较流行的消息服务器有很多,像Apache的ActiveMQ,升级产品是Apollo,RabbitMQ,还有号称速度最快的ZeroMQ,等等很多.这些消息服务器大多支持各种平台,如Java,PHP,Pyt…

Raspberry Pi3 Lazarus 1.6.2 安装步骤如下: 安装环境:Raspbian Jessie, RPi3 1.安装subversion和unzip Sudo Apt-get update Sudo Apt-get install subversion unizp 2.获取和编译最新的FreePascal编译器Sudo mkdir /usr/local/fpc cd /usr/local/fpc Sudo wget ‪http://sourceforge.net/project…

1.Invalidate介绍 void Invalidate( BOOL bErase = TRUE ); 该函数的作用是使整个窗口客户区无效.窗口的客户区无效意味着需要重绘,例如,如果一个被其它窗口遮住的窗口变成了前台窗口,那么原来被遮住的部分就是无效的,需要重绘.这时Windows会在应用程序的消息队列中放置WM_PAINT消息.MFC为窗口类提供了WM_PAINT的消息处理函数OnPaint,OnPaint负责重绘窗口.视图类有一些例外,在视图类的OnPaint函数中调用了OnDraw函数…

1.我做了三年的.NET,也是三个月前因为项目需要转的delphi整个过渡差不多要一周到两周.正常情况两周后就能熟悉delphi.delphi可以调整开发环境的,你把他的属性和解决方案窗口调成和你用VS一样的用起来就习惯多了.语法的话pascal和C#都是能拉控件的,做起来都是一个模式,非常类似.即便是自己写组件,个人感觉delphi写起来更简单些.如果是做数据库软件的话,delphi用起来就相当方便,和数据库连接代码几乎不用写的.如果是用delphi做工控或网络编程也差不多.delphi其实也…

http://www.delphifans.com/infoview/Article_730.html日期:2006年2月20日 作者:潇潇2003 人气:5602 查看:[大字体 中字体 小字体] 1．引言 在利用Delphi开发应用程序的时候,通常我们要设计出很多各种格式的文档.报表,经常要进行文件的创建.编辑及修改,虽然Delphi本身提供了很多设计报表的控件或方法,但是存在明显的不足,比如中文输入,数据格式的控制等操作起来比较麻烦.利用大家都很熟悉的Office工具结合开发,能够很好的解…

delphi 换行操作 我将我的商用<旅行社管理系统>的 发团通知 部分奉献给您,望对您有所帮助. procedure TFrmMain.N327Click(Sender: TObject); var FWord :Variant; FDoc :Variant; strSQL :string; begin //首先创造对象,如果出现异常就做出提示 try FWord := CreateOleObject('Word.Application'); //WOrd程序的执行是否可见,值为false时…