Unit1.fmx

   1 object Form1: TForm1
   2   Left = 0
   3   Top = 0
   4   Caption = 'vobslideshow'
   5   ClientHeight = 578
   6   ClientWidth = 824
   7   Visible = True
   8   FormFactor.Width = 320
   9   FormFactor.Height = 480
  10   FormFactor.Devices = [Desktop]
  11   OnCreate = FormCreate
  12   DesignerMasterStyle = 0
  13   object Image1: TImage
  14     MultiResBitmap = <
  15       item
  16       end>
  17     Anchors = [akTop, akRight]
  18     Position.X = 280.000000000000000000
  19     Position.Y = 40.000000000000000000
  20     Size.Width = 481.000000000000000000
  21     Size.Height = 345.000000000000000000
  22     Size.PlatformDefault = False
  23     WrapMode = Stretch
  24     object BandedSwirlTransitionEffect1: TBandedSwirlTransitionEffect
  25       Enabled = False
  26       Progress = 0.000000000000000000
  27       Strength = 1.000000000000000000
  28       Frequency = 20.000000000000000000
  29     end
  30     object BlindTransitionEffect1: TBlindTransitionEffect
  31       Enabled = False
  32       Progress = 0.000000000000000000
  33       NumberOfBlinds = 5.000000000000000000
  34     end
  35     object BlurTransitionEffect1: TBlurTransitionEffect
  36       Enabled = False
  37       Progress = 0.000000000000000000
  38     end
  39     object BrightTransitionEffect1: TBrightTransitionEffect
  40       Enabled = False
  41       Progress = 0.000000000000000000
  42     end
  43     object CircleTransitionEffect1: TCircleTransitionEffect
  44       Enabled = False
  45       Progress = 0.000000000000000000
  46       FuzzyAmount = 0.100000001490116100
  47       CircleSize = 1.000000000000000000
  48     end
  49     object CrumpleTransitionEffect1: TCrumpleTransitionEffect
  50       Enabled = False
  51       Progress = 0.000000000000000000
  52       RandomSeed = 0.300000011920929000
  53     end
  54     object DissolveTransitionEffect1: TDissolveTransitionEffect
  55       Enabled = False
  56       Progress = 0.000000000000000000
  57       RandomSeed = 0.300000011920929000
  58     end
  59     object DropTransitionEffect1: TDropTransitionEffect
  60       Enabled = False
  61       Progress = 0.000000000000000000
  62       RandomSeed = 0.300000011920929000
  63     end
  64     object FadeTransitionEffect1: TFadeTransitionEffect
  65       Enabled = False
  66       Progress = 0.000000000000000000
  67     end
  68     object LineTransitionEffect1: TLineTransitionEffect
  69       Enabled = False
  70       Progress = 0.000000000000000000
  71       FuzzyAmount = 0.100000001490116100
  72     end
  73     object MagnifyTransitionEffect1: TMagnifyTransitionEffect
  74       Enabled = False
  75       Progress = 0.000000000000000000
  76     end
  77     object PixelateTransitionEffect1: TPixelateTransitionEffect
  78       Enabled = False
  79       Progress = 0.000000000000000000
  80     end
  81     object RippleTransitionEffect1: TRippleTransitionEffect
  82       Enabled = False
  83       Progress = 0.000000000000000000
  84     end
  85     object RotateCrumpleTransitionEffect1: TRotateCrumpleTransitionEffect
  86       Enabled = False
  87       Progress = 0.000000000000000000
  88       RandomSeed = 0.300000011920929000
  89     end
  90     object SaturateTransitionEffect1: TSaturateTransitionEffect
  91       Enabled = False
  92       Progress = 0.000000000000000000
  93     end
  94     object ShapeTransitionEffect1: TShapeTransitionEffect
  95       Enabled = False
  96       Progress = 0.000000000000000000
  97       RandomSeed = 0.300000011920929000
  98     end
  99     object SlideTransitionEffect1: TSlideTransitionEffect
 100       Enabled = False
 101       Progress = 0.000000000000000000
 102     end
 103     object SwirlTransitionEffect1: TSwirlTransitionEffect
 104       Enabled = False
 105       Progress = 0.000000000000000000
 106       Strength = 1.000000000000000000
 107     end
 108     object WaterTransitionEffect1: TWaterTransitionEffect
 109       Enabled = False
 110       Progress = 0.000000000000000000
 111       RandomSeed = 0.300000011920929000
 112     end
 113     object WaveTransitionEffect1: TWaveTransitionEffect
 114       Enabled = False
 115       Progress = 0.000000000000000000
 116     end
 117     object WiggleTransitionEffect1: TWiggleTransitionEffect
 118       Enabled = False
 119       Progress = 0.000000000000000000
 120       RandomSeed = 0.300000011920929000
 121     end
 122   end
 123   object ListView1: TListView
 124     ItemAppearanceClassName = 'TImageListItemAppearance'
 125     ItemEditAppearanceClassName = 'TImageListItemShowCheck'
 126     HeaderAppearanceClassName = 'TListHeaderObjects'
 127     FooterAppearanceClassName = 'TListHeaderObjects'
 128     EditMode = True
 129     Align = Scale
 130     Position.X = 28.000000000000000000
 131     Position.Y = 40.000000000000000000
 132     Size.Width = 200.000000000000000000
 133     Size.Height = 345.000000000000000000
 134     Size.PlatformDefault = False
 135     TabOrder = 5
 136     ItemAppearanceObjects.ItemEditObjects.GlyphButton.ClickOnSelect = False
 137     OnChange = ListView1Change
 138     SearchVisible = True
 139   end
 140   object Button1: TButton
 141     Position.X = 88.000000000000000000
 142     Position.Y = 432.000000000000000000
 143     Size.Width = 80.000000000000000000
 144     Size.Height = 22.000000000000000000
 145     Size.PlatformDefault = False
 146     TabOrder = 6
 147     Text = #38283#12367
 148     OnClick = Button1Click
 149   end
 150   object Button2: TButton
 151     Anchors = [akTop, akRight]
 152     Position.X = 496.000000000000000000
 153     Position.Y = 432.000000000000000000
 154     TabOrder = 9
 155     Text = #23455#34892
 156     OnClick = Button2Click
 157   end
 158   object Timer1: TTimer
 159     Left = 72
 160     Top = 192
 161   end
 162   object MainMenu1: TMainMenu
 163     Left = 152
 164     Top = 136
 165     object MenuItem1: TMenuItem
 166       Text = 'File'
 167       object MenuItem2: TMenuItem
 168         Locked = True
 169         Text = 'Open'
 170         OnClick = Button1Click
 171       end
 172       object MenuItem11: TMenuItem
 173         Locked = True
 174         Text = 'Delete'
 175         OnClick = Button3Click
 176       end
 177       object MenuItem4: TMenuItem
 178         Locked = True
 179         Text = '-'
 180       end
 181       object MenuItem5: TMenuItem
 182         Locked = True
 183         Text = 'Exit'
 184         OnClick = MenuItem5Click
 185       end
 186     end
 187     object MenuItem3: TMenuItem
 188       Text = 'Operation'
 189       object MenuItem6: TMenuItem
 190         Locked = True
 191         Text = 'Run'
 192         OnClick = Button2Click
 193       end
 194     end
 195     object MenuItem7: TMenuItem
 196       Text = 'Setting'
 197       object MenuItem8: TMenuItem
 198         Locked = True
 199         Text = 'Effects'
 200         OnClick = MenuItem8Click
 201       end
 202       object MenuItem12: TMenuItem
 203         Locked = True
 204         Text = 'Sound'
 205         OnClick = MenuItem12Click
 206       end
 207     end
 208     object MenuItem9: TMenuItem
 209       Text = 'Help'
 210       object MenuItem10: TMenuItem
 211         Locked = True
 212         Text = 'About'
 213       end
 214     end
 215   end
 216   object OpenDialog1: TOpenDialog
 217     Filter = #30011#20687#12501#12449#12452#12523'(*.jpg;*.jpeg;*.bmp;*png)|*.jpg;*.jpeg;*.bmp;*.png'
 218     Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
 219     Left = 176
 220     Top = 264
 221   end
 222   object FloatAnimation1: TFloatAnimation
 223     Duration = 2.500000000000000000
 224     Interpolation = Exponential
 225     OnFinish = FloatAnimation1Finish
 226     PropertyName = 'Progress'
 227     StartValue = 0.000000000000000000
 228     StopValue = 100.000000000000000000
 229   end
 230   object ComboBox1: TComboBox
 231     Anchors = [akTop, akRight]
 232     Position.X = 464.000000000000000000
 233     Position.Y = 480.000000000000000000
 234     Size.Width = 148.000000000000000000
 235     Size.Height = 22.000000000000000000
 236     Size.PlatformDefault = False
 237     TabOrder = 22
 238   end
 239   object Button3: TButton
 240     Position.X = 88.000000000000000000
 241     Position.Y = 480.000000000000000000
 242     TabOrder = 29
 243     Text = #21066#38500
 244     OnClick = Button3Click
 245   end
 246   object SpinBox1: TSpinBox
 247     Touch.InteractiveGestures = [LongTap, DoubleTap]
 248     TabOrder = 30
 249     Cursor = crIBeam
 250     Min = 2.500000000000000000
 251     Max = 20.000000000000000000
 252     Value = 2.500000000000000000
 253     ValueType = Float
 254     Increment = 0.500000000000000000
 255     Position.X = 296.000000000000000000
 256     Position.Y = 432.000000000000000000
 257     OnChange = SpinBox1Change
 258   end
 259   object Label1: TLabel
 260     Position.X = 312.000000000000000000
 261     Position.Y = 408.000000000000000000
 262     Text = #34920#31034#38291#38548
 263   end
 264   object Label2: TLabel
 265     Position.X = 312.000000000000000000
 266     Position.Y = 456.000000000000000000
 267     Text = 'Minimam'
 268   end
 269   object Label3: TLabel
 270     Position.X = 616.000000000000000000
 271     Position.Y = 408.000000000000000000
 272     Size.Width = 201.000000000000000000
 273     Size.Height = 17.000000000000000000
 274     Size.PlatformDefault = False
 275     Text = #38899#22768#12501#12449#12452#12523#65306#12394#12375
 276   end
 277   object MediaPlayer1: TMediaPlayer
 278     Left = 248
 279     Top = 192
 280   end
 281 end