随笔分类 -  Delphi

delphi 如何等待进程树的结束
摘要：等待进程树的结束需要用到windows 2000 的job objects内核对象，默认在delphi windows pas里是没有定义的，所以必须手动引用job相关的定义，下面我把jobs.pas 贴出来unit Jobs;{Interface unit for Windows 2000 Job Objects.windows 作业对象定义 james}interfaceUses Windows;Type TJobObjectInfoClass = Cardinal; PJobObjectAssociateCompletionPort = ^TJobObjectAssociateComp. 阅读全文
posted @ 2011-05-13 12:00 你的影子 阅读(1342) 评论(0) 推荐(0)
delphi获取windows系统版本信息，大全，准确
摘要：很多时候从网上找到的取操作系统版本的代码都不是很准确，有些信息也不全面。为此，在msdn上找到全面的信息整理成代码，共享！unit WindowsSysVersion;interfaceuses windows ;{$IFDEF CONDITIONALEXPRESSIONS}{$IF Defined(TOSVersionInfoEx)}{$DEFINE TOSVERSIONINFOEX_DEFINED}{$IFEND}{$ENDIF}{$IFNDEF TOSVERSIONINFOEX_DEFINED}type POSVersionInfoEx = ^TOSVersionInfoEx; TOSV 阅读全文
posted @ 2010-09-09 15:03 你的影子 阅读(8153) 评论(0) 推荐(2)