1 {*******************************************************}
5 { Copyright (C) 2001-2003 naru/Mikage Sawatari }
7 {*******************************************************}
10 (********************************)
11 (*
\82±
\82ê
\82Í
\95s
\8dK
\82Ì
\83\
\81[
\83X
\82Å
\82·
\81B *)
12 (*
\82±
\82Ì
\83\
\81[
\83X
\82ð
\8c©
\82½
\90l
\82Í
\81A *)
13 (*
\88ê
\8fT
\8aÔ
\88È
\93à
\82É
\82U
\82Â
\82Ì
\83o
\83O
\82ð *)
14 (*
\8eæ
\82ç
\82È
\82¢
\82Æ
\8e\80\82É
\82Ü
\82·
\81B *)
15 (********************************)
17 { http://bottle.mikage.to/viewlog2.cgi?around=3eb34d9300000001 }
21 {%ToDo 'SstpBottle.todo'}
25 MainForm in 'MainForm.pas' {frmSender},
26 BRegExp in 'BRegExp.pas',
27 BottleDef in 'BottleDef.pas',
28 ConstEditor in 'ConstEditor.pas' {frmConstEditor},
29 SendConfirm in 'SendConfirm.pas' {frmConfirmSend},
30 SettingForm in 'SettingForm.pas' {frmSetting},
31 LogForm in 'LogForm.pas' {frmLog},
32 HeadValue in 'HeadValue.pas',
33 ChannelListForm in 'ChannelListForm.pas' {frmChannelList},
34 MessageBox in 'MessageBox.pas' {frmMessageBox},
36 HttpThread in 'HttpThread.pas',
37 LogDownload in 'LogDownload.pas' {frmLogDownload},
38 ColorSettingFrame in 'ColorSettingFrame.pas' {frmColorSetting: TFrame},
39 ScriptConsts in 'ScriptConsts.pas',
40 BottleChainEvent in 'BottleChainEvent.pas',
41 BottleChainRule in 'BottleChainRule.pas',
42 BottleChainListFrame in 'BottleChainListFrame.pas' {frmBottleChainList: TFrame},
43 BottleChainRuleEditor in 'BottleChainRuleEditor.pas' {frmBottleChainRuleEditor},
44 MinMaxEditor in 'MinMaxEditor.pas' {frmMinMaxEditor},
45 StrListEditor in 'StrListEditor.pas' {frmStrListEditor},
46 MultipleChoiceEditor in 'MultipleChoiceEditor.pas' {frmMultipleChoiceEditor},
47 SakuraSeekerInstance in 'SakuraSeekerInstance.pas',
48 FMOExplorer in 'FMOExplorer.pas' {frmFMOExplorer},
49 OpenFileEditor in 'OpenFileEditor.pas' {frmOpenFileEditor},
50 BottleSstp in 'BottleSstp.pas',
51 SurfacePreview in 'SurfacePreview.pas' {frmSurfacePreview},
52 SppList in 'SppList.pas',
53 SppTypes in 'SppTypes.pas',
54 TalkShowFrame in 'TalkShowFrame.pas' {frmTalkShow: TFrame},
55 EditorTalkShow in 'EditorTalkShow.pas' {frmEditorTalkShow},
56 ProgressWindow in 'ProgressWindow.pas' {frmProgressWindow};
58 //
\8c^
\95t
\82«
\92è
\90\94\82ð
\95Ï
\8dX
\82Å
\82«
\82é
\82æ
\82¤
\82É
\82·
\82é
\83R
\83\93\83p
\83C
\83\89\83I
\83v
\83V
\83\87\83\93
59 //
\88ê
\95\94\82Ì
\83R
\83\93\83|
\81[
\83l
\83\93\83g
\82É
\82±
\82ê
\82ª
\95K
\97v
64 // WindowsXP
\82ÌLuna
\91Î
\89\9e\81B
\82½
\82¾
\82µDelphi7
\82Ì
\82Ý
\81B
65 // Delphi6
\82È
\82ç
\81A
\82à
\82µ
\82©
\82µ
\82½
\82ç$R
\82µ
\82Ä
\82à
\93®
\82
\82©
\82à
\82µ
\82ê
\82Ü
\82¹
\82ñ
\82ª
\81A
66 // Delphi5Pro
\82¾
\82Æ ListView
\82Ì
\83J
\83\89\83\80\83N
\83\8a\83b
\83N
\82È
\82Ç
\82Å
\95s
\8bï
\8d\87\82ª
\8fo
\82Ü
\82·
\82Ì
\82Å
\83_
\83\81\82Å
\82·
\81B
67 {$IFDEF CONDITIONALEXPRESSIONS}
68 {$IF Declared(CompilerVersion)}
69 {$IF CompilerVersion >= 15.0} // Delphi7
\88È
\8fã
\82È
\82ç
77 Application.Initialize;
78 Application.Title := 'SSTP Bottle Client';
79 Application.ShowMainForm := true;
80 Application.CreateForm(TfrmSender, frmSender);
81 Application.CreateForm(TfrmLog, frmLog);
82 Application.CreateForm(TfrmChannelList, frmChannelList);
83 Application.CreateForm(TfrmMessageBox, frmMessageBox);
84 Application.CreateForm(TfrmFMOExplorer, frmFMOExplorer);
85 Application.CreateForm(TfrmSurfacePreview, frmSurfacePreview);
86 if not Application.Terminated then frmSender.Show;