BSOne.SFC/Tocsg.Module/RemoteSecu/EXE_RemoteSecuClient/DImgView.dfm

140 lines
3.0 KiB
Plaintext

object DlgImgView: TDlgImgView
Left = 0
Top = 0
BorderIcons = [biSystemMenu, biMaximize]
Caption = #48120#47532#48372#44592
ClientHeight = 461
ClientWidth = 605
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
Position = poScreenCenter
OnClose = FormClose
TextHeight = 15
object pnClient: TPanel
Left = 0
Top = 41
Width = 605
Height = 383
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object imgEn: TImageEn
Left = 0
Top = 0
Width = 605
Height = 383
Cursor = crHandPoint
Background = clBlack
Ctl3D = False
ParentCtl3D = False
LegacyBitmap = True
MouseInteract = [miZoom, miScroll]
AutoFit = True
OnMouseWheel = imgEnMouseWheel
EnableInteractionHints = True
MouseWheelParams.Action = iemwZoom
Align = alClient
PopupMenu = popFun
TabOrder = 0
end
end
object pnBottom: TPanel
Left = 0
Top = 424
Width = 605
Height = 37
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 8
Top = 12
Width = 57
Height = 15
Caption = #54028#51068' '#44221#47196' :'
end
object SpeedButton1: TSpeedButton
Left = 443
Top = 9
Width = 25
Height = 23
Caption = '...'
end
object edPath: TEdit
Left = 72
Top = 9
Width = 369
Height = 23
TabOrder = 0
end
object chOpenDir: TCheckBox
Left = 478
Top = 11
Width = 147
Height = 17
Caption = #51200#51109' '#54980' '#54260#45908' '#50676#44592
TabOrder = 1
end
end
object pnTop: TPanel
Left = 0
Top = 0
Width = 605
Height = 41
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object SpeedButton2: TSpeedButton
Left = 374
Top = 8
Width = 81
Height = 27
Caption = #49849#51064' '#50836#52397
OnClick = SpeedButton2Click
end
object btnWaterSave: TSpeedButton
Left = 461
Top = 8
Width = 140
Height = 27
Caption = #50892#53552#47560#53356' '#52628#44032' '#54980' '#51200#51109
OnClick = btnWaterSaveClick
end
object lbPName: TLabel
Left = 8
Top = 9
Width = 46
Height = 21
Caption = 'Name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
ParentFont = False
end
end
object OpenDialog: TOpenDialog
Left = 208
Top = 296
end
object popFun: TPopupMenu
AutoHotkeys = maManual
Left = 112
Top = 88
object miSetFit: TMenuItem
Caption = #54868#47732#50640' '#47582#52644
Checked = True
OnClick = miSetFitClick
end
object miSetOrgSize: TMenuItem
Caption = #50896#48376' '#53356#44592
OnClick = miSetOrgSizeClick
end
end
end