home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Gian 1999 January
/
TG199901.mdf
/
comic
/
comic.exe
/
0
/
RCDATA
/
TFRMMAIN
/
TFRMMAIN.txt
< prev
Wrap
Text File
|
1998-05-27
|
19KB
|
486 lines
object FrmMain: TFrmMain
Left = 293
Top = 114
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'FrmMain'
ClientHeight = 486
ClientWidth = 688
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '�l�r �o�S�V�b�N'
Font.Style = []
Position = poScreenCenter
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object PMain: TTechPanel
Left = 0
Top = 0
Width = 304
Height = 420
BevelOuter = bvNone
Caption = 'PMain'
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '�l�r �S�V�b�N'
Font.Style = []
ParentFont = False
TabOrder = 0
AutoSize = True
DoVisibleChange = False
Picture.Data = {<image000.bmp>}
object ISample: TImage
Left = 28
Top = 84
Width = 98
Height = 138
Stretch = True
end
object BBuy: TTechButton
Left = 142
Top = 200
Width = 139
Height = 20
AutoSize = True
OnMouseUp = BBuyMouseUp
end
object LComicNo: TLabel
Left = 171
Top = 353
Width = 56
Height = 20
Alignment = taCenter
AutoSize = False
Caption = '30/30'
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clLime
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object BLeftSkip: TCmprsBtn
Tag = 1
Left = 119
Top = 387
Width = 35
Height = 25
AutoSize = True
OnMouseUp = BLRSkipMouseUp
CompressedData = {
96010000789CEDD53D4BC3401807F027A967424B110487CE2E7E02DDDD8B839B
DF41717251105171D141B1D4C5412914A4205A5C3A6851284A45ACB6A2A2B5AD
D5D650A536E94BAA265E5E87F6125787FEA787DCEF8ECB73E1420DBBC6BD2228
19BCF886815B80FE47004F018092D986F27C61F607CC50B2599EE737C3DB778B
502C46272399A5A789E34BB87FDD5DF55F25626FC28DF724B776962F44A63FB9
F8D87C7C1FFCA975083DF89E4F731B87352E31124A4F41A5961DDA4A65768EB2
CBC962E57A742F3D533DC8CC71897C2018E782816429BC127DF1C5A0934E3AF9
17C13700E5E1FF5214CFCAC89E888CC0F6D6EDCD17B41ADE45EB15A245B2E119
B7A85732C3104D8346ACA863D4241A8902D00C2640340AD10C5E0F888651EF50
C5A89864AA4ED08D46084627D868EBB51B54D609B01F46D56ACA3DC6C69BDD60
618C3DE075EA949531112B3AEAC8C21808BF97D240B2016DBED21F0D11FBAC0E
A97DEE2EB92D8C8AB4F342EF6E0BA3CCD7CF1D230B8387FAF4EF0795BB2C0C20
C9FC2D36580BD31EC5381DF64612050F6D4F8017A45F3232E802}
end
object BLeft: TCmprsBtn
Tag = 1
Left = 160
Top = 387
Width = 35
Height = 25
AutoSize = True
OnMouseUp = BLRMouseUp
CompressedData = {
5A010000789C6374E2CEF5FDC9000266E7FE3068DC606050BECBC020F99C8181
F13FC70F90784BFD5F063860FC0F671EFDB46879F9EF3E8665DF5BEEBF7A7334
B5EF7739C3E94F37B2EFBEDB55FDEDD545FF4D5F279C9CF26ED98D993F2BBF9E
F8B9A977F9EF2DABDEFF7C68FEE1F5E9A81D5FA6ED9BF57BE9B1F93FEA5F5D7F
BFA5ADE1772B43D7AF1A86473F2F059FFEB862CE9A6F5D571EBF3D50B0EFF39C
CD6B7F4D3E36F95731C3ECDFED8F1946C1281805030A80250023171721558CAF
D9B899F12B7927F4868D4D00BF9A1F0C58D53CFF274D48CDBFAF3F44F1ABF9F6
9591E13F7E356FD98065235E35EF39BE82287C6AFE7C8714B0B8D5BCE7F90865
E154F39C918581809AA7EC08711C6ADE228A6FDCE6FC79C342500D9293F1F91D
1C7E04D4C08290405C7CF9FF93A01A70941252034C1AEF08AB61782EF68EA01A
A0078509AB410620351C1CF8D57C677FC325885F0903D38BDF000EF4C502}
end
object BRight: TCmprsBtn
Tag = 2
Left = 202
Top = 387
Width = 35
Height = 25
AutoSize = True
OnMouseUp = BLRMouseUp
CompressedData = {
56010000789C6374E2CEF5FDC9000266E7FE3068DC606050BECBC020F99C8181
F13FC70F90784BFD5F063860FC0F671EFDB46879F9EF3E8659BF971E7BF5E668
6ADFEF7286BBEF7655CFFC59F9F5DBAB8BFE9BBE4E38B9FCF79655173FAC9B78
F9E78594D9BFDB1FBFFFF9D07CD9F796FBFB3ECFD9FCE1F5E9A8EBEFB7B435FC
6E65E8FA55C330FF47FDAB35DFBAAE3CFA7929F8F4C715731EBF3D50B0F6D7E4
63337F4EBD39F95731C3899F9B7A1946C1281805030A802500A3F40F42AA18DF
F07C17C0AFE4BDE05B1EC1FFF8D57C674055F3EDAB2841356F387F081354C3C0
C0856E1416350C7F84D808AA616010782F4A500D83E0375E826A18187E4A1356
C320F8879DA01A06CEFF3C04D53030F0B111520377376E35022C84DC8C1C8E38
D430FF410A44AC6AD0E2159B1AF448C554030F16DC6AFEF1B3331050F305DD10
2C6AB001901A264EFC6A3E73BE9526600CC3E71FBF016B3CCC02}
end
object BRightSkip: TCmprsBtn
Tag = 2
Left = 244
Top = 389
Width = 35
Height = 25
AutoSize = True
OnMouseUp = BLRSkipMouseUp
CompressedData = {
8E010000789CEDD43D4BC3401807F0E76A881AC1E2627176F113E8EE2E0E6E7E
07C5C9491051EBA28362A98B83220852102D7570D0A250948A586D4145FB6E2D
C5C156D397342FE69A4B9ABE5CBB3AF43F1D77BFE472CF93048DF7CD4C940067
F45E84916780E17780A14F00A4F414F1FCCAA2044690620CEF92BBEEFD975548
A7BD7367317B62F6EA015E53C79BCEC780EF3ABE759BCF0426B319FFF4B2FF14
9CA16D70BD391297B1F5E04D7CE7C2159E875C3E36B6178A1E0592078727E105
3E9D7B9AF2449732C12FF74624E5B19F47D722DE0F870F3AE9A4937F13F50F80
98EE760AFDDABE99D64460791B945A9B321846E10A64B297B7504C57C14A905C
6611C5E411632106CCA8C60059520D14AD34A3216C40E268A6727DC5545183C1
4B9A01A95FA418151103C28048312059F44369A899016B561F7112C5B04A59BF
2347D98B45FAF39093351AB542C4E8B5AE3708F74C33463BEA4C8568A6DAB15A
A3116C90FE0ED41B5233D598498DF9260464D14CCC466645BD40204073430D36
429BEF422AF1CC606B023FBCFC0728ECF002}
end
object BLeftSkipDis: TCompressedImage
Left = 113
Top = 374
Width = 35
Height = 25
AutoSize = True
Visible = False
CompressedData = {
96010000789CEDD43D4BC3401807F0278D264DA4D4B7A593834B3F818B4E82A3
D4C5417012170771930E8AA0DD05374144707114844EEA5428C5376815A550AC
A2B612AAA94D7B499B36DEE5A5437B89AB43FFD343EE77C7DD73E198E981D559
0D48266E75083F018CE700420500C6F0ABE47B6CAB09ED3046BB5C46FCE1CA5D
2D9D948CC869E9393673DD2A2FA6EA2FDB0FD2E571E16DEFE0FD633FF515985A
BFFF491CE5FDD15C35381697739BF349BD187E355034CD9EEDE63F4F966E5076
2DAD5CED644BF139B9EF7CE351BE98CC1895D1B2A12F64984C24D1FA865E7AE9
E55F04BF000C2FFCA5FC4576A4EE4D0424B342D0DB54A1D3A8EAA05D291C4737
6A7988B3AB2A334C359A2CF29C8DC506D5C82C80653001AA21C432783DA09ABA
F9B81263629A413AD8C6221463136CACF5BA8DC2DA04F8A653751A1D391B6FF4
838B71F680D7A9B16EA68D78AEE0135D8C83F0B94803E906ACF9A43F16A2F6D9
1C32FB2CF938176322EBBE148D733164BE7DEF18B9183C14B0FF1F85452E0694
4AC82935DEC5748718B1E96D5050E6456F0282D4F805DC08D602}
end
object BLeftDis: TCompressedImage
Left = 157
Top = 379
Width = 35
Height = 25
AutoSize = True
Visible = False
CompressedData = {
57010000789C6374E2CEF5FDC9000266E7FE3068DC606050BECBC020F99C8181
F13FC70F90784BFD5F063860FC0F67767F3DB5CDFBF7C19F077EBD8E8EFACABB
64D5C71BBD4A9FC4AF9EFAF3D331FECFD60F39BF76DFAFFB71F8F8B60F776BA7
7F39BFECEE1F3645E79F973E197FFDFA38EFAB644BE49FCD3FCA7FEEBA16FC77
03C3DC2F17E72DFAFBB061C3C75BADF1BFCFDE4CFBB5F379EBB7E3FB8A7EEEBB
BEF8F39569D57F4E1EA8F871F03CC3281805A3604001B0046014FA4B50D52766
466EFC4ABE737E6416FA875FCD1F06AC6A58197F1152F39DE7DF7FFC6ABEF27C
67E0C4AF86FDCF5706FC6AFEFD06CBE253F38DF72B037E35FF3E70415938D5B0
BE656320A086ED13421C871AF68F0C04D5307CFBC346500D9293F1F91D1C7E04
D4C08290405C70FDFC4A500D384A09A901260D46C26A1858997F125403F4E04F
C26A9001480DD72FFC6A38FF7F14E2C2AF84E1F7EB7F00A586DB02}
end
object BRightDis: TCompressedImage
Left = 203
Top = 378
Width = 35
Height = 25
AutoSize = True
Visible = False
CompressedData = {
55010000789C6374E2CEF5FDC9000266E7FE3068DC606050BECBC020F99C8181
F13FC70F90784BFD5F063860FC0F67767F3DB5CDFBF7C19F515F79971CFAF322
6AD5C71BBD4A9FC4AF9EFAF3D331E7D7EEFB753F0E1F8FFFB3F5C3B60F776BE7
7EB938EFEE1F3645E79F973E197FFDFA38EFAB644BC59F6DD722FF6CFE31F1EB
99758BFE3E6C08FEBB8161C3C75BADF1BFCFDE4CFBB5F379F59F93078A7EEEBB
BEF8F39569D3BF9C5FD6FAEDF83E8651300A46C180026009C028F88FA0AA4F2C
FF79F02BF9CEF991458011BF9A5F0CA86AD8BF311354F38D9BE53741350C0C82
E8466151C3F08B9997A01A2029C84C500D83C0DFBF04D5303008FD20AC8641E0
3D3741350CDC9F7908AA6160F8CB4B480DDCDDB8D57C1321E466E470C4A186E3
3F522062558316AFD8D4A0472AA61A78B0E056C3F88F9B81809A2F58D236BA1A
6C00A486F3177E359CFF3F0A72E057C2F0EFF53F00598FBB02}
end
object BRightSkipDis: TCompressedImage
Left = 250
Top = 376
Width = 35
Height = 25
AutoSize = True
Visible = False
CompressedData = {
8D010000789CEDD4BF4BC3401407F07769A46D6ADAA50E767170E95FE0A293E0
28BA38084EEAE2206ED24171B0BBE0E0288A8BA32074D2AD20A555B1159442B1
16218A5653639226A48D497349D31F1757877EA7E3EE73B9E4BD23683AB43EAB
8099891B0DE28F00E32580510E00E981BA399FDC698013A43BC3DD6235B57C2D
17CFAA4FC9CC273B7550E18E270BBAB091FFC9EE95DF4E17AEB4D7A372205112
23636BB7523E5ED1E5145FDA4EE47DE727DCCBFED6037FB979FF9D5E95FD874B
19F5799EA72FE6D2CDAFC5022A446BBA36936BD656B2E80E061964907F13E30F
8062C25F4A519950DD9B84448181616F238363343E8A273F188660DE291D2389
A2698261C520830DB8518701BC6418F00D918C854C036A98645AFB5BA68D7A8C
B9641950114B3006C2062885251850753FB8513F0372D01E09230443AB94FDC4
30E12C9AB6DF077F59AF312A848D5DEB6E239A3DB38CD38E2ED322966977ACD3
58C434A27D07BA0DAE9961DCA4C3443001497613B7911A76819A40417F438C69
90E26D22AA1013BD090428EE17E870CB02}
end
object BSelect: TCmprsBtn
Left = 23
Top = 351
Width = 65
Height = 26
AutoSize = True
OnMouseUp = BSelectMouseUp
CompressedData = {
45020000789CEDD63F88D3501800F02F49F35EDAE65F7B5A30608B87853B4141
107112CED1CDC55DC1F5C0F52627274111DD04C54544C14E1E0EA2782EFE41BD
494510176B29BD364D7ABD246D52BFD7A4C7D18B18AE1D6EE807298FC7F77E79
F9DEEB4BB873D9F58D4D6071FA531F16BE012CBD0230AA00DC4072587FADE8C1
767083EDE6FDC2876B97CB8FBF7CD75A8BA7CA8F604DFD79C116DCDCF5C32F1F
940E7E84B3C7EFC262F1059C3F76CF7C32B77EF587D438B93C5F79FD39FB7B69
35F7F5D2C58587BF6E14DFDC5929AD566E6AB5953FC43AB26CBC7B76F4D01A9C
98AFC06DE3EDAD33A5E7F695F2D3F7308B59CC625F049E005C7A52640B209DDF
9888D06B68A453CD098839BBCB0C369B3D0707533604C1E1F1877321907CDF55
4649362578B1161D003B92C52DCEA583742FC620262FF11D00397002DD13DB23
43EB75F1C2868E077C06EF6587FD8A1F6FB0915A2F32F83057772243AE33C3F5
41F5A84B2C1068AC21D885BAE24746663493D070026046DF53036CF1BC4552B1
06318DAAEEC51AF898C4C33EB96E98C3E9550B9D3823D3A182EFCADD3883B60A
4103FBA2078351C2B8A1B4758FB6347B673D083F1C866590683B8191B50D53AF
2A9B3BD745F786C388A9F6C524866CE51DA9A97642431F1ABECF86890D5C8624
8662530107B98ABDAB1EB48EAB90C450AD9C8BBBB1A55AE306F168D64964E0B7
86196EC77103F78304098D3C7EA948CDC8D042C10F30898A414223DC35290BC6
FF2F70A00B090D560E56905D86DA8744C61E639F19EDFF67FE3B7204F7C254DE
2F5330FE023B7F4711}
end
object BQuit: TCmprsBtn
Left = 26
Top = 387
Width = 65
Height = 26
AutoSize = True
OnMouseUp = BQuitMouseUp
CompressedData = {
14020000789CED944F68D44014C6BF49B29935D966D9750D4596521141AD20E2
1F0AED612B56A4081EA447413C59EDC14B112DD46B29088A0A3D7A11C59327AF
5E3C0BE241CF2275D1B5355DE226994CE224D9EE1EDCA54B22E261BFC3E4BDC9
CCEFCDBC9979E4ACFEFE878D4867DEF938FC09987903ECDF00489877A2FEFA98
878E48D83197D9D5A39FC37DDA91F2F8B3927B7FE184FB64E6353F3DFA9CD7AA
1ABBFC6242BA79FD0A5B3A59600B0F2ACECBB983CED3D90FC178B1E6AD4D5FF2
EE4DAEF3B90317CBC6E3B7C1C4DEDBEED4FC4F68EA23B7766A91DD387EDEBF7B
EE556BB652F456EEACF9F387A69C87D33ABBB67EC1599D1C61B7563FB68EA918
6AA8A1FEB944052072464671132818B92C08B6D502C67EE91910C17712315833
03C351FE64C8047E260631BE72F1C9ABC646BC3FDD6FC0B4B4184AA124F53A27
05AC3F83102B31CC6F28B3AE9B8F92DE44357169A3E2F667D006E81E4EB4BA38
B0308464812A2A6D59117040865E8F232A72230E2DDC649640AB74408664C91A
7296C888CC6184CC114DD41FD818B5076434A335DB01A8E6D928F9DDB1F1F481
18CA167409AECE43906D312125A3B473359AE919621DB152AF23C907DA594C97
8FE45C62892319412A46FB7EEC18A918ED7BEA9A5F603A612F86789062A35631
4A5BC87B32BAEFC5E3E8C510413A6AFFECF36ECDED802235037FA17EA4D0FFC5
A82AEEEE43FB8ADB816014CA1910C0664194BDDFB77C6311}
end
object LStory: TLabel
Left = 27
Top = 229
Width = 255
Height = 112
AutoSize = False
Caption = 'LStory'
Color = clWhite
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '�l�r �S�V�b�N'
Font.Style = []
ParentColor = False
ParentFont = False
end
object MData: TMemo
Left = 137
Top = 84
Width = 141
Height = 107
BorderStyle = bsNone
Color = clWhite
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '�l�r �S�V�b�N'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
object PTitle: TTechPanel
Left = 37
Top = 17
Width = 228
Height = 48
Caption = 'PTitle'
TabOrder = 1
AutoSize = True
DoVisibleChange = False
end
end
object PSub: TTechPanel
Left = 348
Top = 2
Width = 185
Height = 41
Caption = 'PSub'
TabOrder = 1
AutoSize = True
DoVisibleChange = False
end
object PBuy: TTechPanel
Left = 331
Top = 23
Width = 281
Height = 124
BevelOuter = bvNone
Caption = 'PBuy'
TabOrder = 2
Visible = False
AutoSize = True
DoVisibleChange = False
object MBuy: TMemo
Left = 5
Top = 9
Width = 185
Height = 89
BorderStyle = bsNone
Color = clWhite
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '�l�r �S�V�b�N'
Font.Style = []
Lines.Strings = (
'MBuy')
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object POpen: TTechPanel
Left = 352
Top = 171
Width = 185
Height = 41
Caption = 'POpen'
TabOrder = 3
OnClick = POpenClick
AutoSize = True
DoVisibleChange = False
end
object PBBuy: TPanel
Left = 0
Top = 426
Width = 148
Height = 56
Caption = 'PBBuy'
TabOrder = 4
object CmprsBtn1: TCmprsBtn
Left = 4
Top = 4
Width = 139
Height = 20
AutoSize = True
CompressedData = {
10020000789CED96BD6FD3401887DFB3CF3D27B68B1395A562E9C68658D818E0
3F808D117561AAC480D411C1C08090D8BA02330313524555D152750089A20A41
3B20858A5625356E9CF8EB72E7337612A59BED44A9DC21CFF49EF593FCBCF765
A3DBDAFE5F07526E7CE570750FE0F92380390B00C56A983E6FCDFB3004C5C3F2
CD9EFF7269B3D56874F8F58D437AFFE68E177B2CAE3DFDDCF9B8F8C1F25FECB8
EF7ED8ECD6DB5FC1E3E5EDF6B795AD834FF7566D78FF3B7CD80CC4C2CA77EFD5
D25AD35AF8C3E32FCDEE9D271B473F5F6F37569F6D1EEE2EAF1F1FDCDD754EAE
EDD37871FDB4F560EDC4812953A6944E7203A0D9B225CE68CFEAB46C871EED0A
B4AFB0A06C8D940012973A4385C2948060835A91B2B372A88061D79D4B470620
BD336917D996243E1CA9242B6B9C7A2A895CD0908BF596196765C77161C8C3A2
2A04F6CDEE8C3F97DDABE13948327D4FAE2442B589CF0BD0500757254ED22C54
95EC6C3227005A14AA2CCACD8EED22CD841877852EE7B9A8C04918492040C313
77495A4D5C30F108A63CDF45038EB1A3C7947846CE461FDDC55580558ABBE8A0
74B183F9E57FA21E4DDAA5FF0A85B83546595197DE202F3C8E0BEA54DC415978
8D0A698CEC2202AE9B56D536B94BB4BC59EFEF5DEC28A94BDEC538BA8B712C0C
1AF66B693EE7CAE89FE9C11A153B48A3EE97F3E4E2B9E042DF8BF3065B898B6A
94ADD143F6D37FA9B22DCEB8502EFF01AE930D11}
end
object CmprsBtn2: TCmprsBtn
Left = 3
Top = 27
Width = 139
Height = 20
AutoSize = True
CompressedData = {
1C020000789CED96BD6FD34014C09FEF1C27F129AE2931341455150B54A00A31
8084888460A013426240CEC4C28E84D86166A07F0082BFA0B0B0312010055414
8A840ACD0088216A2B9A607CF547FC753871D46EB15DA57286FC16DF59CFF2EF
DE7B773AEE0A696CFD832EE73F7B706A1DE0D17D80F23600C70A76F7BD76CC84
5D38163D6637ECBBE77E3C2CD796EBA0BE6DBE3EAA5DFC2B7813DCFC4F7AA3BA
F6F4EC42FDD5E393CD3BAB878CD3A2FAAEF1E0CCEF7BCF4E6CDE0ABFE67E117B
A65AAB3FB97CF5CBD29CBAF2F2F685C6E28BE3AD05EED25A7BA6F6E1CDB5DAEA
A2525DFF367B7DE5E3BCFAE9F984BAFC55BEF9FE3B8C19336624C0590BECE163
EC64EDD04369833FCDB6B2D6E83209A10B9268A26049875CB13FB6DCC1B1F28E
07953FCA76B9894038BC316C17D9A5457E7786F541B1954D11EB45046601792C
E726EA81342EBC2F7A167145D798ECE4033278AD15AA4FEDE43591D050686AE8
7901C90F00619D848B858E373836CC098059F271C1888DDDB70B957D2FAF9502
2BCE0543C7510C0A2530D9D05DC2A5862E9E235A4CE0E35DCCF0FAC248600B8E
E8C4347A7A9723361468729700B0C188C70BAD524E1BB64BF40BC610E7735C52
97DE242E783F2E824C517F98B846893452BBE4101FC806725D8C2C292EEB51EF
32C2BA2752DCC198DEA5D2B690E447633A1D7364447BBA5FA3641B296DBF1C24
A3E7A224AAE74123F8A10BC967ADD1836F75EF52595BEC31522EFF015BF9FD02}
end
end
object MStory: TMemo
Left = 360
Top = 250
Width = 281
Height = 130
BorderStyle = bsNone
Color = clWhite
Ctl3D = False
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '�l�r �S�V�b�N'
Font.Style = []
Lines.Strings = (
'')
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 5
Visible = False
end
object Ini: TIniGT
DefaultDir = ddApplication
Fence = fnNone
Left = 648
Top = 23
end
object Tmr: TTimer
Enabled = False
Interval = 2000
OnTimer = TmrTimer
Left = 653
Top = 73
end
end