排序:
默认
按更新时间
按访问量

superobject 解析json串

uses    superobject;   procedure TForm1.FormCreate(Sender: TObject); var aJson: ISuperObject; aSuperArray: TSuperArray;    i:Int...

2018-03-09 16:13:47

阅读数:40

评论数:0

web微信协议通讯过程

微信Web版通信过程分析 ===================================== 本文参考 《挖掘微信Web版通信的全过程》 代码参考 Python网页微信API     附作者根据以上代码用.NET重构的版本  =================...

2018-03-08 13:27:11

阅读数:57

评论数:0

WEb微信协议

[文档]Web微信协议 1.登录 1.1 获取uuid(get) 请求 https://login.wx.qq.com/jslogin?appid=wx782c26e4c19acffb&redirect_uri=https%3A%2F%2Fwx.qq.com%2Fcgi-b...

2018-03-08 13:26:40

阅读数:155

评论数:0

Dlephi 选择文件夹目录保存

Windows目录对话框是一个标准的WindowsUI控件,其可以列出一个目录列表,并且可以显示新增按钮。由于Delphi中并没有提供对于该控件的封装,所以打开它是个问题。网上有多种方法,试举几例: 1、使用Win31目录下的DriverList、DirectoryList、FileList...

2018-01-26 10:17:36

阅读数:40

评论数:0

几个获取windows系统信息的程序

本文所有的窗体界面略去,读者可根据程序自行添加各窗口组件。 1、获取windows版本信息 可以通过Windows API函数GetVersionEx来获得。 具体程序如下: Procedure Tform1.Button1Click(sender:TObject);   Var...

2018-01-25 09:06:23

阅读数:160

评论数:0

Delphi数据集与记录

1.1Delphi数据库应用程序的层次结构 Delphi数据库应用程序通过数据存取构件对数据库进行访问,通过可视的数据构件(Data Control)将数据呈现给用户,并与用户进行交互。Delphi数据库应用程序的结构如下图: 图 2‑1 Delphi数据库应用程序结构图 Delph...

2018-01-05 17:47:11

阅读数:395

评论数:0

Delphi UDp控件

DELPHI中有两个UDP控件:TIdUDPServer和TIdUDPClient控件,可用于传输UDP数据;用法都很简单,主要是一些细微的特性,弄清楚了对正确使用这两种控件有很大的好处;下面分别介绍: 一、 TIdUDPServer:代表一个UDP的服务端,接收UDP...

2018-01-05 17:45:37

阅读数:169

评论数:0

Delphi 实现图片上下翻转

SrcR := Rect(0, 0, imgTran.Width, imgTran.Height); DesR := Rect(0, imgTran.Height, imgTran.Width, 0); imgEnd.Repaint; imgEnd.Canvas.CopyRect(De...

2018-01-05 17:41:25

阅读数:57

评论数:0

窗体锁定在屏幕内 不可超出桌面屏幕边缘

procedure WMWindowPosChanging(var Message: TWMWindowPosChanging); message WM_WINDOWPOSCHANGING; procedure TFmBack.WMWindowPosChanging(var Message: TW...

2018-01-02 15:04:29

阅读数:42

评论数:0

防止程序运行多个

program main; uses Forms, windows,// Unit1 in 'Unit1.pas' {Form1}; {$R *.res} var hmutex:hwnd; begin Application.Initialize; application....

2017-12-28 13:49:48

阅读数:633

评论数:0

程序开机自启

Uses Registry procedure TFmConnection.SetAutoRun(ok: boolean); var   Reg:TRegistry;       //首先定义一个TRegistry类型的变量Reg begin   Reg:=TRegistry.Create;   ...

2017-12-20 15:43:05

阅读数:34

评论数:0

Delphi窗体任务栏隐藏和透明

把工程里的Application.MainFormOnTaskBar:=true ;  改为 Application.MainFormOnTaskBar:=False ;  在onshow 里加入:ShowWindow(Application.Handle, SW_HIDE); //不在任务栏显...

2017-12-15 09:06:09

阅读数:304

评论数:0

Delphi XE(Indy10)TIdBytes转AnsiString的实现

TIdBytes 类型引用自单元 IdGlobal; 其原型定义为    TIdBytes = array of Byte; 转换函数如下:经过测试多次发送后在字符串尾部不会出现乱码或多余字符 [delphi] view plain copy pri...

2017-11-30 16:43:50

阅读数:402

评论数:0

Indy10 IdudpServer获取字符串数据Read事件,TIdBytes类型的使用,支持中文

Indy10 IdudpServer获取字符串string类型数据,采用Read事件,TIdBytes类型的使用,支持中文,双字节。 indy10变化相当大,都不会用了。开始被Tidbytes这个类型搞晕。 Indy10 IdudpServer使用 uses IDGlobal; R...

2017-11-30 16:33:38

阅读数:310

评论数:0

Delphi 画布或者窗体实时刷新时会出现闪烁的效果

选择窗体或者image所在的控件,把Doublebuffer属性设置为True即可

2017-11-22 16:57:34

阅读数:368

评论数:0

SQL语句

SQL语言是数据库编程中最常使用的,功能非常强大,在delphi中只有通过Query组件使用,所以心铃用一讲的篇幅着重讲一下。在网上这方面的内容很多,还有专门的书籍讲解SQL,如〈SQL21天自学通〉,建议大家阅读一下。本讲中主要讲解编程中最常用的一些语句,由于初学者对语法不熟悉,所以这里以例句的...

2017-11-22 11:41:39

阅读数:68

评论数:0

动态SQL语句

动态使用SQL语句的几点技巧:     动态SQL语句,就是SQL语句中参数会变化的SQL语句,一般在程序中要根据用户的需要随时改变其参数值,对于动态SQL语句必须注意以下几点:   ●先调用Close方法,关闭Query组件。如果Query组件已经关闭,调用Close方法不会出错, 也没有其...

2017-11-22 11:36:01

阅读数:62

评论数:0

ExecSQL的方法

Query组件的常用方法: 1.  ExecSQL方法 用来执行SQL代码,也就是说执行你在SQL属性编写好的SQL语句。Query组件还有一个Open方法,也是用来执行SQL代码的,但二者之间有不同之处:Open方法只能用来执行SQL语言的查询语句(Select命令),并返回一个查询结果集。...

2017-11-22 11:32:59

阅读数:234

评论数:0

Guid生成唯一ID编号

function GetGUID: string; var i: Integer; GUID: TGUID; begin i := 0; Result := ''; while i < 3 do begin if CoCreateGuid(GUID) = S...

2017-10-13 16:27:56

阅读数:279

评论数:0

delphi中使用sql语句加条件引用时值是一个整型变量的问题

转自蒋老师的个人博客http://www.cnblogs.com/JTeacher/archive/2012/11/19/2776968.html

2017-10-13 16:17:27

阅读数:748

评论数:0

提示
确定要删除当前文章?
取消 删除
关闭
关闭