First commit 04/07/1999
This commit is contained in:
BIN
Launcher.bmp
Normal file
BIN
Launcher.bmp
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 115 KiB |
125
Launcher.bpr
Normal file
125
Launcher.bpr
Normal file
@ -0,0 +1,125 @@
|
||||
# ---------------------------------------------------------------------------
|
||||
VERSION = BCB.03
|
||||
# ---------------------------------------------------------------------------
|
||||
!ifndef BCB
|
||||
BCB = $(MAKEDIR)\..
|
||||
!endif
|
||||
# ---------------------------------------------------------------------------
|
||||
PROJECT = Launcher.exe
|
||||
OBJFILES = Launcher.obj MainForm.obj
|
||||
RESFILES = Launcher.res
|
||||
RESDEPEN = $(RESFILES) MainForm.dfm
|
||||
LIBFILES =
|
||||
LIBRARIES = CDopping.lib QRPT35.lib JDsoft.lib vcldbx35.lib vcldb35.lib vclx35.lib vcl35.lib
|
||||
SPARELIBS = vcl35.lib vclx35.lib vcldb35.lib vcldbx35.lib JDsoft.lib QRPT35.lib CDopping.lib
|
||||
PACKAGES = VCLX35.bpi VCL35.bpi VCLDB35.bpi VCLDBX35.bpi bcbsmp35.bpi dclocx35.bpi \
|
||||
QRPT35.bpi TEEUI35.bpi TEEDB35.bpi TEE35.bpi ibsmp35.bpi NMFAST35.bpi \
|
||||
INETDB35.bpi INET35.bpi JDsoft.bpi
|
||||
PATHASM = .;
|
||||
PATHCPP = .;
|
||||
PATHPAS = .;
|
||||
PATHRC = .;
|
||||
DEBUGLIBPATH = $(BCB)\lib\debug
|
||||
RELEASELIBPATH = $(BCB)\lib\release
|
||||
DEFFILE =
|
||||
# ---------------------------------------------------------------------------
|
||||
CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
|
||||
CFLAG2 = -I..\componentes\cdopping\actvapp;..\componentes\cdopping\coolform;"..\jd soft\jd";$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\include;$(BCB)\include\vcl \
|
||||
-H=$(BCB)\lib\vcld.csm
|
||||
CFLAG3 = -5
|
||||
PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
|
||||
-U..\componentes\cdopping\actvapp;..\componentes;..\componentes\cdopping\coolform;"..\jd soft\jd";$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\lib\obj;$(BCB)\lib;$(DEBUGLIBPATH) \
|
||||
-I..\componentes\cdopping\actvapp;..\componentes\cdopping\coolform;"..\jd soft\jd";$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\include;$(BCB)\include\vcl \
|
||||
-H -$Y -$W -$O- -v -JPHNV -M
|
||||
RFLAGS = -i..\componentes\cdopping\actvapp;..\componentes\cdopping\coolform;"..\jd soft\jd";$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\include;$(BCB)\include\vcl
|
||||
AFLAGS = /i..\componentes\cdopping\actvapp /i..\componentes\cdopping\coolform \
|
||||
/i"..\jd soft\jd" /i$(BCB)\bin /i$(BCB)\objrepos /i$(BCB)\projects \
|
||||
/i$(BCB)\include /i$(BCB)\include\vcl /mx /w2 /zd
|
||||
LFLAGS = -L..\componentes\cdopping\actvapp;..\componentes;..\componentes\cdopping\coolform;"..\jd soft\jd";$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\lib\obj;$(BCB)\lib;$(DEBUGLIBPATH) \
|
||||
-aa -Tpe -x -v
|
||||
IFLAGS = -g
|
||||
LINKER = ilink32
|
||||
# ---------------------------------------------------------------------------
|
||||
ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
|
||||
ALLRES = $(RESFILES)
|
||||
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
|
||||
# ---------------------------------------------------------------------------
|
||||
.autodepend
|
||||
|
||||
!ifdef IDEOPTIONS
|
||||
|
||||
[Version Info]
|
||||
IncludeVerInfo=1
|
||||
AutoIncBuild=1
|
||||
MajorVer=1
|
||||
MinorVer=0
|
||||
Release=0
|
||||
Build=2
|
||||
Debug=1
|
||||
PreRelease=0
|
||||
Special=0
|
||||
Private=0
|
||||
DLL=0
|
||||
Locale=3082
|
||||
CodePage=1252
|
||||
|
||||
[Version Info Keys]
|
||||
CompanyName=JD soft.
|
||||
FileDescription=Program Launcher
|
||||
FileVersion=1.0.0.2
|
||||
InternalName=Launcher
|
||||
LegalCopyright=Copyright (C) Sol Negro 1990-1999
|
||||
LegalTrademarks=
|
||||
OriginalFilename=Launcher
|
||||
ProductName=SN Launcher
|
||||
ProductVersion=1.0.0.0
|
||||
Comments=
|
||||
|
||||
[HistoryLists\hlIncludePath]
|
||||
Count=2
|
||||
Item0=..\componentes\cdopping\actvapp;..\componentes\cdopping\coolform;..\jd soft\jd;$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\include;$(BCB)\include\vcl
|
||||
Item1=..\jd soft\jd;l:\programaci<63>n (-cbuilder-)\jd soft\jd;l:\cbuilder\cbuilder\objrepos;j:\cbuilder\cbuilder\bin;j:\cbuilder\cbuilder\bin;j:\cbuilder\cbuilder\objrepos;$(BCB)\bin;$(BCB)\objrepos;j:\cbuilder\jd soft;j:\progwin95\jd soft;$(BCB)\projects;$(BCB)\include;$(BCB)\include\vcl
|
||||
|
||||
[HistoryLists\hlLibraryPath]
|
||||
Count=2
|
||||
Item0=..\componentes\cdopping\actvapp;..\componentes;..\componentes\cdopping\coolform;..\jd soft\jd;$(BCB)\bin;$(BCB)\objrepos;$(BCB)\projects;$(BCB)\lib\obj;$(BCB)\lib
|
||||
Item1=..\jd soft\jd;l:\programaci<63>n (-cbuilder-)\jd soft\jd;l:\cbuilder\cbuilder\objrepos;j:\cbuilder\cbuilder\bin;j:\cbuilder\cbuilder\bin;j:\cbuilder\cbuilder\objrepos;$(BCB)\bin;$(BCB)\objrepos;j:\cbuilder\jd soft;j:\progwin95\jd soft;$(BCB)\projects;$(BCB)\lib\obj;$(BCB)\lib
|
||||
|
||||
[HistoryLists\hlUnitAliases]
|
||||
Count=1
|
||||
Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
|
||||
|
||||
[Debugging]
|
||||
DebugSourceDirs=
|
||||
|
||||
[Parameters]
|
||||
RunParams=
|
||||
HostApplication=
|
||||
|
||||
!endif
|
||||
|
||||
$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
|
||||
$(BCB)\BIN\$(LINKER) @&&!
|
||||
$(LFLAGS) +
|
||||
$(ALLOBJ), +
|
||||
$(PROJECT),, +
|
||||
$(ALLLIB), +
|
||||
$(DEFFILE), +
|
||||
$(ALLRES)
|
||||
!
|
||||
|
||||
.pas.hpp:
|
||||
$(BCB)\BIN\dcc32 $(PFLAGS) { $** }
|
||||
|
||||
.pas.obj:
|
||||
$(BCB)\BIN\dcc32 $(PFLAGS) { $** }
|
||||
|
||||
.cpp.obj:
|
||||
$(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
|
||||
|
||||
.c.obj:
|
||||
$(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
|
||||
|
||||
.rc.res:
|
||||
$(BCB)\BIN\brcc32 $(RFLAGS) $<
|
||||
#-----------------------------------------------------------------------------
|
||||
22
Launcher.cpp
Normal file
22
Launcher.cpp
Normal file
@ -0,0 +1,22 @@
|
||||
//---------------------------------------------------------------------------
|
||||
#include <vcl.h>
|
||||
#pragma hdrstop
|
||||
USERES("Launcher.res");
|
||||
USEFORM("MainForm.cpp", Form1);
|
||||
//---------------------------------------------------------------------------
|
||||
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
|
||||
{
|
||||
try
|
||||
{
|
||||
Application->Initialize();
|
||||
Application->Title = "Launcher";
|
||||
Application->CreateForm(__classid(TForm1), &Form1);
|
||||
Application->Run();
|
||||
}
|
||||
catch (Exception &exception)
|
||||
{
|
||||
Application->ShowException(&exception);
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
BIN
Launcher.res
Normal file
BIN
Launcher.res
Normal file
Binary file not shown.
95
MainForm.cpp
Normal file
95
MainForm.cpp
Normal file
@ -0,0 +1,95 @@
|
||||
//---------------------------------------------------------------------------
|
||||
#include <vcl.h>
|
||||
#pragma hdrstop
|
||||
|
||||
#include "MainForm.h"
|
||||
//---------------------------------------------------------------------------
|
||||
#pragma package(smart_init)
|
||||
#pragma link "CoolForm"
|
||||
#pragma link "ActivApp"
|
||||
#pragma resource "*.dfm"
|
||||
TForm1 *Form1;
|
||||
//---------------------------------------------------------------------------
|
||||
__fastcall TForm1::TForm1(TComponent* Owner)
|
||||
: TForm(Owner)
|
||||
{
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
void __fastcall TForm1::Button1Click(TObject *Sender)
|
||||
{
|
||||
bool Success;
|
||||
// Run crack...
|
||||
ActivApp1 -> ExePath = "Off97\\Instalar.EXE";
|
||||
ActivApp1 -> ExecuteApp( &Success );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button2Click(TObject *Sender)
|
||||
{
|
||||
bool Success;
|
||||
// Run crack...
|
||||
ActivApp1 -> ExePath = "COMPRES\\Winzip7.0\\winzip70.exe";
|
||||
ActivApp1 -> ExecuteApp( &Success );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button3Click(TObject *Sender)
|
||||
{
|
||||
bool Success;
|
||||
// Run crack...
|
||||
ActivApp1 -> ExePath = "Utilidades\\PTP.62\\Install.exe";
|
||||
ActivApp1 -> ExecuteApp( &Success );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button4Click(TObject *Sender)
|
||||
{
|
||||
bool Success;
|
||||
// Run crack...
|
||||
ActivApp1 -> ExePath = "Utilidades\\ACDSee3223\\acdc3223.exe";
|
||||
ActivApp1 -> ExecuteApp( &Success );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button5Click(TObject *Sender)
|
||||
{
|
||||
bool Success;
|
||||
// Run crack...
|
||||
ActivApp1 -> ExePath = "Utilidades\\drae2.exe";
|
||||
ActivApp1 -> ExecuteApp( &Success );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button6Click(TObject *Sender)
|
||||
{
|
||||
bool Success;
|
||||
// Run crack...
|
||||
ActivApp1 -> ExePath = "Utilidades\\Tapices.exe";
|
||||
ActivApp1 -> ExecuteApp( &Success );
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button7Click(TObject *Sender)
|
||||
{
|
||||
ShowMessage( "Sol Negro\n78210DD8");
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button8Click(TObject *Sender)
|
||||
{
|
||||
ShowMessage( "Sol Negro\nPT6SU7-6.20-100-2596");
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::Button9Click(TObject *Sender)
|
||||
{
|
||||
ShowMessage( "Sol Negro\n4967846472");
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
|
||||
{
|
||||
Close();
|
||||
}
|
||||
//---------------------------------------------------------------------------
|
||||
|
||||
BIN
MainForm.dfm
Normal file
BIN
MainForm.dfm
Normal file
Binary file not shown.
46
MainForm.h
Normal file
46
MainForm.h
Normal file
@ -0,0 +1,46 @@
|
||||
//---------------------------------------------------------------------------
|
||||
#ifndef MainFormH
|
||||
#define MainFormH
|
||||
//---------------------------------------------------------------------------
|
||||
#include <Classes.hpp>
|
||||
#include <Controls.hpp>
|
||||
#include <StdCtrls.hpp>
|
||||
#include <Forms.hpp>
|
||||
#include "CoolForm.hpp"
|
||||
#include <ExtCtrls.hpp>
|
||||
#include "ActivApp.hpp"
|
||||
#include <Buttons.hpp>
|
||||
//---------------------------------------------------------------------------
|
||||
class TForm1 : public TForm
|
||||
{
|
||||
__published: // IDE-managed Components
|
||||
TCoolForm *CoolForm1;
|
||||
TActivApp *ActivApp1;
|
||||
TButton *Button1;
|
||||
TButton *Button2;
|
||||
TButton *Button3;
|
||||
TButton *Button4;
|
||||
TButton *Button5;
|
||||
TButton *Button6;
|
||||
TButton *Button7;
|
||||
TButton *Button8;
|
||||
TButton *Button9;
|
||||
TBitBtn *BitBtn1;
|
||||
void __fastcall Button1Click(TObject *Sender);
|
||||
void __fastcall Button2Click(TObject *Sender);
|
||||
void __fastcall Button3Click(TObject *Sender);
|
||||
void __fastcall Button4Click(TObject *Sender);
|
||||
void __fastcall Button5Click(TObject *Sender);
|
||||
void __fastcall Button6Click(TObject *Sender);
|
||||
void __fastcall Button7Click(TObject *Sender);
|
||||
void __fastcall Button8Click(TObject *Sender);
|
||||
void __fastcall Button9Click(TObject *Sender);
|
||||
void __fastcall BitBtn1Click(TObject *Sender);
|
||||
private: // User declarations
|
||||
public: // User declarations
|
||||
__fastcall TForm1(TComponent* Owner);
|
||||
};
|
||||
//---------------------------------------------------------------------------
|
||||
extern PACKAGE TForm1 *Form1;
|
||||
//---------------------------------------------------------------------------
|
||||
#endif
|
||||
Reference in New Issue
Block a user