64 lines
2.2 KiB
ObjectPascal
Executable File
64 lines
2.2 KiB
ObjectPascal
Executable File
program AMXX_Studio;
|
|
|
|
uses
|
|
madExcept,
|
|
madLinkDisAsm,
|
|
madScreenShot,
|
|
Forms,
|
|
Windows,
|
|
Messages,
|
|
UnitfrmMain in 'UnitfrmMain.pas' {frmMain},
|
|
UnitMainTools in 'UnitMainTools.pas',
|
|
UnitfrmSettings in 'UnitfrmSettings.pas' {frmSettings},
|
|
UnitLanguages in 'UnitLanguages.pas',
|
|
UnitfrmSelectColor in 'UnitfrmSelectColor.pas' {frmSelectColor},
|
|
UnitfrmInfo in 'UnitfrmInfo.pas' {frmInfo},
|
|
UnitCodeSnippets in 'UnitCodeSnippets.pas',
|
|
UnitCodeUtils in 'UnitCodeUtils.pas',
|
|
UnitfrmSplashscreen in 'UnitfrmSplashscreen.pas' {frmSplashscreen},
|
|
UnitfrmSearch in 'UnitfrmSearch.pas' {frmSearch},
|
|
UnitfrmReplace in 'UnitfrmReplace.pas' {frmReplace},
|
|
UnitfrmAllFilesForm in 'UnitfrmAllFilesForm.pas' {frmAllFilesForm},
|
|
UnitfrmGoToLine in 'UnitfrmGoToLine.pas' {frmGoToLine},
|
|
UnitfrmPluginsIniEditor in 'UnitfrmPluginsIniEditor.pas' {frmPluginsIniEditor},
|
|
UnitfrmSocketsTerminal in 'UnitfrmSocketsTerminal.pas' {frmSocketsTerminal},
|
|
UnitReadThread in 'UnitReadThread.pas',
|
|
UnitCodeExplorerUpdater in 'UnitCodeExplorerUpdater.pas',
|
|
UnitTextAnalyze in 'UnitTextAnalyze.pas',
|
|
UnitfrmHudMsgGenerator in 'UnitfrmHudMsgGenerator.pas' {frmHudMsgGenerator},
|
|
UnitCompile in 'UnitCompile.pas',
|
|
UnitfrmAutoIndent in 'UnitfrmAutoIndent.pas' {frmAutoIndent},
|
|
UnitfrmHTMLPreview in 'UnitfrmHTMLPreview.pas' {frmHTMLPreview},
|
|
UnitfrmMenuGenerator in 'UnitfrmMenuGenerator.pas' {frmMenuGenerator},
|
|
UnitCodeInspector in 'UnitCodeInspector.pas',
|
|
UnitfrmMOTDGen in 'UnitfrmMOTDGen.pas' {frmMOTDGen},
|
|
UnitMenuGenerators in 'UnitMenuGenerators.pas',
|
|
UnitfrmClose in 'UnitfrmClose.pas' {frmClose},
|
|
UnitfrmConnGen in 'UnitfrmConnGen.pas' {frmConnGen},
|
|
UnitPlugins in 'UnitPlugins.pas';
|
|
|
|
{ Used components:
|
|
JVCL 3.0
|
|
FlatPack
|
|
FlatStyle
|
|
Toolbar2000, TBX, SpTBX, mbTBX Lib
|
|
Scintilla and DelphiSci
|
|
madExcept
|
|
|
|
{$R *.res}
|
|
|
|
var i: integer;
|
|
begin
|
|
if FindWindow(nil, 'AMXX-Studio') <> 0 then begin
|
|
if ParamCount > 0 then begin
|
|
for i := 1 to ParamCount do
|
|
SendToMainApp('LoadFile' + ParamStr(i));
|
|
end;
|
|
//exit;
|
|
end;
|
|
Application.Initialize;
|
|
Application.Title := 'AMXX-Studio';
|
|
Application.CreateForm(TfrmSplashscreen, frmSplashscreen);
|
|
Application.Run;
|
|
end.
|