Rev 1 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1 | daniel-mar | 1 | program Extractor; |
2 | |||
3 | { |
||
4 | Warning: Extractor must be small, otherwise WinRAR |
||
5 | will not recognize the ZIP which is appended to this file. |
||
6 | So we MUST use UPX in PostBuild! |
||
7 | } |
||
8 | |||
9 | uses |
||
10 | Forms, |
||
11 | ExtractorMain in 'ExtractorMain.pas' {MainForm}, |
||
12 | ExtractorPassword in 'ExtractorPassword.pas' {PasswordDlg}, |
||
13 | ExtractorError in 'ExtractorError.pas' {ErrorForm}, |
||
14 | ExtractorComment in 'ExtractorComment.pas' {CommentForm}, |
||
15 | Functions in 'Functions.pas', |
||
16 | SFXAutoRun in 'SFXAutoRun.pas', |
||
3 | daniel-mar | 17 | SFXBehavior in 'SFXBehavior.pas', |
18 | BrowseFolder in 'BrowseFolder.pas'; |
||
1 | daniel-mar | 19 | |
20 | {$R *.res} |
||
21 | |||
22 | begin |
||
23 | Application.Initialize; |
||
24 | Application.Title := 'ViaThinkSoft AutoSFX Extractor'; |
||
25 | Application.CreateForm(TMainForm, MainForm); |
||
26 | Application.CreateForm(TPasswordDlg, PasswordDlg); |
||
27 | Application.CreateForm(TErrorForm, ErrorForm); |
||
28 | Application.CreateForm(TCommentForm, CommentForm); |
||
29 | Application.Run; |
||
30 | end. |