<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[『罾心製作·娟儿·Delphi·家园』]]></title><description><![CDATA[]]></description><link>https://blog.youkuaiyun.com/g_min</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; g_min]]></copyright><item><title><![CDATA[INF]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3874764</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3874764</guid><author>g_min</author><pubDate>Tue, 10 Feb 2009 17:18:00 +0800</pubDate><description><![CDATA[If you need to install an "inf" file using Delphi, you could use the next code: ~~~~~~~~~~~~~~~~~~~~~~~~~{Usage:   InstallINF(C:/XYZ.inf, 0) ;}uses   ShellAPI;function InstallINF(c]]></description><category></category></item><item><title><![CDATA[Delphi启动或者停止windows服务的函数]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3873254</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3873254</guid><author>g_min</author><pubDate>Tue, 10 Feb 2009 11:24:00 +0800</pubDate><description><![CDATA[uses WinSVC;// W3SVC ---Web Service      MSSQLSERVER --- MS SQL Service OverTime 为超时处理，单位秒Function CtrlService(ServiceName: string; Status: Boolean; OverTime:Integer): Boolean; //控制WINDOWS的服务启动与]]></description><category></category></item><item><title><![CDATA[delphi调用cmd的两种方法]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3873190</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3873190</guid><author>g_min</author><pubDate>Tue, 10 Feb 2009 11:17:00 +0800</pubDate><description><![CDATA[delphi调用cmd的两种方法2008年10月01日 星期三 12:221vars:string;begins:=cmd.exe /c +edit1.Text+ >c:/1.txt;winexec(pchar(s),sw_hide);sleep(2000);memo1.Lines.LoadFromFile(c:/1.txt);2shellexecute(han]]></description><category></category></item><item><title><![CDATA[SHGetFileInfo函数]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3873043</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3873043</guid><author>g_min</author><pubDate>Tue, 10 Feb 2009 10:50:00 +0800</pubDate><description><![CDATA[SHGetFileInfo函数// 确认在USES分句中包含ShellApiinterfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls, ShellApi, FileCtrl;type  TForm1 = class(]]></description><category></category></item><item><title><![CDATA[通过API函数得到操作系统类型]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3873020</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3873020</guid><author>g_min</author><pubDate>Tue, 10 Feb 2009 10:46:00 +0800</pubDate><description><![CDATA[unit Unit1; interface usesWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,StdCtrls, CommDlg; typeTForm1 = class(TForm)Button1: TButton;procedure Button1C]]></description><category></category></item><item><title><![CDATA[IE 代理服务器设置程序实现]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3871743</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3871743</guid><author>g_min</author><pubDate>Mon, 09 Feb 2009 21:42:00 +0800</pubDate><description><![CDATA[IE 代理服务器设置程序实现本文其实.没有什么价值.写出来也是处于好玩.因为.最近闲的要命.所以总喜欢去些BBS聊天室之类的地方打发时间可是.突然发现这些地方总是喜欢记录IP真是麻烦.别人一跟踪马上就查出你的位置.实在是不爽.所以.就只好设置代理服务器.IE的设置是带这个功能的.所以很简单.只要设置就可以了.不过,实在觉得.那样太简单了.所以就想自己做一个程序实现.可是没什么眉目.不过突然想到腾讯]]></description><category></category></item><item><title><![CDATA[注册表操作]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3871719</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3871719</guid><author>g_min</author><pubDate>Mon, 09 Feb 2009 21:36:00 +0800</pubDate><description><![CDATA[procedure TForm1.FormCreate(Sender: TObject);var    ARegistry:TRegistry;  begin    ARegistry:=TRegistry.Create;  //创建一个TRegistry对象    with ARegistry dobegin    RootKey:=HKEY_LOCAL_MACHIN]]></description><category></category></item><item><title><![CDATA[Windows优化大师x.xx注册机源码]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3871709</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3871709</guid><author>g_min</author><pubDate>Mon, 09 Feb 2009 21:33:00 +0800</pubDate><description><![CDATA[DELPHIunit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, Registry, StdCtrls, Buttons;typeTForm1 = class(TForm)Label1: TLab]]></description><category></category></item><item><title><![CDATA[BAT]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3870551</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3870551</guid><author>g_min</author><pubDate>Mon, 09 Feb 2009 14:33:00 +0800</pubDate><description><![CDATA[unit Unit1;     interface    uses      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,       Dialogs, StdCtrls, ShellAPI;     type      TForm1 = class(TFor]]></description><category></category></item><item><title><![CDATA[Delphi里删除目录的函数]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3779432</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3779432</guid><author>g_min</author><pubDate>Wed, 14 Jan 2009 22:08:00 +0800</pubDate><description><![CDATA[其实网上已经有很多的例子了，不过对于和我一样的初学者来说难免会遇到问题，我试过win32Api函数，也试过用removeDirectory，但都删不掉指定目录，分析了一下，很显然，是这些函数只是单纯的删除空文件夹，非空文件夹删不了的。也不知是不是我用的不对，总之用了下面这个函数挺灵的，帖出来大家分享下。   function TMainForm.DeleteDirectory(NowP]]></description><category></category></item><item><title><![CDATA[Delphi获取完整路径]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3779286</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3779286</guid><author>g_min</author><pubDate>Wed, 14 Jan 2009 21:57:00 +0800</pubDate><description><![CDATA[Delphi 从文件名中得到路径名，可用下面的两个函数，这两个函数有一点点微小的差别：          ExtractFilePath(FileName:String) 该函数返回路径名，其结尾字符总是“/”          ExtractFileDir(FileName:String) 该函数同样返回路径名，但不包括结尾的字符“/”，除非返回的路径是根目录。　样例代码： 　    S]]></description><category></category></item><item><title><![CDATA[点击Dbgrid数据显示在combobox]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/3729065</link><guid>https://blog.youkuaiyun.com/g_min/article/details/3729065</guid><author>g_min</author><pubDate>Wed, 07 Jan 2009 20:19:00 +0800</pubDate><description><![CDATA[procedure   TForm1.DBGrid1CellClick(Column:   TColumn);     begin         with   DBGrid1.DataSource.DataSet   do         begin                 if   Active   and   (RecordCount           ]]></description><category></category></item><item><title><![CDATA[delphi编程技巧]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2341933</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2341933</guid><author>g_min</author><pubDate>Tue, 29 Apr 2008 11:01:00 +0800</pubDate><description><![CDATA[◇[DELPHI]网络邻居复制文件 uses shellapi; copyfile(pchar(newfile.txt),pchar(//computername/direction/targer.txt),false);◇[DELPHI]产生鼠标拖动效果 通过MouseMove事件、DragOver事件、EndDrag事件实现，例如在PANEL上的LABEL： var xpanel,]]></description><category></category></item><item><title><![CDATA[Hint 多样性]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2341889</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2341889</guid><author>g_min</author><pubDate>Tue, 29 Apr 2008 10:53:00 +0800</pubDate><description><![CDATA[普通Hint：直接设置窗体和组件的ShowHint属性为True，并在其Hint中输入文字内容即可。解释：ShowHint属性则决定鼠标指向构件时是否显示文本提示盒，Hint属性指定文本提示盒中的文本。用户可在对象监视器（ObjectInspector）的属性栏中设置或在程序中修改Hint及ShowHint属性。    经改造的Hint：Delphi还在类TApplication中提供了Hin]]></description><category></category></item><item><title><![CDATA[Hint]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2341856</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2341856</guid><author>g_min</author><pubDate>Tue, 29 Apr 2008 10:47:00 +0800</pubDate><description><![CDATA[但鼠标移动到某控件上，将会显示文字说明HINT属性输入显示内容且SHOWHINT设为TRUE即可如果想把文字显示在状上，使用下面procedure   TForm1.AppHint(Sender:   TObject);     begin         Statusbar1.Panels[0].Text:=Application.Hint;     end;      ]]></description><category></category></item><item><title><![CDATA[Delphi制作DLL]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2087826</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2087826</guid><author>g_min</author><pubDate>Sun, 10 Feb 2008 20:22:00 +0800</pubDate><description><![CDATA[一 Dll的制作一般步骤 二 参数传递 三 DLL的初始化和退出清理[如果需要初始化和退出清理] 四 全局变量的使用 五 调用静态载入 六 调用动态载入 七 在DLL建立一个TForM 八 在DLL中建立一个TMDIChildForM 九 示例： 十 Delphi制作的Dll与其他语言的混合编程中常遇问题： 十一 相关资料 一 Dll的制作一般分为以下几步： 1 在一个DLL工程里写一个过程或函数]]></description><category></category></item><item><title><![CDATA[DELPHI调用API]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2087823</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2087823</guid><author>g_min</author><pubDate>Sun, 10 Feb 2008 20:17:00 +0800</pubDate><description><![CDATA[为了能在Windows下快速开发应用程序，Delphi对Windows的控件都进行了很好的封装，这样，我们就可以直接使用Delphi的控件来编写程序，而不用使用格式、调用控制复杂的API来进行开发，为我们节省了大量的开发时间。　　可有时候这些控件解决不了我们的问题，这个时候我们就不得不使用API了，也就是Windows的应用程序接口。这样，问题也就随之而来了，API是用C++语言编写的，而Delp]]></description><category></category></item><item><title><![CDATA[Delphi 部分函数收集资料]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2087821</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2087821</guid><author>g_min</author><pubDate>Sun, 10 Feb 2008 20:15:00 +0800</pubDate><description><![CDATA[1、StringOfChar2、FileSetAttr(const FileName: string; Attr: Integer): Integer;3、FileGetAttr(const FileName: string): Integer;4、SaveToFile5、LoadFromFile6、FileExists文件是否存在7、directoryexists]]></description><category></category></item><item><title><![CDATA[Delphi 使用API函数详解]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2087820</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2087820</guid><author>g_min</author><pubDate>Sun, 10 Feb 2008 20:14:00 +0800</pubDate><description><![CDATA[DOS下的INT21H对于开发DOS程序很重要，而对于在WINDOWS下开发程序，了解API函数是很有必要的。元件就像招式，而API函数就好比内功心法，有了高深的内力，那么学习招式就易如反掌啦。所以，掌握的API函数越多，你就越可能成为DELPHI高手，甚至WINDOWS编程高手。所以，无论是C＋＋，VB还是DELPHI都无一例外的支持API函数的调用，C＋＋和DELPHI是全面支持API函数，而]]></description><category></category></item><item><title><![CDATA[Api函数列表]]></title><link>https://blog.youkuaiyun.com/g_min/article/details/2087812</link><guid>https://blog.youkuaiyun.com/g_min/article/details/2087812</guid><author>g_min</author><pubDate>Sun, 10 Feb 2008 20:05:00 +0800</pubDate><description><![CDATA[                                     Api函数名                                    函数说明                                    适用范围                                           ]]></description><category></category></item></channel></rss>