commit 82b87f4bc8a8fe1927980368539e0b4934ed7885 Author: jdg Date: Sun Sep 12 22:11:46 2021 +0200 First commit 04/07/1999 diff --git a/Launcher.bmp b/Launcher.bmp new file mode 100644 index 0000000..0acaff8 Binary files /dev/null and b/Launcher.bmp differ diff --git a/Launcher.bpr b/Launcher.bpr new file mode 100644 index 0000000..8739fad --- /dev/null +++ b/Launcher.bpr @@ -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ó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ó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) $< +#----------------------------------------------------------------------------- diff --git a/Launcher.cpp b/Launcher.cpp new file mode 100644 index 0000000..ff6a0f9 --- /dev/null +++ b/Launcher.cpp @@ -0,0 +1,22 @@ +//--------------------------------------------------------------------------- +#include +#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; +} +//--------------------------------------------------------------------------- diff --git a/Launcher.res b/Launcher.res new file mode 100644 index 0000000..f7388f7 Binary files /dev/null and b/Launcher.res differ diff --git a/MainForm.cpp b/MainForm.cpp new file mode 100644 index 0000000..7a0e561 --- /dev/null +++ b/MainForm.cpp @@ -0,0 +1,95 @@ +//--------------------------------------------------------------------------- +#include +#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(); +} +//--------------------------------------------------------------------------- + diff --git a/MainForm.dfm b/MainForm.dfm new file mode 100644 index 0000000..edf90f2 Binary files /dev/null and b/MainForm.dfm differ diff --git a/MainForm.h b/MainForm.h new file mode 100644 index 0000000..25f99e2 --- /dev/null +++ b/MainForm.h @@ -0,0 +1,46 @@ +//--------------------------------------------------------------------------- +#ifndef MainFormH +#define MainFormH +//--------------------------------------------------------------------------- +#include +#include +#include +#include +#include "CoolForm.hpp" +#include +#include "ActivApp.hpp" +#include +//--------------------------------------------------------------------------- +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 diff --git a/README.md b/README.md new file mode 100644 index 0000000..cb5916f --- /dev/null +++ b/README.md @@ -0,0 +1,9 @@ +#Launcher + + +*04/07/1999* + +ToDo: wwtcf? + + +![screenshot](/Launcher.png "Screenshot")