object WPManager: TWPManager Left = 278 Top = 147 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Set Wallpaper' ClientHeight = 328 ClientWidth = 284 Color = clBtnFace Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] OldCreateOrder = False Scaled = False OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ImageWPCtrl: TImage Left = 0 Top = 0 Width = 285 Height = 204 Picture.Data = {} end object PBPreview: TPaintBox Left = 21 Top = 24 Width = 132 Height = 99 OnPaint = PBPreviewPaint end object PBEntryList: TPaintBox Left = 187 Top = 10 Width = 80 Height = 148 Color = clBtnFace ParentColor = False OnMouseDown = PBEntryListMouseDown OnPaint = PBEntryListPaint end object PBHLLeft: TPaintBox Left = 177 Top = 10 Width = 10 Height = 70 OnPaint = PBHLLeftPaint end object PBHLRight: TPaintBox Left = 267 Top = 10 Width = 10 Height = 70 OnPaint = PBHLRightPaint end object Bevel1: TBevel Left = -1 Top = 204 Width = 286 Height = 3 end object LabelAboutIt: TLabel Left = 16 Top = 175 Width = 64 Height = 12 Caption = 'LabelAboutIt' Font.Charset = SHIFTJIS_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] ParentFont = False Transparent = True end object ButtonChange: TButton Left = 184 Top = 232 Width = 89 Height = 25 Caption = 'Update' TabOrder = 0 OnClick = ButtonChangeClick end object ButtonCancel: TButton Left = 184 Top = 264 Width = 89 Height = 25 Caption = 'Cancel' TabOrder = 1 OnClick = ButtonCancelClick end object ButtonClose: TButton Left = 184 Top = 296 Width = 89 Height = 25 Caption = 'Close' TabOrder = 2 OnClick = ButtonCloseClick end object RGImageSize: TRadioGroup Left = 8 Top = 232 Width = 161 Height = 41 Caption = 'ImageSize' Columns = 2 ItemIndex = 0 Items.Strings = ( 'Original' 'Expanded') TabOrder = 3 OnClick = RGSizeStyleChange end object RGStyle: TRadioGroup Left = 8 Top = 280 Width = 161 Height = 41 Caption = 'Style' Columns = 2 ItemIndex = 0 Items.Strings = ( 'Centered' 'Tiled') TabOrder = 4 OnClick = RGSizeStyleChange end object CBHideViewer: TCheckBox Left = 8 Top = 208 Width = 169 Height = 17 Caption = 'Hide Viewer' TabOrder = 5 OnClick = CBHideViewerClick end end