自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(19)
  • 资源 (11)
  • 收藏
  • 关注

原创 delphi调用chm帮助文件实例

delphi 中如何调用 CHM格式的帮助文件,包括一些其他细节的调用,谢谢! ---------------------------------------------------------------用winexec ---------------------------------------------------------------Uses ShellAPI

2010-04-23 15:12:00 873

原创 SQL SERVER 2005 同步复制技术

一、准备工作: 1.建立一个 WINDOWS 用户,设置为管理员权限,并设置密码,作为发布快照文件的有效访问用户。 2.在SQL SERVER下实现发布服务器和订阅服务器的通信正常(即可以互访)。打开1433端口,在防火墙中设特例 3.在发布服务器上建立一个共享目录,作为发布快照文件的存放目录。例如:在D盘根目录下建文

2010-04-20 09:28:00 495

转载 SQLServer2000同步复制技术实现步骤

一、 预备工作1.发布服务器,订阅服务器都创建一个同名的windows用户,并设置相同的密码,做为发布快照文件夹的有效访问用户--管理工具--计算机管理--用户和组--右键用户--新建用户--建立一个隶属于administrator组的登陆windows的用户(SynUser)2.在发布服务器上,新

2010-04-20 09:27:00 469

转载 adoquery判断数据在缓存中有修改

ADOQry.Filtered:=false;ADOQry.Filtered:=true;ADOQry.FilterGroup:=fgPendingRecords ;FilterGroup             参数解释如下:FgUnassigned        指定不使用任何的过滤器来过滤数据fgNone                   移去任何的

2010-04-15 13:20:00 1496

转载 DELPHI的BPL使用

了解BPL和DLL的关系将有助于我们更好地理解DELPHI在构件制作、运用和动态、静态编译的工作方式。对初学DELPHI但仍对DELPHI开发不甚清晰的朋友有一定帮助。BPL vs. DLL(原文http://www.delphi3000.com/ 翻译:房客)第一部分:有关包的介绍一般我们编写编译一个DELPHI应用程序时,会产生一个EXE文件,也就是一个独立的WIN

2010-04-07 10:10:00 3536 2

转载 clientdataset的详细介绍

标题 : delphi Midas SQLServer的自增字段的处理 关键字: delphi Midas 自增字段 分类 : 个人专区 密级 : 公开 (评分: , 回复: 0, 阅读: 1830) ?? delphi Midas SQLServer的自增字段的处理1.新增时,表中有自增字段,但是不希望用Refresh,直接ApplyUpdates直接看见自增字段的值

2010-04-07 10:09:00 1971

转载 接口的真相

接口(interface)在Delphi中是一个很有意思的东西。Delphi 3开始支持接口,从而形成了COM编程的基础;然而,Delphi中的接口也可用在非COM开发中,实现类似抽象类(含有抽象方法的类)的功能,从而弥补了Delphi中不能多继承(子类有多个同级父类)的不足。这里所讲的interface和一个单元中的interface部分是完全不同的概念,不要混淆。说了半

2010-04-07 10:04:00 717

原创 Delphi2010中的fastMM

Delphi2010集成了fastMM,这回大家调试程序是的时候可以方便地检查内存泄露了。 使用方法如下: 在project中,添加一行 ReportMemoryLeaksOnShutdown := DebugHook<>0;DebugHook<>0 目的是保证单独运行exe文件不会弹出内存泄露框,源码可以不用注释掉此行 program Project1;

2010-04-07 10:02:00 958

转载 DELPHI 指针使用用的一篇好文

    Delphi里自己管理内存的两对函数 new(),dispose()和getmem(),freemem()          大家都认为,C语言之所以强大,以及其自由性,很大部分体现在其灵活的指针运用上。因此,说指针是C语言的灵魂,一点都不为过。同时,这种说法也让很多人产生误解,似乎只有C语言的指针才能算指针。Basic不支持指针,在此不论。其实,Pasc

2010-04-07 09:58:00 815

转载 Remobjects SDK 服务器断线后,客户端重新连接的解决方法

今天在delphibbs里看到有人说ASTA、kbmmw、Remobjects SDK都没有办法解决服务器断线后,客户端继续连接的问题。 其实Remobjects sdk本身就提供了这个功能,实现起来也很简单: 在channel组件的OnLoginNeeded事件调用login,login成功后设置aRetry为True,即可以解决在断线后重新连接的问题

2010-04-07 09:56:00 2146

原创 RemObject 在一个事务中实现多个clientdataset的更新

function TSLPW_Service.ApplyUpdates(var ADeltaArray: DaltaArray): Boolean;//多Clientdatasets的更新var I : integer; Provider : TdataSetprovider; ErrorCount : integer; aTD: TDBXTransaction

2010-04-07 09:53:00 1691

转载 RemObjects Pascal Script使用说明

在工资的计算中,不可避免的需要使用到自定义公式,然而对於自定义公式的实现,我自己想了一些,也在网上搜索了很多,解决办法大致有以下几种:1. 自己写代码去解析公式。这种方法的缺点是,解析的代码很难实现,如果公式的功能比较完整,如增加条件判断或自定义函数。不亚於实现了一个简单的语言编译嚣或解释嚣。所以,只能实现一些诸如加减乘除之类的简单公式。2. 打包成SQL传给数据库去执行。这显

2010-04-07 09:53:00 3405 1

原创 Schemas的连接管理

Data Abstract引入了一种新的方式管理数据库连接: Connection Manager组件。Connection Manager是一个存储命名连接并用于运行时的组件. 同时提供了存储连接池优化执行效率和减少服务资源占用.TDAConnectionManager = class(...) [..] function GetDefaultConnectionName

2010-04-07 09:51:00 653

转载 根据RemObject的远程方法调用原理实现的简单远程方法调用

这篇文章值得认真学习和动手做个小程序跑一下:以下是根据RemObject的远程方法调用原理实现的简单远程方法调用的内容及代码:因为在RemObject中,调用远程方法需要三个单元,即:XXX_Intf,XXX_Invk,XXX_Impl(1)XXX_Intf主要是服务接口声明和代理类定义及实现。(2)XXX_Invk主要是实现了具体的方法执行(3)XXX_Impl主要是服务接口

2010-04-07 09:50:00 869

转载 RemObject的异步调用

特别在internet上,让用户等候处理结果是非常不明智的。用Remobject的异步调用易如反掌。在D2007中IDE调用SERVICE BUILDER菜单codegen/delphi/async interface生成单元_Async.pas。在自己的单元中如:myunit.pas 使用uses _Async.pas。接下来在myunit.pas中增加2各按钮:invoke

2010-04-07 09:43:00 1148

原创 RemObject解决自动生成代码

    用过DELPHI写过多层框架的,可能能RemObject比较熟悉.     RemObjects Service Builder 自动生成代码的同时,也给我们带来困扰. 每个类都要定义在intf文件里, 接口只有一个, 这些显然对我们开发系统来讲, 支持的不够, 我想使用多个接口,也不想没完没了的定义结构. 前一段时间写了一个自动生成元数据的小工具, 可以和界面Stri

2010-04-07 09:40:00 1271

转载 从内存中加载并运行exe(两种方法)

windows似乎只提供了一种启动进程的方法:即必须从一个可执行文件中加载并启动。    而下面这段代码就是提供一种可以直接从内存中启动一个exe的变通办法。    用途嘛,     也许可以用来保护你的exe,你可以对要保护的     exe     进行任意切分、加密、存储,    只要运行时能将exe的内容正确拼接到一块内存中,就可以直接从内存中启动,而不必不安全地去

2010-04-03 23:23:00 5024 1

转载 基于Delphi的接口编程入门

为什么使用接口?  举个例子好了:有这样一个卖票服务,电影院可以卖票,歌剧院可以卖票,客运站也可以卖票,那么我们是否需要把电影院、、歌剧院和客运站都设计成一个类架构以提供卖票服务?要知道,连经理人都可以卖票,很显然不适合把经理人也包括到卖票服务的继承架构中,我们需要的只是一个共通的卖票服务。于是,卖票的服务是个接口,电影院、歌剧院什么的只要都遵循这样一个服务定义就能很好地相

2010-04-03 23:22:00 1006

原创 最好的移动无边框窗口的方法

//直接在MouseDown事件中使用 procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin  ReleaseCapture;//WINAPI释放

2010-04-01 17:21:00 1109

frp内网穿透,解决客户端(frpc.exe)莫名退出后自动重启

frp内网穿透,解决客户端(frpc.exe)莫名退出后自动重启

2023-07-25

Raize Components 7.0 FS D11.0.7z

没有什么好说的,基本上是标配组件了。

2021-10-18

CrossVcl 1.53.7z

CrossVcl is a toolchain that permits the development macOS and Linux application using Embarcadero OSX compiler and VCL. Conceptually, CrossVcl is a combination of two major components: Runtimes: Brand-new implementations of WinAPI for macOS nad Linux, tightly integrated with the native OS runtime. Design Time Management: An IDE expert which allows to add OSX64 and Linux64 platform to VCL project and setup it with CrossVcl.

2021-05-28

FastReport V6.4.8_ByJoe.7z

解决 fastreport 字符中出现 行首 为标点符号的问题.

2020-06-24

FlyTreeViewPro.Suite.7z

此控件在树控件,速度绝对可以称为最快(没有之一) 10万个节点,不管是创建,还是清除,1秒钟内可以创建完成,而其它同类控件至少需要15秒;(我的电脑 I5-10500 + 32G + SSD(NVME)500G * 2) 有一个小细节须注意。 TreeView1.ITEMS.beginUpdate; // 生成树的代码 TreeView1.ITEMS.endUpdate; 如果前后不加上 BeginUpdate 与 EndUpdate 的话, 生成速度甚至不如同类控件;

2020-06-02

控件开发基础.rar

想要学习DELPHI的控件开发,这个资料非常的值得一看。 Delphi控件开发 1~8 由CowNew开源团队撰写。 文章将通过一个简单的例子来为初学者介绍编写控件的一些基本方法和模式。   这个例子控件叫TLeiLabel,是在TLabel的基础上增加两个实用的功能:一是使文字具有立体形状,二是使文字具有超链接属性。下面就让我们一步步来实现这些功能。   一、使文字具有立体形状   首先定义类型T3DEffect和属性Style3D分别如下:   T3DEffect=(Normal,Raised,Lowered, Shadowed);   property Style3D:T3DEffect read FStyle3D write SetStyle3D default Normal;   再在private中定义变量:“FStyle3D:T3DEffect;”,并设置SetStyle3D()方法如下,这也是写方法的一般格式:   procedure TLeiLabel.SetStyle3D(Value: T3DEffect);    begin    if FStyle3D <> value then    begin    FStyle3D := value;    invalidate; //表示控件将重画    end;    end;   另外对于带阴影的文字还要定义阴影的偏移量ShadeXOffSet和ShadeYOffSet:   property ShadowXOffSet: integer read FXOffSet write SetFXOffSet default 5;   property ShadowYOffSet: integer read FYOffSet write SetFYOffSet default -5;   写方法SetFXOffSet()、SetFYOffSet()和上面的SetStyle3D()类似。   要重画控件一般要重载Paint方法,此处只是重画文字,我们只需重载DoDrawText方法。   DoDrawText的声明放在Protected中:   procedure DoDrawText(var Rect: TRect; Flags: Longint); override;   此处DoDrawText()根据四种类型(正常、凸起、凹进和阴影)分别画出不同的文字。 二、使文字具有超链接属性   定义一个属性URL表示要链接的网址或Email地址。   Property URL : String read FURL write SetURL;   写方法SetURL如下:   procedure TLeiLabel.SetURL(Value: String);   Begin   if FURL <> Value then FURL := Value ;   if FURL <> then   Cursor := crHandPoint;   end;   当点击此Label时要打开浏览器或收发邮件工具,这便要重载Click方法。    Procedure Click; Override;    procedure TLeiLabel.Click;    var s: string;    Begin    Inherited Click;    if FURL = then exit;    if LowerCase(Copy(FURL,1,7)) = http:// then    s := FURL    else if Pos(@,FURL) <> 0 Then    s := mailt + FURL    else    s := http:// + FURL;    ShellExecute(Application.Handle, open, PChar(s), NIL, NIL, SW_SHOWNORMAL);    end;   一般的超链接当鼠标移入时文字的颜色发生变化。为此加上属性HoverColor,表示鼠标移入时文字的颜色。   Property HoverColor : TColor Read FHoverColor Write SetHoverColor default clRed;   还要定义两个接收Windows消息CM_MOUSEENTER和CM_MOUSELEAVE(鼠标移进和移出)的过程:   Procedure CMMouseE

2020-06-02

InfoPower 4K v20.0.2.3 for XE10.3 RIO_ByJoe.7z

在各种群或是网上找到的类似 InfoPower 4K v20.0.2.3 for D10.3 Rio Full Source 基本上想顺利的安装上都相当的不容易。仿佛是对BDE的支持问题导致很多地方编译通不过 于是我整理了一下。 简化的安装方法,只需要编译安装一个DPK。

2019-08-04

FastReport QRCode

让你的 FastReport 支持 QRCode 二维码

2013-06-19

html5Builder注册

html5Builder的注册机,及官方下载地址

2013-06-19

TscExcelExport 3.6 full source

* The warnings 'unsafe code', 'unsafe type' and 'unsafe typecast' should be ignored. In Delphi 7, 2005, 2006, Turbo Delphi and 2007 these warnings can be disabled in your project options. -------------------------------------------------------------------------------- Version 1.0 (February 2000) Version 1.2 - Improved connection to Excel Version 1.3 - Added Orientation of titles - Added StyleColumnWidth Version 1.4 - Improved GetColumnCharacters - Added Border properties and background colors for Titles, Data and Summary - Added Summary properties (SummarySelection, SummaryFields, SummaryCalculation) Version 1.5 - Improved speed of exporting data - Improved exporting string-fields - Added ConnectTo property Version 1.6 - Suppression of reference to Dataset.RecordCount (thanks to G閞ard Beneteau) - Added VisibleFieldsOnly property Version 1.7 - Notification when disconnecting dataset - Very fast export by using a variant matrix (thanks to Frank van den Bergh) Version 1.8 - Bug in exporting titles (thanks to Roberto Parola) - Setting format of cells before exporting data (thanks to Asbj鴕n Heggvik) - Added BlockOfRecords property : little bit faster and more control of memory - Added properties to set begin row of titles and data Version 1.9 - Added properties (Orientation, WrapText, Alignment) to font (thanks to David Balick) (property OrientationTitles is removed) - Added HeaderText (thanks to David Balick) - Improved some routines Version 2.0 - Added read only property with row number of last data row - Added property with the Excel tabsheet so after the export it is possible to access the cells in Excel - Added event OnExportRecords Version 2.1 - Bugfixes Version 2.2 - Bugfix when exporting filtered dataset (thanks to Heinz Faerber) - New column width styles : cwFieldDisplayWidth, cwFieldDataSize, cwEnhAutoFit (idea from Scott Stanek) Version 2.3 - Added properties begin column data/titles and header (idea from Knjazev Sergey) - Added property ShowTitles Version 2.4 - Support for Delphi 6.0 Version 2.5 - D6 : problem when using disconnect Version 2.6 - Bugfixes and some improvements - Added method LoadDefaultProperties to reset all properties - Improvement SetFormat (thanks to Enrico Chiaramonte) - Improvements using borders (thanks to Ot醰io) - Added event OnGetCellBackgroundColorEvent (thanks to Yuri Plotnikov) - Added events to export data without using a TDataset and new property DataPipe : dpDataset, dpCustom (thanks to David Balick) - Event OnExportRecords will be triggered after exporting the record Version 2.7 - Some bugfixes - Added new unit scExcelExportReg which contains a component editor - Added exceptions to prevent access violations (EFileNotExists, ENoDatasetConnected, EDatasetNotActive, ENoActiveWorkbook) - Added new property Filename which can be used to add data to existing file - Add data to existing worksheet when name of given worksheet already exists - Added new feature to group rows (thanks to Vadim Mescheryakov & Stijn Vansummeren) - Added new group options properties : ClearContents, BorderRange, IntervalFontSize - New events for exporting without dataset : OnGotoFirstRecord, OnGotoNextRecord Version 2.81 - Created a package for Delphi5 and Delphi6 to make installation easier - Added new public method Connect. Can be used to make a connection to Excel before exporting data. When exporting more datasets at the same time, the Disconnect method should be used after using the ExportDataset method ! - Added new read only property Connected. - Text property of field in stead of Value property is exported so OnGetText events can be used Version 2.91 - Improvements SetFormat (before exporting data) - Added support for fieldtype ftTimeStamp - Added fieldtype ftMemo, ftOraClob, ftFmtMemo, these kinds of fields are exported using AsVariant not the Text property like other fields - Improvement for regional settings of floats (thanks to Jorge Pinetta) - Improvement ShowTitles and BeginRowData properties (thanks to Jordi March i Nogu? - Added FooterText properties - Small changes for Delphi 7.0 Version 3.0 - Bugfix for Delphi 5 (added extra compiler directives) - Improvements constants of Borders, Colors, ... - Use OnGetText event for memo field when it is assigned, otherwise export contents of memo - Improvement exporting string data when DataPipe = dpCustom - New demonstration program Version 3.1 - Bugfix for displayformat (InitFormatNumbers was disabled) - Improvements for exporting currency fields (a kind of curency displayformat is created so that the result in Excel looks the same as in your Delphi program) - Improvement for setting displayformat for cells. This has to be done before exporting. In previous version this was done from row 1 to 9999. When exporting more records they had no displayformat. Now displayformat for each block of rows is set. This will also increase the file size ! - Added resource strings for the exceptions. Now these error messages can be translated. - Added scAVG (average) as new TSummaryCalculation type Version 3.11 - Added support for displayformat of datetime fields Version 3.12 - Bugfix displayformat of time field Version 3.2 (May 2004) - Bugfix displayformat with thousand seperators - Bugfix date time fields with Excel 2003 (internal American datetime format should be used) - Tested with MS Excel 2003 Version 3.3 (February 2005) - Bugfixes : ExcelVersion, Excel 2003, ... - Created 2 packages, a run-time (ExcelExportPack) and a design-time (dclExcelExportPack) - Added package for Delphi (BDS) 2005 - Added new OnCellStyle event which can be used to change the background color and font color, size, name and bold style of a cell - Added new OnFieldCellStyle event which can be used to change the background color and font color, size, name and bold style of a cell when datapipe is set to dpCustom - Added ftBCD and ftFMTBCD datatype in IsValueField function - Added ftFMTBCD datatype to CanConvertFieldToCell function Version 3.31 (February 2005) - Empty datetime fields are exported as '' instead of 31/12/1899 (thanks to Peter Hannah) Version 3.4 (April 2006) - Bugfix Memo fields, maximum length 910 (thanks to Douglas Neckers) - Bugfix set font and style when there are more then 26 columns (thanks to Horst Borscht) - Made properties ExcelApplication and ExcelWorkbook public - Added IsExcelAppActive function - Added ENotSupported exception - Added Quit option for Disconnect method - Added support for ExcelXP type library - Added FileFormat XML (XML spreadsheet, only with ExcelXP type library) - Added scExcelExportConfig.inc unit with compiler directives for choosing Excel type library (97, 2000, XP) - Added package and package group for Delphi (BDS) 2006 Version 3.41 (May 2006) - Bugfix compiler directives in Delphi 5 - Added SummaryDisplayFormat property Version 3.42 (June 2006) - Bugfix BeginRowHeader - Added PropertyGroups parameter to LoadDefaultProperties Now a set of property groups can be given : pgFont, pgPositions, pgSummary, pgGroup, pgText, pgOther - Improvement WorkSheetName. By setting the WorkSheetName property an existing or new worksheet can be focused after the export. Version 3.5 (September 2006) - Bugfix setting column width - Added properties for merging of header and footer cells (MergeHeaderCells, MergeFooterCells) - Added AutoFilter property for titles of dataset - Added support for Excel 2007 (b鑤a) - Added ffXLSX for saving files in Excel 2007 Open XML format - Added support for OnGetText event for numeric fields - Added public property for LCID so it can be used after exporting - Using default font and size of Excel by setting Size = -1 and Font.Name = 'MS Sans Serif' -> Excel97/2003 : Arial size 10, Excel 2007 : Calibri size 11 - Tested with Turbo Delphi Explorer (Win32) Version 3.51 (October 2006) - Added readonly TypeLibrary property Version 3.6 (June 2007) - Added support for Delphi 2007 - Retested support for Excel 2007 - Tested with Windows Vista - Started with converting comments to XML documentation - Added public method FindFirstEmptyRow

2008-12-23

Ehlib 4.3.2.1 (完整源代码)

EhLib 4.3 Build 4.3.21 source included version. ---------------------------------------------- The Library contains components and classes for Borland Delphi versions 5, 6, 7, 8 & 9 , Borland C++ Builder versions 5 & 6, Borland Developer Studio 2006, CodeGear Delphi 2007 and CodeGear RAD Studio 2009.

2008-12-13

NexusDB 2.0706.exe

听说是最快的数据库控制。且是C/S的。。。

2008-12-12

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

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