- 博客(19)
- 资源 (18)
- 收藏
- 关注
转载 TMemoryStream、String与OleVariant互转
TMemoryStream、String与OleVariant互转//////////////////////////////////////////////////////////////////////////////////功能: STRING 的内容流化到 OLEVARIANT 中//参数:////////////////////////////////////////
2017-09-29 19:50:04 510
转载 JSON 之 SuperObject(14): 从 XML 中解析
JSON 之 SuperObject(14): 从 XML 中解析SuperObject 文件包中还有一个 SuperXmlParser 单元, 可以从 XML 中解析出 ISuperObject.SuperXmlParser 只有三个函数: XMLParseString、XMLParseStream、XMLParseFile, 分别从字符串、流、文件中解析.遗憾的是对
2017-09-29 09:01:32 1026
转载 Delphi DataSet和JSON互转函数
一、DataSet转JSON[delphi] view plain copy print?//1)数据集转换为JSON字符串: //需USES System.JSON; function DataSetToJson(ADataset: TDataSet): string; // [{"CityId":"18","CityName":"西安"},{"Ci
2017-09-28 20:49:10 1539
转载 HTTP协议详解(真的很经典)
Author :Jeffrey引言HTTP是一个属于应用层的面向对象的协议,由于其简捷、快速的方式,适用于分布式超媒体信息系统。它于1990年提出,经过几年的使用与发展,得到不断地完善和扩展。目前在WWW中使用的是HTTP/1.0的第六版,HTTP/1.1的规范化工作正在进行之中,而且HTTP-NG(Next Generation of HTTP)的建议已经提出。HTTP协
2017-09-27 09:21:33 351
转载 Sending a URL to Another App on Android and iOS with Delphi XE5
Here is the source code for my Open and View URL library from my CodeRage 8 session “Beyond the App”. Here is a download of the example app. I’ll see about posting it to a SVN repository too so it
2017-09-26 17:11:26 836
转载 使用 BinToHex() 把 TBytes 转换为十六进制字符串
{函数}function BytestoHexString(ABytes: TBytes; len: Integer): AnsiString;begin SetLength(Result, len*2); BinToHex(@ABytes[0], PAnsiChar(Result), len);end;{测试}procedure TForm1.FormCreate(Sende
2017-09-20 19:29:15 1881
转载 Delphi下16进制位图数据转位图
如果我们在Form中拖入一个Image控件,并设置好picture后,Alt+F12就可以看到Form的源代码中已经将图片转成了16进制字符串,如下:object Image1: TImage Left = 536 Top = 24 Width = 105 Height = 105 Picture.Data = { 075442697
2017-09-20 19:02:22 1439
转载 TClientDataSet[20]: 使用 Blob 字段
Blob(Binary Large Object) 字段包括:ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString,ftLargeint, ftADT, ftArray, ftReferen
2017-09-20 17:20:46 856
转载 OleVariant 与 Variant
olevariant存在于windows和linux平台,这二种类型主要的不同是variant类型仅是当前的应用程序可以进行操作,而olevariant类型则是ole自动化服务器所以定义的统一的数据类型,意味着可以通过网络或其他程序进行操作,当然也不必担心其他客户端如何进行操作.当你给一个variant类型的变量赋自定义的值的时候(例如delphi string,或一个其他的新的自定义类型
2017-09-20 13:55:48 2533
转载 delphi 流Stream 和 Variant 的转换函数
作者: 陆岛工作室Variant 转换成 Stream 的函数procedure VariantToStream (const v :olevariant; Stream : TMemoryStream); var p : pointer; begin Stream.Position := 0; Stream.Size := VarArrayHighBo
2017-09-20 13:53:48 1303
转载 delphi formatdatetime 毫秒
e/ee/eee/eeee 以相应的位数显示年FormatdateTime('ee',now); 输出为:04 (表示04年)m/mm/mmm/mmmm 表示月FormatdateTime('m',now);输出为:8FormatdateTime('mm',now);输出为 08FormatdateTime('mmm',now);输出为 八月Fo
2017-09-20 10:51:42 6896
转载 TMemoryStream、String与OleVariant互转
TMemoryStream、String与OleVariant互转//////////////////////////////////////////////////////////////////////////////////功能: STRING 的内容流化到 OLEVARIANT 中//参数:////////////////////////////////////////
2017-09-20 09:15:03 739
转载 Delphi 自带了 Base64 编解码的单元
Delphi 自带了 Base64 编解码的单元,叫 EncdDecd,这名字很拗口而且不直观,估计这是一直很少人关注和知道的原因。这个单元提供两套四个公开函数:对流的编解码:procedure EncodeStream(Input, Output: TStream); // 编码procedure DecodeStream(Input, Output: TStream); // 解码
2017-09-20 09:13:23 1492
转载 delphi 怎么将一个流转换成字符串?
//from http://kingron.myetang.com/zsfunc0d.htm (*// 标题:充分利用pascal字符串类型 说明:和PChar不同,string可以保存#0字符在其中;示例文件、内存流字符串之间转换 设计:Zswang 日期:2002-01-25 支持:wjhu111@21cn.com //*)
2017-09-19 20:54:18 1499
原创 利用Delphi的File Of Type创建并管理属于你自己的数据库
前言 在程序中,我们需要用一个途径去把一些有规律的信息存储在磁盘上。不能用TXT格式的文件──因为它不是基于“记录”的,而且管理很不方便。 BDE或ADO也就是说Paradox、Access……唉,不列举了──这些我都不想用,尤其不想用BDE。我要用的是ASCII文本文件。Delphi能做到吗?当然能!这就是“File Of”类型文件,或者说files of some type/bi
2017-09-19 20:53:03 1268
转载 delphi把Clientdataset的Delta保存到数据库
版权声明:本文为博主原创文章,未经博主允许不得转载。[delphi] view plain copy //ATableName-表名, AKeyField-主键,多个主键用;隔开,如 ;pid;times; from:unit HlsImplBase; [delphi] view plain copy function T
2017-09-18 20:40:41 3122
转载 Delphi中ClientDataSet浅析
与一般的数据集组件不同,TClientDataSet使用的技术比较特别,本着高速度、低存储需求的原则TClientDataSet的内部使用了两个数据存储源。第一个是其Data属性,这是当前内存数据的视图,反映了所有的数据改变。如果用户从数据中删除一条记录,则此记录将从Data中消失,相应地,加入一条新记录后,此记录便存在Data属性中了。另一个数据源是Delta属性,故名思义,即增量的意思,这个属
2017-09-18 20:39:41 1274
转载 学会使用SafeArray 之 Delphi 篇
在学习的时候曾经百度了一下,想查找关于delphi中SafeArray的用法,没想到资料竟然如此之少,甚至连一篇相对完整的都没有。也许正如田师傅所说,现在高手们都在实行“技术封锁”了? 在CSDN技术中心有一篇关于C++的使用,说的比较详细。鉴于手中有田师傅写的代码,特拿来一部分对照自己学习的,翻译为Delphi版本。留作笔记,日后翻阅。=====================
2017-09-18 20:38:31 2373
转载 Interlocked、InterlockedExchangePointer原子访问系列函数
原文:http://blog.csdn.net/ace1985/article/details/5729912所谓原子访问,指的是一个线程在访问某个资源的同时能够保证没有其他线程会在同一时刻访问同一资源。Interlocked系列函数提供了这样的操作。所有这些函数会以原子方式来操控一个值。Interlocked函数的工作原理取决于代码运行的CPU平台,如果是x86系列C
2017-09-06 21:25:00 2840
delphi socket api 应用示例
2016-03-26
数据库连接通用管理模块(源码、例子)
2009-05-14
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人