日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

CnCommon 的一些通用函数说明

發布時間:2025/3/20 编程问答 33 豆豆
生活随笔 收集整理的這篇文章主要介紹了 CnCommon 的一些通用函数说明 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

uses CnCommon;

// 目錄尾加'\'修正
function MakePath(const Dir: string): string;
// 路徑尾去掉 '\'
function MakeDir(const Path: string): string;

// 取系統目錄
function GetSystemDir: string;

// 取Program Files目錄
function GetProgramFilesDir: string;

// 取Windows目錄
function GetWindowsDir: string;

?// 應用程序路徑
function AppPath: string;

// 創建GUID字符串
function CreateGuidString: string;

// 打開一個鏈接
procedure OpenUrl(const Url: string; UseCmd: Boolean);

// 發送郵件
procedure MailTo(const Addr: string; const Subject: string; UseCmd: Boolean);

// 在字符串中某字符出現的次數
function CharCounts(Str: PChar; Chr: Char): Integer;

function GetHzPy(const AHzStr: AnsiString): AnsiString;
{* 取漢字的拼音}

function DynamicResolution(x, y: WORD): Boolean;
{* 動態設置分辨率}

procedure StayOnTop(Handle: HWND; OnTop: Boolean);
{* 窗口最上方顯示}

procedure SetHidden(Hide: Boolean);
{* 設置程序是否出現在任務欄}

procedure SetTaskBarVisible(Visible: Boolean);
{* 設置任務欄是否可見}

procedure SetDesktopVisible(Visible: Boolean);
{* 設置桌面是否可見}

function GetYear(Date: TDate): Integer;
{* 取日期年份分量}
function GetMonth(Date: TDate): Integer;
{* 取日期月份分量}
function GetDay(Date: TDate): Integer;
{* 取日期天數分量}
function GetHour(Time: TTime): Integer;
{* 取時間小時分量}
function GetMinute(Time: TTime): Integer;
{* 取時間分鐘分量}
function GetSecond(Time: TTime): Integer;
{* 取時間秒分量}
function GetMSecond(Time: TTime): Integer;
{* 取時間毫秒分量}

function OpenDialog(var FileName: string; Title: string; Filter: string;
? Ext: string): Boolean;
{* 打開文件框}

?

?

轉載于:https://www.cnblogs.com/jieke/archive/2012/12/29/2838656.html

總結

以上是生活随笔為你收集整理的CnCommon 的一些通用函数说明的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。