自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(4)
  • 收藏
  • 关注

原创 编译原理学习笔记

学习编译原理的目的和意义   从简单实用主义看,学习编译原理是没有任何作用的,因为一般来说99%的程序员,不需要写自己的编译器,也不需要去读懂任何编译器代码。   但是我认为编译原理还是很值得一学的:     第一、学习编译原理可以帮助自己更加深层次的理解程序语言和内部机制。     第二、学习编译原理可以用来做简单的命令解释器,这个经常都很需要。比如游戏的脚本引擎。     第三、学习正则表达式

2008-01-06 15:18:00 723

原创 获取本机mac地址

function TForm1.NBGetAdapterAddress(adapterNum: integer): String;//adapter00为指定的网卡适配器Var  NCB:TNCB; // NetBios控制块  ADAPTER : TADAPTERSTATUS; // 获取网卡状态  LANAENUM : TLANAENUM; // Netbios lana  intIdx :

2007-11-25 21:21:00 591

原创 使用indy http方式上传文件

 procedure TMainForm.Upload;var  MutPartForm: TIdMultiPartFormDataStream;  i: Integer;  FileItem: TFileItem;  IdHTTP: TIdHTTP;  sl: TStringList;begin  sl := TStringList.Create;  for i := 0 to FFiles.C

2007-10-26 11:38:00 1464

原创 遍历文件夹

function Search(path: String; FileName: string;bAll: Boolean=false): String;var  searchrec: TSearchRec;begin  if FindFirst(path + *.*,faAnyFile,searchrec)=0 then  begin     repeat       if (searchre

2007-10-26 10:58:00 392

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除