摘要： unit U_StartServices;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, WinSVC, StdCtrls;type TForm1 = class(TForm) btn_StartServices: TButton; btn_StopServices: TButton; procedure btn_StartServicesClick(Sender: TObject); procedure btn_StopServicesClick 阅读全文

摘要： 'RASCREDENTIALSPrivate Type RASCREDENTIALS dwSize As Long dwMask As Long szUserName As String * 257 'UNLEN+1 szPassword As String * 257 'PWLEN+1 szDomain As String * 16 'DNLEN+1End Type'RASCredMaskPublic Enum RASCredMask RASCM_UserName = &H1& RASCM_password = &H2& 阅读全文

摘要： Niklaus WirthNiklaus Wirth与Borland并无直接关系,但是，是他发明了Pascal语言。Phillipe Kahn也曾是他的学生。Delphi语言的演变过程是：Pascal，Object Pascal，Delphi。Niklaus Wirth在1984年获得计算机科学领域最高奖图灵奖。详见:PASCAL之父图灵奖获得者 Niklaus WirthPhilippe Kahn菲力浦·凯恩（Phillipe Kahn）是Niklaus Wirth的学生,在ETS毕业后，来到美国加利福尼亚州创立了Borland国际，当时就卖出了100多万个PASCAL拷贝。在C语 阅读全文