- 博客(144)
- 收藏
- 关注
RSS订阅原创 Delphi 中string字符串转换Byte[]字节数组
functionTForm1.HexStrToByte(HesStr:String):Byte;variLen:Integer;beginResult:=0;iLen:=length(HesStr);ifiLen<>2thenExit;Ifnot(HesStr[1]in['0'..'9','A'..'F','a'....
2019-10-31 09:12:13
3038
原创 uCharts Y轴格式化
1、Y轴格式化用法：yAxis:{data:[{calibration:true,position:'left',title:'折线',titleFontSize:12,format:(val)=>{returnval.toFixed(0)+'度'}}],showTitle:true,gridType:'dash...
2019-10-31 08:03:49
5820
1
原创 java博客及网址
http://blog.csdn.net/q383965374，主要方向：Java、MongoDb等。http://blog.csdn.net/u012562943，主要方向：Java、各类框架等。https://blog.csdn.net/luanpeng825485697/category_9270006.html 一个demo学会c# js java jquery echarts...
2019-10-31 08:03:39
75
原创 Css经典笔记
Css经典笔记https://blog.csdn.net/luo609630199/article/details/80066491
2019-10-31 08:03:25
90
原创 C#工具类
图片处理类 https://www.cnblogs.com/systemnet123/p/3492064.html 字符串处理帮助类 https://www.cnblogs.com/systemnet123/p/3492056.html一个C#文件传输模块,支持断点续传 https://www.cnblogs.com/systemnet123/p/3255521.html如何将WCF服...
2019-10-31 08:03:12
88
原创 SQLserver相关博客及网址
https://www.cnblogs.com/zhijianliutang/category/277162.html SQL SERVER--53http://blog.csdn.net/dba_huangzj 主要方向：Sql Server的数据管理。https://www.cnblogs.com/chillsrc/category/49632.html 数据库优化57篇ht...
2019-10-31 07:58:12
211
原创 wcf整理资料
wcf整理资料https://www.cnblogs.com/systemnet123/archive/2013/04/09/3011253.htmlWCF 4.0中的WS-DiscoverWCF安全指南发布WCF 3.5对HTTP编程的增强WCF中的Stream操作WCF应用程序的程序集划分WCF中的自定义集合VS 2008 beta2英文版的SvcUtil问题...
2019-10-31 07:57:33
84
原创 用SQL删除重复记录的N种方法
delete from ItemForScore where ifsid not in (select min(ifsid) from ItemForScore group by itemid,topflag,isactive having COUNT(-1)>1) and itemid in (select itemid from ItemForScore group by item...
2019-10-31 07:54:41
947
原创 Delphi过程函数传递参数的几种方式
在Delphi过程、函数中传递参数几个修饰符为Const、Var、Out。另一种不加修饰符的为默认按值传递参数。一、默认方式以值方式传递参数procedure TForm1.ProcNormal(Value: string);beginOrigNum:=Value+' Me';lblReturn.Caption:=OrigNum;//OrigNum为'Hello Me'...
2019-10-29 08:16:29
187
原创 POS小票打印
// 向LPT口打印一个文本文件procedure TPosFrm.PrintFile(AFileToPrint: string);varPort, FileToPrint: TextFile;ALine: string;beginAssignFile(FileToPrint, AFileToPrint);Reset(FileTopr...
2019-10-29 08:16:21
268
1
原创 Delphi制作DLL小结
一 Dll的制作一般分为以下几步：1 在一个DLL工程里写一个过程或函数2 写一个Exports关键字，在其下写过程的名称。不用写参数和调用后缀。二 参数传递1 参数类型最好与window C 的参数类型一致。不要用DELPHI的数据类型。2 最好有返回值[即使是一个过程]，来报出调用成功或失败，或状态。成功或失败的返回值最好为1[成功]或0[失败].一句话，与windows c 兼容。...
2019-10-29 08:16:10
172
原创 delpji子窗体继承父窗体控件在设计时就出现
假设改窗体TForm1，继承父窗体TForm2。1.修改Unit1.pas单元文件usesWindows,...,Unit2;//增加typeTForm1=class(TForm)改为 TForm1=class(TForm2)2.修改窗体文件在Form1上单击右键,选择 "ViewasText...
2019-10-29 08:16:01
139
转载 Delphi语句语法、过程函数
转载至：http://blog.csai.cn/user1/9162/archives/2006/2946.html#1.语句1)简单语句表达式（它是由操作符和操作数组成）、赋值语句、调用语句都属于简单语句。2)复合语句用begin……end把简单语句括起来组成复合语句。3)赋值语句赋值语句的符号是冒号＋等号即 ：=...
2019-10-29 08:15:53
409
原创 Delphi Treeview 操作实例
怎么改变Treeview中的图标? OnClick事件Click获取Node.text 批量处理及实现TreeView结点拖拽的实例//这个过程根据你的要求选择图标procedure TForm1.TreeView1GetImageIndex(Sender: TObject; Node: TTreeNode);beginif Node.HasChildren thenif...
2019-10-29 08:15:43
759
原创 在delphi中TApplicationEvents控件的用途与使用方法
在delphi中TApplicationEvents控件的用途与使用方法使用ApplicationEvents来拦截窗体消息项目需要一些全屏展示的web页面，结果碰到一个问题，当窗体上的webbrowse控件打开了网页之后，窗体就不响应键盘消息了~~~~郁闷了会儿，过后才研究出来用ApplicationEvents这个控件就可以实现~~~要么的话，就只有HOOK窗口消息了~~以下是O...
2019-10-29 08:15:31
1999
原创 delphi IOUtils单元 处理文件路径相关
Delphi 2010 新增功能:IOUtils单元:TPath的方法与属性以后路径相关的处理, 用 IOUtils.TPath 就很方便了.--------------------------------------------------------------------------------//较常用的方法:TPath.GetTempPath; ...
2019-10-29 08:15:16
200
原创 如何快速发现和处理sqlserver数据库的死锁
推荐：公告：请您及时更换请请请您正在使用的模版将于2周后被下线，请您及时更换× 加载中… 新浪首页登录注册 用户5575279374的博客 <div id="bloglink" class="bloglink"><a href="...
2019-10-29 08:14:48
674
原创 Delphi Excel导入 的通用程序
Delphi Excel导入 的通用程序 .分类： delphi 2012-09-24 18:19 127人阅读 评论(0) 收藏 举报exceldelphiintegerprocedure TForm1.btnClick(Sender: TObject);beginOpenDialog1.Title := '请选择正确的excel文件';OpenDialog1.Fi...
2019-10-28 13:32:07
153
原创 delphi中日期格式的设定
XP和Win7的日期格式在系统默认中并不一致，也许会对编程造成困扰，不是吗？ 设定系统日期的默认格式可以改变这一问题，可是这听起来并不完美。 通过Forms.TApplication.UpdateFormatSettings设定可以很好的解决问题。这是Help里的描述：Specifies whether format settings are updated automatical...
2019-10-28 13:31:54
819
原创 Delphi中JSon SuperObject 使用:数据集与JSON对象互转
在delphi中，数据集是最常用数据存取方式。因此，必须建立JSON与TDataSet之间的互转关系，实现数据之间通讯与转换。值得注意的是，这只是普通的TDataset与JSON之间转换，由于CDS包含了Delta数据包，其数据格式远比普通的TDataset更复杂。数据集字段信息，是一个完整的字典信息。因此，我们在JSON必须也建立字典信息，才能创建数据集的字段信息。我们设置其JSON信息如下...
2019-10-28 13:31:37
777
原创 Delphi中易混淆的概念 Owner, Parent, Self,
一、Owner和Parent的区别： Parent属性是指构件的包容器，构件只能在此范围内显示和移动。举例子如下： (1)在Form1的窗体上，放一个Panel1,并将Panel1拉大， (2)在Panel1上放一Button1； (3)在Form1上放一Button2。 现在如果移动Panel1,则Button1随着Panel1移动，这是因为Button1的Pare...
2019-10-28 13:31:19
411
原创 Delphi高精度计时方法
//取毫秒级时间精度(方法一)： var t1,t2: int64; r1: int64; begin t1:=GetTickCount;//获取开始计数 WINDOWS API sleep(1000);{do...}//执行要计时的代码 t2:=GetTickCount;//获取结束计数值 r1:=t2-t1;//取得计时时间，单位毫秒(ms)...
2019-10-28 13:30:27
424
原创 Delphi的内存管理及内存泄露问题
这几天因为一个程序长时间运行出现比较严重的内存泄露问题，开始关注了一下内存管理方面的东西，以前也注意内存管理，创建了对象及时释放，但总有忘了处理的情况。在Delphi中没有自动回收机制，所以一定要及时释放使用的内存，虽然有时小的内存泄露并不会造成太大的问题。Delphi中检测内存泄露可以使用开源的FastMM(http://sourceforge.net/projects/fastmm/)...
2019-10-28 13:30:14
1516
原创 自己写的一些Delphi常用函数3
//------------------------------------------------------------------------------//其它过程//------------------------------------------------------------------------------functionTrimInt(Value...
2019-10-28 13:29:59
105
转载 自己写的一些Delphi常用函数
unit JrCommon;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ShellAPI, CommDlg, MMSystem, StdCtrls, Registry, JrConsts, Winsock;//--------------...
2019-10-28 13:29:35
361
1
原创 SQL2008一个通用的sql server分页查询
CREATEPROCEDUREdbo.P_viewPage_A @TableNameVARCHAR(200),--表名 @FieldListVARCHAR(2000),--显示列名，如果是全部字段则为* @PrimaryKeyVARCHAR(100),--单一主键或唯一值键 @WhereV...
2019-10-28 13:29:20
983
1
原创 将中文字符串转换成 UTF8 编码的函数
这种转换一般用于网页地址; 我不知道 Delphi 是不是有现成的函数, 用到了就写了一个.//函数:function ToUTF8Encode(str: string): string;var b: Byte;begin for b in BytesOf(UTF8Encode(str)) do Result := Format('%s%%%.2x', ...
2019-10-28 13:28:59
1372
原创 Delphi编写自定义控件以及接口的使用
给觉得自己编写Delphi很复杂的人，包括自己。Delphi自己写控件其实并不难，难的在于开发复杂的控件。（其实，编程，很多东西都是会了就不难，因此，我怕自己日后觉得自己写控件很难，特意在这记录自己写控件的过程，顺便也写下接口的使用）第一步：控件代码：下面是控件的一个Unit内容：代码Code highlighting produced by Actipro CodeH...
2019-10-25 08:52:13
414
原创 多线程程序编写需要遵循的几点
我列出下多线程程序编写需要遵循的几点，希望对大家有所帮助：1.子线程千万不要访问主线程的UI,(memo，Label)，我发现这样做的程序员很多，在diocp中经常会用到onConnected/OnDisconnected事件中直接操作主窗体的Memo。导致程序无法正常退出，或者出现卡死主界面的情况，原因我想可以归纳到访问冲突上面,用临界也不能解决问题。很多组件都是靠windows消息驱...
2019-10-25 08:52:07
157
原创 Delphi 多线程编程
原文地址：Delphi多线程编程作者：liwenchao828多线程的基本概念WIN 98/NT/2000/XP 是个多任务操作系统，也就是：一个进程可以划分为多个线程，每个线程轮流占用CPU 运行时间和资源，或者说，把CPU 时间划成片，每个片分给不同的线程，这样，每个线程轮流的“挂起”和“唤醒”，由于时间片很小，给人的感觉是同时运行的。多线程带来如下好处：（自己...
2019-10-25 08:51:50
340
原创 主程序与DLL之间的全局变量问题
有几个朋友经常向我问题在DLL中怎么共用一个全局变量。比如像用户登陆后的用户名(UserName)...其实这个问题很简单。下面我把我的做法写出来大家一起分享。把共享的变量放在主程序里:UserName,....等等,在主程序里写两个函数Function CurUserName():PChar;beginResult:=pchar(UserName);end;pro...
2019-10-25 08:51:42
540
原创 好-如何在Exe和BPL插件中实现公共变量共享及窗口溶入技术Demo源码
http://blog.csdn.net/xieyunc/article/details/45115689如何在Exe和BPL插件中实现公共变量共享及窗口溶入技术Demo源码1、Delphi编译方式介绍：当我们在开发一个常规应用程序时，Delphi可以让我们用两种方式使用VCL，一种是把VCL中的申明单元及实现单元全部以静态编译的方式编译并链接进Exe可执行文件中，这样做的好处就是...
2019-10-25 08:51:19
239
原创 SQL Server— 存在检测、建库、 建表、约束、外键、级联删除语句
/******************************************************************************** *主题： SQL Server— 存在检测、建库、 建表、约束、外键、级联删除 *说明：本文是个人学习的一些笔记和个人愚见 * 有很多地方你可能觉得有异议，欢迎一起讨论 ...
2019-10-25 08:51:15
173
原创 百度输入提示 Delphi 实现
我们在百度时，输入部分内容，即可获得输入项选择列表，从而大大减少录入，用户的体验很好，下面是用delphi 模拟这种效果的设计定义DataLst: TStringList;用于存放供选择的数据。Edt1：TEdit;用于接收用户录入lbSerach: TListBox;用于显示提示列表procedure FillData(...
2019-10-25 08:51:09
107
原创 SQL SERVER临时表的使用
http://www.cnblogs.com/maxianghui/archive/2007/10/12/922317.htmlSQL SERVER临时表的使用SQL SERVER临时表的使用--删除临时表#Tmpcreate table #Tmp --创建临时表#Tmp(ID int IDENTITY (1,1) not null, --创建列ID,并且每次新增一条记...
2019-10-25 08:50:47
199
原创 关于FireDAC返回多结果集的问题
以前使用ADO, 如果SQL返回的结果集有多个 可以通过NextRecordset来依次获取代码移植到FireDAC, 对于多结果集处理差不多, 但是还是有一些不一样的地方:1.TDataSet本身是不支持多结果集的, 所以不要再这个上面浪费精力2.切换到下一个结果集, ADO.NextRecordset 对应 FD.NextRecordSet3.判断是否有下一个结果集, ADO的...
2019-10-25 08:50:33
379
原创 delphi FastReport设置二维码内容
FReport.OnBeforePrint:=self.OnBeforePrint;procedure TMyLabelPrint.OnBeforePrint(Sender: TfrxReportComponent);var QrCodeMemo:TfrxBarcode2DView;begin QrCodeMemo:=TfrxBarcode2DView(FReport.FindOb...
2019-10-25 08:49:37
2253
原创 FireDAC连接Postgre数据库出错
Postgre cannot insert multiple commands into a prepared statement悲剧...FireDAC连接Postgre数据库, 使用默认的属性,一次执行多条SQL的时候, 会报"cannot insert multiple commands into a prepared statement"这样的错误到网上查了一下(百度), 什...
2019-10-24 08:15:35
863
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人