sinfo.pas

来自「Yahoo Messenger for Mobile」· PAS 代码 · 共 36 行

unit sinfo;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ComCtrls, SkinTabs,SkinCtrls, StdCtrls, ActiveX, WbemScripting_TLB,Ychatu1,
  SkinBoxCtrls, Mask;

type
  TSysInfo = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  SysInfo: TSysInfo;

implementation


{$R *.DFM}

Function ActivedsCheck: Boolean;
Begin
End;


Procedure UpdateWindow(RichCont: TSPSkinRichedit; ClassName: String);
begin
End;

end.