////////////////////////////////////////////////////////////////////////////////
//
// step1.cpp -     Borland C++ Builder
//
////////////////////////////////////////////////////////////////////////////////
#include <vcl.h>
#pragma hdrstop


#ifndef __WINDOWS_H
#include "windows.h"
#endif

#ifndef __STDIO_H
#include "stdio.h"
#endif

#ifndef __LIBTOOL_H
#include <libtool.h>
#endif


//-------------------------------------------------------------------------------
//   
// ---
extern "C" char * __export __pascal LIBRARYNAME()
{
  return "    (Borland C++ Builder)";
}


//-------------------------------------------------------------------------------
//   
// ---
extern "C" void __export __pascal LIBRARYENTRY( unsigned int )
{
  //   
  LineSeg( 0, 0, 0, 10, 1 );
  Application->Handle = GetHWindow();
  EnableTaskAccess( 0 );
  EnableTaskAccess( 0 );
  PumpWaitingMessages();
  Application->MessageBox( "", "", MB_OK );
  EnableTaskAccess( 1 );
  EnableTaskAccess( 1 );
  Application->Handle = 0;
  Message( " !!!" );
}



