You've already forked lazarus-ccr
tvplanit: Fix wavdlg to play the selected sound file.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4739 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -36,7 +36,7 @@ object FrmSoundDialog: TFrmSoundDialog
|
||||
BevelOuter = bvNone
|
||||
ClientHeight = 446
|
||||
ClientWidth = 275
|
||||
TabOrder = 0
|
||||
TabOrder = 2
|
||||
object Panel1: TPanel
|
||||
Left = 0
|
||||
Height = 34
|
||||
@ -66,7 +66,7 @@ object FrmSoundDialog: TFrmSoundDialog
|
||||
BevelOuter = bvNone
|
||||
ClientHeight = 38
|
||||
ClientWidth = 275
|
||||
TabOrder = 1
|
||||
TabOrder = 2
|
||||
object PlayButton: TSpeedButton
|
||||
Left = 8
|
||||
Height = 25
|
||||
@ -126,7 +126,7 @@ object FrmSoundDialog: TFrmSoundDialog
|
||||
ItemHeight = 0
|
||||
Mask = '*.wav'
|
||||
OnChange = FileListBox1Change
|
||||
TabOrder = 2
|
||||
TabOrder = 1
|
||||
end
|
||||
end
|
||||
object Splitter1: TSplitter
|
||||
@ -147,7 +147,8 @@ object FrmSoundDialog: TFrmSoundDialog
|
||||
BorderSpacing.Top = 4
|
||||
BorderSpacing.Bottom = 4
|
||||
FileSortType = fstNone
|
||||
TabOrder = 2
|
||||
TabOrder = 0
|
||||
OnChange = ShellTreeViewChange
|
||||
ObjectTypes = [otFolders]
|
||||
end
|
||||
end
|
||||
|
Reference in New Issue
Block a user