project1.cpp

一个Delphi解释器的例子

//---------------------------------------------------------------------------
#include <vcl\condefs.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "intmain.hpp"
#pragma hdrstop
//---------------------------------------------------------------------------
USERES("Project1.res");
USEUNIT("intmain.pas");
//---------------------------------------------------------------------------
int main(int argc, char **argv)
{
 MainProc();
 return 0;
}
//---------------------------------------------------------------------------