Delphi调用或编写驱动程序常用的一些源代码