(*  GREATIS WINDOW INFORMATION                *)
(*  Copyright (C) 2005-2008 Greatis Software  *)
(*  http://www.greatis.com/delphicb/wininfo/  *)
(*  http://www.greatis.com/bteam.html         *)
(*                                            *)
(*  GREATIS DELPHI TOYS                       *)
(*  http://www.greatis.com/delphicb/toys/     *)

program WIDemo;

uses
  Forms,
  WIMain in 'WIMain.pas' {frmWinInfoMain};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'Greatis Window Information Demo';
  Application.CreateForm(TfrmWinInfoMain, frmWinInfoMain);
  Application.Run;
end.
