Develop and Download Open Source Software

bad-mp3player

Browse Subversion Repository

/[bad-mp3player]/Unit1.fmx

Annotation of /Unit1.fmx

Parent Directory Parent Directory | Revision Log Revision Log

Revision 7 - (hide annotations) (download)
Sat Aug 15 03:06:09 2015 UTC (8 years, 6 months ago) by yamat0jp
File size: 4661 byte(s) 
タグ読み取りに使用するユニットを変更しました。現在Androidでは利用できませんが、書き換えをして使えるようにしようと思います。
1 yamat0jp 1 object Form1: TForm1
2     Left = 0
3     Top = 0
4     Caption = 'Form1'
5     ClientHeight = 480
6     ClientWidth = 481
7 yamat0jp 2 Position = Designed
8 yamat0jp 1 FormFactor.Width = 320
9     FormFactor.Height = 480
10     FormFactor.Devices = [Desktop]
11 yamat0jp 7 OnCreate = FormCreate
12 yamat0jp 1 OnDestroy = FormDestroy
13     OnShow = FormShow
14     DesignerMasterStyle = 3
15     object MediaPlayer1: TMediaPlayer
16     Left = 256
17     Top = 184
18     end
19     object Timer1: TTimer
20     OnTimer = Timer1Timer
21     Left = 160
22     Top = 232
23     end
24 yamat0jp 2 object StatusBar1: TStatusBar
25     Position.Y = 432.000000000000000000
26     ShowSizeGrip = True
27     Size.Width = 481.000000000000000000
28     Size.Height = 48.000000000000000000
29     Size.PlatformDefault = False
30 yamat0jp 7 TabOrder = 15
31 yamat0jp 2 object SpeedButton4: TSpeedButton
32     Action = Action6
33     Align = Right
34     Enabled = True
35     Position.X = 408.000000000000000000
36     Size.Width = 73.000000000000000000
37     Size.Height = 48.000000000000000000
38     Size.PlatformDefault = False
39     Visible = True
40     end
41     object SpeedButton5: TSpeedButton
42     Action = Action5
43     Align = Left
44     Enabled = True
45     Size.Width = 80.000000000000000000
46     Size.Height = 48.000000000000000000
47     Size.PlatformDefault = False
48     Visible = True
49     end
50     object SpeedButton6: TSpeedButton
51     Action = Action4
52     Align = Left
53     Enabled = True
54     Position.X = 80.000000000000000000
55     Size.Width = 73.000000000000000000
56     Size.Height = 48.000000000000000000
57     Size.PlatformDefault = False
58     Visible = True
59     end
60     object TrackBar2: TTrackBar
61     Align = Client
62     Orientation = Horizontal
63     Size.Width = 255.000000000000000000
64     Size.Height = 32.000000000000000000
65     Size.PlatformDefault = False
66     TabOrder = 4
67 yamat0jp 4 Tracking = False
68     OnChange = TrackBar2Change
69 yamat0jp 2 end
70     end
71 yamat0jp 7 object ToolBar1: TToolBar
72     Size.Width = 481.000000000000000000
73     Size.Height = 48.000000000000000000
74     Size.PlatformDefault = False
75     TabOrder = 23
76     object SpeedButton1: TSpeedButton
77     Position.X = 360.000000000000000000
78     Size.Width = 73.000000000000000000
79     Size.Height = 48.000000000000000000
80     Size.PlatformDefault = False
81     Text = 'SpeedButton1'
82     OnClick = SpeedButton1Click
83     end
84     object SpeedButton2: TSpeedButton
85     Action = Action1
86     Enabled = True
87     Position.X = 56.000000000000000000
88     Size.Width = 73.000000000000000000
89     Size.Height = 48.000000000000000000
90     Size.PlatformDefault = False
91     Visible = True
92     end
93     object SpeedButton3: TSpeedButton
94     Position.X = 208.000000000000000000
95     Size.Width = 73.000000000000000000
96     Size.Height = 48.000000000000000000
97     Size.PlatformDefault = False
98     Text = 'SpeedButton3'
99     end
100     end
101     object ToolBar2: TToolBar
102     Position.Y = 48.000000000000000000
103     Size.Width = 481.000000000000000000
104     Size.Height = 48.000000000000000000
105     Size.PlatformDefault = False
106     TabOrder = 24
107     object TrackBar1: TTrackBar
108     Align = HorzCenter
109     Max = 1.000000000000000000
110     Orientation = Horizontal
111     Position.X = 104.000000000000000000
112     Position.Y = 8.000000000000000000
113     Size.Width = 273.000000000000000000
114     Size.Height = 32.000000000000000000
115     Size.PlatformDefault = False
116     TabOrder = 1
117     Value = 1.000000000000000000
118     OnChange = TrackBar1Change
119     end
120     end
121     object ListView1: TListView
122     ItemAppearanceClassName = 'TImageListItemBottomDetailAppearance'
123     ItemEditAppearanceClassName = 'TImageListItemBottomDetailShowCheckAppearance'
124     HeaderAppearanceClassName = 'TListHeaderObjects'
125     FooterAppearanceClassName = 'TListHeaderObjects'
126     Align = Client
127     Size.Width = 481.000000000000000000
128     Size.Height = 336.000000000000000000
129     Size.PlatformDefault = False
130     TabOrder = 25
131     OnItemClick = ListView1ItemClick
132     end
133 yamat0jp 1 object ActionList1: TActionList
134     Left = 312
135     Top = 232
136     object Action1: TAction
137     Category = 'Files'
138     Text = #26356#26032
139     OnExecute = Action1Execute
140     end
141     object Action3: TAction
142     Category = 'Files'
143     Text = #38283#12367
144     OnExecute = Action3Execute
145     end
146     object Action4: TAction
147     Category = 'play'
148     Text = 'Play'
149     OnExecute = Action4Execute
150     end
151     object Action5: TAction
152     Category = 'play'
153     Text = 'Back'
154     OnExecute = Action5Execute
155     end
156     object Action6: TAction
157     Category = 'play'
158     Text = 'Next'
159     OnExecute = Action6Execute
160     end
161     end
162     end
Back to OSDN">Back to OSDN
 ViewVC Help
Powered by ViewVC 1.1.26  
About OSDN
Find Software
Develop Software
Help