home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOKAN 19
/
DOKAN19.iso
/
Progs
/
Pnt04cde1.zip
/
PROGRAMS
/
JVIEWER.EXE
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1999-10-06
|
4KB
|
172 lines
object Form1: TForm1
Left = 226
Top = 168
Width = 229
Height = 135
Caption = 'jViewer'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
Menu = MainMenu1
OnClose = FormClose
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnPaint = FormPaint
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object Display: TPaintBox
Left = 0
Top = 0
Width = 221
Height = 65
Align = alClient
Color = clWhite
ParentColor = False
OnPaint = DisplayPaint
end
object Panel1: TPanel
Left = 0
Top = 65
Width = 221
Height = 24
Align = alBottom
Alignment = taLeftJustify
TabOrder = 0
object Scroll: TPaintBox
Left = 88
Top = 4
Width = 125
Height = 17
OnClick = ScrollClick
OnPaint = ScrollPaint
end
object SpeedButton1: TSpeedButton
Left = 4
Top = 4
Width = 17
Height = 17
Caption = '�'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
Layout = blGlyphBottom
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 24
Top = 4
Width = 17
Height = 17
Caption = '�'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
Layout = blGlyphBottom
ParentFont = False
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 44
Top = 4
Width = 17
Height = 17
Caption = '�'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
Layout = blGlyphBottom
ParentFont = False
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 64
Top = 4
Width = 17
Height = 17
Caption = '�'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
Layout = blGlyphBottom
ParentFont = False
OnClick = SpeedButton4Click
end
end
object OpenDlg: TOpenDialog
FileEditStyle = fsEdit
Filter =
'All supported (*.SJS;*.EUC;*.JIS)|*.SJS;*.EUC;*.JIS|Shift-JIS Te' +
'xt File (*.*)|*.*|EUC Text File (*.*)|*.*|??? JIS Text File (*.*' +
')|*.*'
Options = [ofPathMustExist, ofFileMustExist]
Left = 28
end
object PrtDlg: TPrintDialog
Options = [poPageNums]
Left = 56
end
object MainMenu1: TMainMenu
object Menu1: TMenuItem
ShortCut = 0
object Menu2: TMenuItem
ShortCut = 113
OnClick = Menu2Click
end
object Menu13: TMenuItem
ShortCut = 114
OnClick = Menu13Click
end
object Menu4: TMenuItem
ShortCut = 121
OnClick = Menu4Click
end
object Menu14: TMenuItem
ShortCut = 16452
OnClick = Menu14Click
end
object Menu3: TMenuItem
ShortCut = 27
OnClick = Menu3Click
end
end
object Menu7: TMenuItem
ShortCut = 0
object Menu11: TMenuItem
ShortCut = 117
OnClick = Menu11Click
end
object Menu9: TMenuItem
ShortCut = 116
OnClick = Menu9Click
end
object Menu12: TMenuItem
ShortCut = 16456
OnClick = Menu12Click
end
object Menu8: TMenuItem
ShortCut = 118
OnClick = Menu8Click
end
object Menu10: TMenuItem
ShortCut = 32
OnClick = Menu10Click
end
end
object Menu5: TMenuItem
ShortCut = 0
object Menu6: TMenuItem
ShortCut = 112
OnClick = Menu6Click
end
end
end
end