//----------------------------------------------------------------------------
// ObjectWindows - (C) Copyright 1991, 1993 by Borland International
//----------------------------------------------------------------------------
#include <owl\owlpch.h>
#include <owl\applicat.h>
#include <dir.h>
#include "appbtnba.h"
#include "appwin.h"
#include "applaunc.rh"

#if     defined(__WIN32__) && defined(_RTLDLL)
extern int __cdecl _setargv__;
#pragma extref  _setargv__
#endif

class TAppLauncher : public TApplication {
  public:
    TAppLauncher(char* startupPath);

  protected:
    string              StartupPath;    // path to exe.
    TAppButtonBar*      AppButtons;     // Button bar that contains buttons.

    void InitMainWindow();

};

//
// Constructor. Extract the path (without the exe name).
//
TAppLauncher::TAppLauncher(char* startupPath)
  : TApplication()
{
  char drive[MAXDRIVE];
  char dir[MAXDIR];
  fnsplit(startupPath, drive, dir, 0, 0);
  StartupPath = string(drive) + dir;
}

//
// InitMainWindow().  Create a default button bar (will be changed later).
// Create frame window with button bar as the client.
//
void TAppLauncher::InitMainWindow()
{
  AppButtons = new TAppButtonBar(0, 1);
  MainWindow = new TAppWindow("Apps", AppButtons, StartupPath);
  MainWindow->SetIcon(this, IDI_APPLAUNCHER);
}

int
OwlMain(int /*argc*/, char* argv[])
{
  return TAppLauncher(argv[0]).Run();
}