D7wmhengming/基础数据/getpic.dfm
DESKTOP-E401PHE\Administrator 5ad6218a33 ~
2025-04-27 16:59:54 +08:00

158 lines
3.4 KiB
Plaintext

object FormGetPic: TFormGetPic
Left = 313
Top = 115
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #33719#21462#22270#29255
ClientHeight = 452
ClientWidth = 665
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Image2: TImage
Left = 464
Top = 8
Width = 160
Height = 120
end
object SpeedButton1: TSpeedButton
Left = 500
Top = 334
Width = 80
Height = 22
Caption = #25171#24320#22270#29255'...'
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 500
Top = 380
Width = 80
Height = 22
Caption = #30830#23450
Enabled = False
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 500
Top = 426
Width = 80
Height = 22
Caption = #25918#24323
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 500
Top = 358
Width = 80
Height = 22
Caption = #22270#29255#21478#23384'...'
OnClick = SpeedButton4Click
end
object SpeedButton5: TSpeedButton
Left = 500
Top = 404
Width = 80
Height = 22
Caption = #21024#38500
OnClick = SpeedButton5Click
end
object ScrollBox1: TScrollBox
Left = 5
Top = 5
Width = 440
Height = 440
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
TabOrder = 0
object Image1: TImage
Left = 0
Top = -4
Width = 437
Height = 441
Cursor = crSizeAll
AutoSize = True
Center = True
IncrementalDisplay = True
OnMouseDown = Image1MouseDown
OnMouseMove = Image1MouseMove
end
end
object Button1: TButton
Left = 464
Top = 252
Width = 81
Height = 21
Caption = #25171#24320#25668#20687#22836
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 560
Top = 252
Width = 81
Height = 21
Caption = #25235#22270
TabOrder = 2
OnClick = Button2Click
end
object Twain: TDelphiTwain
OnTwainAcquire = TwainTwainAcquire
TransferMode = ttmMemory
SourceCount = 0
Info.MajorVersion = 1
Info.MinorVersion = 0
Info.Language = tlUserLocale
Info.CountryCode = 1
Info.Groups = [tgControl, tgImage]
Info.VersionInfo = 'Application name'
Info.Manufacturer = 'Application manufacturer'
Info.ProductFamily = 'App product family'
Info.ProductName = 'App product name'
LibraryLoaded = False
SourceManagerLoaded = False
Left = 518
Top = 160
end
object OpenPictureDialog1: TOpenPictureDialog
DefaultExt = 'jpg'
Filter = 'JPEG '#22270#24418#25991#20214' (*.jpg)|*.jpg'
Left = 568
Top = 152
end
object ADOQuery1: TADOQuery
Connection = BaseData10_DataLink.ADOLink
Parameters = <>
Left = 504
Top = 280
end
object SaveDialog1: TSavePictureDialog
Filter = 'JPG'#22270#29255#26684#24335' (*.JPG)|*.JPG'
Left = 568
Top = 299
end
object adoqueryImage: TADOQuery
Connection = BaseData10_DataLink.ADOLink
Parameters = <>
Left = 488
Top = 184
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 500
Top = 198
end
end