- 博客(3)
- 资源 (3)
- 收藏
- 关注
原创 delphi在TreeView 里加复选框
//这里是创建一个一个类 type TCheckBoxTreeView=Class(TTreeView) protected procedure CreateParams(var Params: TCreateParams); override; end; //具体只要加一句话 procedure TCheckBoxTreeView.CreateParams(var Pa
2005-06-24 07:11:00 3125 1
原创 delphi中的编码转换
function UnicodeEncode(Str:string;CodePage:integer):WideString;var Len:integer;begin Len:=Length(Str)+1; SetLength(Result,Len); Len:=MultiByteToWideChar(CodePage,0,PChar(Str),-1,PWideChar(Result),
2005-06-01 21:33:00 1462
原创 利用操作系统提供的ipHelp防火墙
/*利用操作系统提供的API编写防火墙.该程序涉及到的API说明请访问微软的MSDN Library*/#pragma hdrstop#include "windows.h"#include "Fltdefs.h"//需要加载"iphlpapi.lib"#pragma argsusedint main(int argc, char* argv[]){
2005-06-01 10:51:00 1121
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人