fghydx的专栏

Coding的时候，常常涉及代码注释，常见的注释包括两类：        1）单行注释。格式：// Comments        2）多行注释。格式：/* Comments… */        C#引入了新的注释，即我们在某个函数前新起一行，输入///,会自动增加格式的注释，这里整理一下可用的XML注释。        XML注释分为一级注释（Primary

Delphi WebBrowser控件的使用WebBrowser控件属性：1、Application      如果该对象有效，则返回掌管WebBrowser控件的应用程序实现的自动化对象(IDispatch)。如果在宿主对象中自动化对象无效，程序将返回WebBrowser控件的自动化对象2、Parent       返回WebBrowser控件的父自动化对象，通常是一个容

Delphi基本图像处理代码//浮雕procedure Emboss(SrcBmp,DestBmp:TBitmap;AzimuthChange:integer);overload;var  i, j, Gray, Azimuthvalue, R, G, B: integer;  SrcRGB, SrcRGB1, SrcRGB2, DestRGB: pRGBTriple;

Borland Compiler Conditional Defines Edit  Talk12,909PAGES ONTHIS WIKIProduct NameVersionConditional DefineCompilerVersionEmbarcadero RAD Studio

注：本文系转载。       看到论坛好多人问win7下写注册表的问题，我结合自己的理解写了一点东西，首先声明一下，本人初学Delphi，水平有限，大家见笑了，有什么不对之处请老鸟多指点。[背景]win7/Vista提供的UAC机制，是win7/Vista的新增功能之一。它的主要目的是防止对于操作系统本身的恶意修改。如果想对于win7/Vista的系统设置进行改动，必须通过UA

Delphi：窗体自适应屏幕分辨率

D2007在64位Win7出现 delphi 2007 assertion failure thread32.cpp 的解决办法Workaround steps:    Close Delphi    Locate bordbk120N.dll (C:\Program Files (x86)\CodeGear\RAD Studio\6.0\bin)   

function GetSignatures():string;var  PackageName:string;  PM:JPackageManager;  PI:JPackageInfo;  Signatures:String;  SignCount:Integer;  Signs:TJavaObjectArray;  Sign:JSignature;  JO

首先，将项目的.info.plist文件中加入UIViewControllerBasedStatusBarAppearance然后将窗体设置为全屏（fullScreen=True）在窗体的Create事件中写入代码procedure TForm1.FormCreate(Sender: TObject);var  APP:UIApplication;begin

在Delphi中使用Webbrowser加载百度地图时,点击了其它界面,再回到百度地图中,即使点击了鼠标,再用滚轮也不能缩放地图,除非点地图里面的自带的控件,之后才能缩放,原因是因为其它窗体控件获得焦点后没还回给Webbrowser.目前的解决办法是在窗体上拖一个ApplicationEvents,在他的OnMessage事件中写入如下代码if IsChild(WebBro

1.冒泡排序Delphi/Pascal code?1234567891011121314151617procedure BubbleSort(var x:array of integer);v

转自http://blog.sina.com.cn/s/blog_75e063c101019f1c.html判断点是否在多边形内的算法和C语言程序判断点是否在凸多边形内，有多种方法，方法简单，计算速度也快。但实际问题中遇到的多边形不一定是凸多边形,它可能是凹多变形,或几何形状复杂如同迷宫般的多边形。判断一个点在多边形内或多边形外，比较可靠，也

1、支持ORM，最基础的两个信息是表的信息和字段信息。这两个信息，如果用Attribute 来辅助，代码更简洁和可读性更好。可以把属性名当做真实字段名，也可以将特性里的属性当成真实姓名，再加上字段标题（可以当成注释）、必填字段、是否为主键、显示格式等等，如果没有Attribute ，类、属性的辅助信息必须用其他信息来描述，非常麻烦。usesSysUtils, RTTI, TypInfo

源地址:http://blog.sina.com.cn/s/blog_44fa172f0102w0ae.html这个版本的Listview终于支持自定义Item的显示样式，也是这版本的卖点之一。参考Help,我们来看看，如何使用这个功能，来自定义Item的样式。首先，通过ListView的ItemAppearance属性，具体就是在设计期，双击他，进入定义样式面版。在这里，

procedure TForm1.CreateParams(var Params: TCreateParams) ;begin  BorderStyle := bsNone;  inherited;  Params.ExStyle := Params.ExStyle or WS_EX_STATICEDGE;  Params.Style := Params.Style o

一个典型应用中，使用delphi作为客户端，J2EE服务端，两者之间用XML作为数据交换，为了提高效率，对XML数据进行压缩，为此需要找到一种压缩/解压算法能够两个平台之间交互处理，使用ZLIB算法就是一个不错的解决方案。1、JAVA实现在JDK中，在java.util.zip包中已经内置了ZLIB的实现，示例代码如下：1//解压2 public String

delphi 可以连接c++ builder 生成OMF格式的obj文件，会报一个错。[DCC Error] E2065 Unsatisfied forward or external declaration: 'xXXX'函数名没有找到，在头文件里加一个未公开的参数 #pragma option push -V?-  解决问题。主意函数名，有可能会有“_”下划线

Delphi的包是Delphi IDE的核心技术，没有包也就没有了Delphi的可视化编程。包也可以用在我们开发的项目中，其好处是可以代码共享，减小工程尺寸，单纯通过替换包文件就能实现工程的升级和补丁。但是我们要加载包，就要知道包中已经存在的类。关于如何动态加载包的资料比比皆是我就不想就此问题讨论了。但是Delphi的IDE很是特殊，它无需事先知道你的包有哪些类就能注册组建，创建组建。但是Borl

以前要在运行时创建package中的form类，必须要在form单元文件中这样注册类：InitializationRegisterClass(TForm3);FinalizationUnRegisterClass(TForm3);然后在调用模块中，通过FindClass或GetClass函数返回一个TPersistentClass，再通过此类引用创建窗口类：ACla

函数的具体实现如下：procedure Generate2DCode(AStr: string; ASize: Integer; ABmp: TBitmap);vars : TByteArray;m : TByteArray;i, j: Integer;w, h : integer;cc: Integer;beginif not Assigned(ABm

本文主要讲解Delphi 中Chart ,TeeChart 的属性,方法及用法.Tchart 分析报告,TeeChart 使用指南,TeeChart 控件介绍1.AllowZoom : Boolean 是否允许鼠标拖动来缩放图表2.AnimatedZoom : Boolean 拖动是否显示缩放过程3.AxisVisible : Boolean 显示和隐藏4个

Delphi中断点错位解决方法  2011-04-12 10:18:26|  分类： 默认分类 |  标签：delphi  |字号 订阅在调试代码的时候遇到了断点错位的问题。F7进入这个方法的时候其实是上一条代码。经查问题如下：这个文件中的某一些地方的代码格式不是MS-DOS格式，可能是Unix或者什么的，主要就是回车换行什么的不正确。主要原

WebBrowser 操作记要  WebBrowser1.GoHome; //到浏览器默认主页WebBrowser1.Refresh; //刷新WebBrowser1.GoBack; //后退WebBrowser1.GoForward; //前进WebBrowser1.Navigate('...'); //打开指定页面WebBrowser1.Navigate('about:

一：MP3转换为WAVfunction acmDriverEnumCallback(hadid: HACMDRIVERID; dwInstance: DWORD; fdwSupport: DWORD): BOOL; stdcall;var  driver                                                    : HACMDRIVER;

方法一：1、修改工程文件中的“Application.MainFormOnTaskbar := True;”为“Application.MainFormOnTaskbar := False;”2、在主窗体的 OnShow 事件中写下：ShowWindow(Application.Handle, SW_HIDE);方法二：SetWindowLong(Self.Handle,GWL_

本文试着从分析Synchronize同步执行的实现机制入手，来解决DLL/ActiveForm中线程同步的问题。　　线程中进行同步时调用的Synchronize函数，仅仅是把调用调用线程、调用方法地址、异常对象封装在一个同步结构中，然后调用处理同步结构的类方法Synchronize。　　procedure TThread.Synchronize(Method: TThreadMethod)

H:=FindWindow('Tfrm_MainForm','');  if H>0 then  begin    ShowWindowAsync(h,SW_MAX);    SetForegroundWindow(h);  end;

elphi实现HTMLWebBrowser实现HTML界面 HTML的界面有以下特点：图文混排，格式灵活，可以包含Flash、声音和视频等，实现图文声像的多媒体界面，而且易于建立和维护。另外，HTML的显示环境一般机器上都具备，通常不需要安装额外的软件。当然，HTML界面也有它欠缺的方面，即：界面控制能力有限，代码调试不便----虽然DHTML提供了比较强的编程特性，但是比起Delphi的传统

The component below works perfectly, except for the following problem:1) Saves the component below in a file "trancomp.pas".Then, install this component in Delphi; 2) Later, open Delphi and cr

子窗体显示在任务栏时，procedure Tfrm_SendSmartMsg.CreateParams(var Params: TCreateParams);begin  inherited;  Params.WndParent := 0;end;这时子窗体会在任务栏有单独的按钮，如果这时这个子窗体上又要加一个弹出窗体，如果是普通窗体会把整个应用程序激活，而导致这个子窗体跑

在CSDN上看到zwjchina写的delphi xe3的变化以及这些变化所产生的影响发表的看法，以下为原文：-------------------------------------------------------在我看来XE4可能开启了死亡之旅。至少对于我可能是这样的。仔细查看XE3中VCL的代码，会发现有{$IFNDEF NEXTGEN} 这样的定义。就名