用戶登錄  |  用戶注冊
首 頁源碼下載網絡學院最新源碼源碼排行屏蔽廣告
當前位置:新興網絡 > 網絡學院 > 標簽 > Delphi
  • [Delphi]Delphi 判斷一個com組建是否已經注冊函數2010-12-02 13:33:07 |
    · Delphi 判斷一個com組建是否已經注冊函數: function IsClassRegistered(GUID: TGUID): Boolean;var ClassID: String;begin with TRegistry.Create do try ClassID := GUIDToString(GUID); RootKey := HKEY_CLASSE...
  • [Delphi]Delphi 由域名獲取IP地址函數2010-12-02 13:30:01 |
    · Delphi 解析出域名對應的IP地址函數。 function GetIPFromName(Name: string): string;var WSAData: TWSAData; HostEnt: PHostEnt;begin WSAStartup(2, WSAData); HostEnt := gethostbyname(PChar(Name)); with Hos...
  • [Delphi]Delphi 獲得字符串中漢字的總個數2010-11-02 09:53:52 |
    · Delphi 獲得字符串中漢字的總個數 function HowManyChineseChar(Const s:String):Integer;var SW:WideString; C:String; i, WCount:Integer;begin SW:=s; WCount:=0; For i:=1 to Length(SW) do begin c:=SW; if Le...
  • [Delphi]Delphi 將金額轉換為大寫函數2010-11-02 09:34:21 |
    · 這個函數可以把一個數值轉換為大寫金額形式。 函數代碼如下: function UpperMoney(small:real):string;var SmallMonth,BigMonth:string; wei1,qianwei1:string[2]; qianwei,dianweizhi,qian:integer; ObjSmall:r...
  • [Delphi]Delphi 根據路徑創建多級目錄函數ForceDirectories2010-09-21 13:10:18 |
    · Delphi 中創建多級目錄用ForceDirectories函數很容易就實現了。如果父目錄已存在它會繼續創建一層目錄。...Delphi 中創建多級目錄用ForceDirectories函數很容易就實現了。 //function ForceDirectories(Dir: string): Boolean; ForceDirectories('C:\test\3...
  • [VC/MFC]VC 完美界面更換皮膚解決方案2010-09-05 14:42:28 |
    · 采用Delphi里邊成熟的界面組件vclskin,將它做成Dll來用,效果相當不錯,下面介紹給大家。...-、簡介 VC里邊界面換膚是比較頭痛的問題,網上有不少介紹,但是大多數僅僅提供Dll或者Lib,有代碼的又有很多問題,效果很差。這幾日突然想到一個解決方案,有...
  • [Delphi]Delphi 模擬鼠標點擊網頁上的按鈕2010-08-12 23:59:48 |
    · 效果如圖: 代碼文件: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, SHDocVw;type TForm1 = class(TForm) WebBrowser1: ...

總數:7/1 首頁 上一頁 1 下一頁 末頁

美国百家乐注册