www.pudn.com > 04001.rar > Unit1.cpp
//--------------------------------------------------------------------------- #include#pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::FormActivate(TObject *Sender) { int ii; if(ParamCount()>=1) { for(ii=1;ii<=ParamCount();ii++) { ShowMessage(ParamStr(ii)); } } } //---------------------------------------------------------------------------