This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎} | |
{▎ ▎} | |
{▎ 大家都是程序员 没有必要重复一些无聊的事情 我的这些函数能给大家带来方便 ▎} | |
{▎ 如果觉得还一般 请关注 WWW.cdsunco.com/www.ccemove.com QQ:35013354 ▎} | |
{▎ 系统公用函数及过程 ▎} | |
{▎ ▎} | |
{▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎} | |
{▎ 软件名称: 开发包基础库 ▎} | |
{▎ 单元名称: 公共运行时间库单元 ▎} | |
{▎ 单元版本: V1.0 ▎} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// MyEdit.pas | |
// 版权所有(C) 邱兴福 | |
// Homepage: http://xingfuqiu.com | |
// Email: [email protected] | |
// purpose: | |
// 您可以以任何方式使用本代码,如果您对本代码不满, | |
// 您可以将其粉碎。您也可以删除版权信息和作者联系方式。 | |
// 如果您给我一个进步的机会,我将万分感谢。 | |
///////////////////////////////////////////////////////////////////////////////// | |
unit MyEdit; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/************************************************************************/ | |
/* Vector及指针的使用 */ | |
/************************************************************************/ | |
#include "stdafx.h" | |
#include <iostream> | |
#include <vector> | |
using namespace std; | |
int main(int argc, char* argv[]) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
unit uThread; | |
interface | |
uses | |
Classes; | |
type | |
TFun = procedure of object; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
unit MultInst; | |
interface | |
uses | |
Windows ,Messages, SysUtils, Classes, Forms; | |
implementation | |
const |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
unit uGetMacAddr; | |
interface | |
uses | |
Windows,SysUtils, Classes; | |
function GetMacAddress: TStringList; | |
implementation |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
unit ServiceControl; | |
interface | |
uses | |
WinSvc, | |
SysUtils, | |
Windows; | |
type |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include "VistaMute.h" | |
template <class T> | |
inline void SafeRelease(T &p) | |
{ | |
if (p != NULL) | |
{ | |
p->Release(); | |
p = NULL; | |
} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// VistaVolume.h | |
#ifndef _VISTAVOLUME_H_ | |
#define _VISTAVOLUME_H_ | |
#include <Windows.h> | |
#include <Mmdeviceapi.h> // for IMMDeviceEnumerator and IMMDevice | |
#include <Endpointvolume.h> // for IAudioEndpointVolume, must #define NTDDI_VERSION NTDDI_WINXPSP1 in stdafx.h | |
#include <Audiopolicy.h> | |
#include <Audioclient.h> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function IsWin64: Boolean; | |
var | |
Kernel32Handle : THandle; | |
IsWow64Process : function(Handle: Windows.THandle; var Res: Windows.BOOL): Windows.BOOL; stdcall; | |
GetNativeSystemInfo : procedure(var lpSystemInfo: TSystemInfo); stdcall; | |
isWoW64 : Bool; | |
SystemInfo : TSystemInfo; | |
const | |
PROCESSOR_ARCHITECTURE_AMD64 = 9; | |
PROCESSOR_ARCHITECTURE_IA64 = 6; |
OlderNewer