program AnyQ;


{$R 'version.res' 'version.rc'}

{$IFDEF VER150}
{$DEFINE INDY9}
{$ENDIF}


uses
  Forms,
  ComCtrls in 'ComCtrls.pas',
  XMLVCard in 'jopl\XMLVCard.pas',
  Agents in 'jopl\Agents.pas',
  AutoUpdate in 'jopl\AutoUpdate.pas',
  Chat in 'jopl\Chat.pas',
  ChatController in 'jopl\ChatController.pas',
  HttpProxyIOHandler in 'jopl\HttpProxyIOHandler.pas',
  IQ in 'jopl\IQ.pas',
  JabberAuth in 'jopl\JabberAuth.pas',
  JabberConst in 'jopl\JabberConst.pas',
  JabberID in 'jopl\JabberID.pas',
  JabberMsg in 'jopl\JabberMsg.pas',
  Langs in 'jopl\Langs.pas',
  LibXmlComps in 'jopl\LibXmlComps.pas',
  LibXmlParser in 'jopl\LibXmlParser.pas',
  MsgController in 'jopl\MsgController.pas',
  MsgList in 'jopl\MsgList.pas',
  PrefController in 'jopl\PrefController.pas',
  Presence in 'jopl\Presence.pas',
  Responder in 'jopl\Responder.pas',
  Roster in 'jopl\Roster.pas',
  S10n in 'jopl\S10n.pas',
  SecHash in 'jopl\SecHash.pas',
  Session in 'jopl\Session.pas',
  Signals in 'jopl\Signals.pas',
  StandardAuth in 'jopl\StandardAuth.pas',
  Unicode in 'jopl\Unicode.pas',
  XMLAttrib in 'jopl\XMLAttrib.pas',
  XMLCData in 'jopl\XMLCData.pas',
  XMLConstants in 'jopl\XMLConstants.pas',
  XMLHttpStream in 'jopl\XMLHttpStream.pas',
  XMLNode in 'jopl\XMLNode.pas',
  XMLParser in 'jopl\XMLParser.pas',
  XMLSocketStream in 'jopl\XMLSocketStream.pas',
  XMLStream in 'jopl\XMLStream.pas',
  XMLTag in 'jopl\XMLTag.pas',
  XMLUtils in 'jopl\XMLUtils.pas',
  BaseChat in 'BaseChat.pas' {frmBaseChat},
  About in 'About.pas' {frmAbout},
  AutoUpdateStatus in 'AutoUpdateStatus.pas' {frmAutoUpdateStatus},
  AvPlayer in 'AvPlayer.pas' {AvPlayeForm},
  AvRecorder in 'AvRecorder.pas' {AvRecForm},
  AVWizard in 'AVWizard.pas' {AVWizardForm},
  Bookmark in 'Bookmark.pas' {frmBookmark},
  Broadcastsms in 'Broadcastsms.pas' {frmBroadcastSMS},
  buttonFrame in 'buttonFrame.pas' {frameButtons: TFrame},
  CaptureScreen in 'CaptureScreen.pas' {CaptureForm},
  cfgtransport in 'cfgtransport.pas',
  ChatWin in 'ChatWin.pas' {frmChat},
  COMChatController in 'COMChatController.pas',
  COMController in 'COMController.pas',
  COMPPDB in 'COMPPDB.pas',
  COMPresence in 'COMPresence.pas',
  COMRoster in 'COMRoster.pas',
  COMRosterItem in 'COMRosterItem.pas',
  ConnDetails in 'ConnDetails.pas' {frmConnDetails},
  CustomNotify in 'CustomNotify.pas' {frmCustomNotify},
  CustomPres in 'CustomPres.pas' {frmCustomPres},
  Debug in 'Debug.pas' {frmDebug},
  Dockable in 'Dockable.pas' {frmDockable},
  DockableEX in 'DockableEX.pas' {frmDockableEx},
  DropTarget in 'DropTarget.pas',
  Emoticons in 'Emoticons.pas' {frmEmoticons},
  EntInfo in 'EntInfo.pas' {frmEntInfo},
  entusers in 'entusers.pas' {frmEntUsers},
  ExceptTracer in 'ExceptTracer.pas' {frmTracer},
  ExEvents in 'ExEvents.pas',
  ExResponders in 'ExResponders.pas',
  ExSession in 'ExSession.pas',
  ExUtils in 'ExUtils.pas',
  fGeneric in 'fGeneric.pas' {frameGeneric: TFrame},
  FileServer in 'FileServer.pas',
  FindEnt in 'FindEnt.pas' {frmFindEnt},
  FindRoom in 'FindRoom.pas' {fmFindRoom},
  fLeftLabel in 'fLeftLabel.pas' {frmField: TFrame},
  fListbox in 'fListbox.pas' {frameListbox: TFrame},
  fmInmHistory in 'fmInmHistory.pas' {InmHistoryForm},
  fRosterTree in 'fRosterTree.pas' {frameTreeRoster: TFrame},
  fService in 'fService.pas' {frameObjectActions: TFrame},
  fTopLabel in 'fTopLabel.pas' {frameTopLabel: TFrame},
  g729 in 'g729.pas',
  GetContact in 'GetContact.pas' {frmGetContact},
  GetHistory in 'GetHistory.pas' {frmGetHistory},
  getopt in 'getOpt.pas',
  GetShare in 'GetShare.pas' {fmGetShare},
  gnugettext in 'gnugettext.pas',
  GrpRemove in 'GrpRemove.pas' {frmGrpRemove},
  GTLanguagesEx in 'GTLanguagesEx.pas',
  GUIFactory in 'GUIFactory.pas',
  IBB in 'IBB.pas',
  InputPassword in 'InputPassword.pas' {frmInputPass},
  InstantMail in 'InstantMail.pas' {InstantForm},
  InvalidRoster in 'InvalidRoster.pas' {frmInvalidRoster},
  Invite in 'invite.pas' {frmInvite},
  invmsg in 'invmsg.pas' {frmInviteMsg},
  Jabber1 in 'Jabber1.pas' {frmAnyQ},
  JoinRoom in 'JoinRoom.pas' {frmJoinRoom},
  jud in 'jud.pas' {frmJUD},
  Login in 'Login.pas' {frmLogin},
  MailUnit in 'MailUnit.pas',
  MsgDisplay in 'MsgDisplay.pas',
  msghistory in 'msghistory.pas' {fmMsgHistory},
  MsgQueue in 'MsgQueue.pas' {frmMsgQueue},
  MsgRecv in 'MsgRecv.pas' {frmMsgRecv},
  myShare in 'myShare.pas' {frmMyShare},
  NewAccount in 'NewAccount.pas' {fmNewAccount},
  newRoom in 'newRoom.pas' {fmNewRoom},
  Notify in 'Notify.pas',
  Options in 'Options.pas' {fmOptions},
  Password in 'Password.pas' {frmPassword},
  PathSelector in 'PathSelector.pas' {frmPathSelector},
  PluginAuth in 'PluginAuth.pas',
  pptConsole in 'pptConsole.pas' {frmPPT},
  Profile in 'Profile.pas' {frmProfile},
  RegExpr in 'RegExpr.pas',
  RegForm in 'RegForm.pas' {frmRegister},
  Register in 'Register.pas',
  RemoveContact in 'RemoveContact.pas' {frmRemove},
  RiserWindow in 'RiserWindow.pas' {frmRiser},
  Room in 'Room.pas' {frmRoom},
  RoomAdminList in 'RoomAdminList.pas' {frmRoomAdminList},
  RosterAdd in 'RosterAdd.pas' {frmAdd},
  RosterRecv in 'RosterRecv.pas' {frmRosterRecv},
  RosterWindow in 'RosterWindow.pas' {frmRosterWindow},
  SelContact in 'SelContact.pas' {frmSelContact},
  SendContact in 'SendContact.pas' {frmSendContact},
  ShareUnit in 'ShareUnit.pas',
  ShellCtrls in 'ShellCtrls.pas',
  AnyQV in 'AnyQV.pas',
  Subscribe in 'subscribe.pas' {frmSubscribe},
  Transfer in 'Transfer.pas' {frmTransfer},
  Transports in 'Transports.pas',
  UDP in 'UDP.pas',
  vcard in 'vcard.pas' {frmVCard},
  WebGet in 'WebGet.pas' {frmWebDownload},
  whiteboard in 'whiteboard.pas' {frmAnyQWB},
  xdata in 'xdata.pas' {frmXData},
  Browser in 'Browser.pas' {frmBrowse},
  pptExt in 'pptExt.pas' {FrmPPTExt},
  frmwebbrowse in 'frmwebbrowse.pas' {CoBrowseFrom},
  AnyQCOM_TLB in 'AnyQCOM_TLB.pas',
  AnyQBase in 'AnyQBase.pas' {AnyQBaseForm},
  regUser in 'regUser.pas' {FrmRegUser},
  BroadcastMsg in 'BroadcastMsg.pas' {frmBroadcastMsg};

{$R *.TLB}

{$R *.res}

{$R manifest.res}
{$R xtra.res}
{$R msg.res}
//{$R DecData.RES}

var
  continue: boolean;

begin
  Application.Initialize;
  Application.Title := '';
  Application.ShowMainForm := false;

  // Main startup stuff
  continue := SetupSession();
  if (not continue) then
  begin
    TeardownSession;
    halt(0);
    exit;
  end;

//  InitVACComponents;
//  EventDispatcher := TEventDispatcher.Create;

  Application.CreateForm(TfrmAnyQ, frmAnyQ);
  Application.CreateForm(TfrmInviteMsg, frmInviteMsg);
  frmRosterWindow := TfrmRosterWindow.Create(Application);
  frmCustomPres := TfrmCustomPres.Create(Application);
  frmEmoticons := TfrmEmoticons.Create(Application);

  frmAnyQ.Startup();

  frmRosterWindow.DockRoster;
  frmRosterWindow.Show;
  Application.Run;
end.
