Skip to content

Instantly share code, notes, and snippets.

View xingfuqiu's full-sized avatar
👋
不写代码了!

David Qiu xingfuqiu

👋
不写代码了!
View GitHub Profile
@xingfuqiu
xingfuqiu / Communal.pas
Created December 14, 2011 02:13
Delphi:公共运行时间库单元
{▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎}
{▎ ▎}
{▎ 大家都是程序员 没有必要重复一些无聊的事情 我的这些函数能给大家带来方便 ▎}
{▎ 如果觉得还一般 请关注 WWW.cdsunco.com/www.ccemove.com QQ:35013354 ▎}
{▎ 系统公用函数及过程 ▎}
{▎ ▎}
{▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎}
{▎ 软件名称: 开发包基础库 ▎}
{▎ 单元名称: 公共运行时间库单元 ▎}
{▎ 单元版本: V1.0 ▎}
@xingfuqiu
xingfuqiu / gist:1727388
Created February 3, 2012 03:10
Delphi:FWatermarkHint
// MyEdit.pas
// 版权所有(C) 邱兴福
// Homepage: http://xingfuqiu.com
// Email: [email protected]
// purpose:
// 您可以以任何方式使用本代码,如果您对本代码不满,
// 您可以将其粉碎。您也可以删除版权信息和作者联系方式。
// 如果您给我一个进步的机会,我将万分感谢。
/////////////////////////////////////////////////////////////////////////////////
unit MyEdit;
@xingfuqiu
xingfuqiu / Vector.cpp
Created February 13, 2012 03:32
C++:Vector及指针的使用
/************************************************************************/
/* Vector及指针的使用 */
/************************************************************************/
#include "stdafx.h"
#include <iostream>
#include <vector>
using namespace std;
int main(int argc, char* argv[])
@xingfuqiu
xingfuqiu / gist:1868319
Created February 20, 2012 07:54
Delphi:通用多线程类
unit uThread;
interface
uses
Classes;
type
TFun = procedure of object;
@xingfuqiu
xingfuqiu / MultInst.pas
Created August 15, 2012 02:05
Delphi:防止程序二次执行单元
unit MultInst;
interface
uses
Windows ,Messages, SysUtils, Classes, Forms;
implementation
const
@xingfuqiu
xingfuqiu / uGetMacAddr.pas
Created August 15, 2012 02:11
Delphi:获取本机MAC地址(支持多网卡)
unit uGetMacAddr;
interface
uses
Windows,SysUtils, Classes;
function GetMacAddress: TStringList;
implementation
@xingfuqiu
xingfuqiu / ServiceControl.pas
Created August 15, 2012 02:14
Delphi:服务控制单元
unit ServiceControl;
interface
uses
WinSvc,
SysUtils,
Windows;
type
@xingfuqiu
xingfuqiu / vistamute.cpp
Created August 15, 2012 02:18
C++:Win7单进程静音CPP
#include "VistaMute.h"
template <class T>
inline void SafeRelease(T &p)
{
if (p != NULL)
{
p->Release();
p = NULL;
}
@xingfuqiu
xingfuqiu / vistamute.h
Created August 15, 2012 02:18
C++:win7单进程静音h
// 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>
@xingfuqiu
xingfuqiu / IsWin64.pas
Created August 15, 2012 02:59 — forked from melice/IsWin64.pas
Delphi:检查Windows系统是否为64bit(check if is windows 64bit)
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;