govcl
/
samples
/
mp3Player
/
Form1Impl.go

// 在这里写你的事件

package main

import (
	"fmt"
	"os"
	"path/filepath"
	"runtime"
	"strings"

	"github.com/ying32/govcl/vcl/rtl/version"

	"github.com/ying32/govcl/vcl/rtl"

	"github.com/ying32/govcl/vcl/types"

	"github.com/ying32/govcl/pkgs/bass"
	"github.com/ying32/govcl/vcl"
)

//::private::
type TForm1Fields struct {
	bassPlayer *bass.TBass
	playCtl    *TPlayControl
	progress   *TImageTrackBar
	volbar     *TImageTrackBar

	// 仅windows
	taskbar1         *vcl.TTaskbar
	isSupportTaskbar bool
	thumbPreviewBmp  *vcl.TBitmap
}

func (f *TForm1) OnFormCreate(sender vcl.IObject) {
	f.SetDoubleBuffered(true)
	f.EnabledMaximize(false)
	//f.SetColor(0x39302c)

	f.playCtl = NewPlayControl(f)
	f.playCtl.SetParent(f.Panel2)
	f.playCtl.SetAlign(types.AlClient)
	f.playCtl.OnSelect = f.OnPlayListSelect
	f.playCtl.SingerPic = vcl.AsBitmap(f.ImgSinger.Picture().Graphic())

	f.progress = NewImageTrackBar(f)
	f.progress.SetParent(f)
	f.progress.SetImages(f.ImgThumb, f.ImgBk, f.ImgFore)
	f.progress.SetLeft(58)
	f.progress.SetTop(288)
	f.progress.SetWidth(200)
	f.progress.SetPosition(0)

	f.volbar = NewImageTrackBar(f)
	f.volbar.SetParent(f)
	f.volbar.SetImages(f.ImgThumb, f.ImgBk, f.ImgFore)
	f.volbar.SetLeft(82)
	f.volbar.SetTop(318)
	f.volbar.SetWidth(80)
	f.volbar.SetPosition(60)
	f.volbar.OnTrackChange = f.OnVolChange

	f.isSupportTaskbar = runtime.GOOS == "windows" && version.OSVersion.CheckMajorMinor(6, 1) && !rtl.LcLLoaded()
	if f.isSupportTaskbar {
		f.thumbPreviewBmp = vcl.NewBitmap()
		f.thumbPreviewBmp.SetPixelFormat(types.Pf32bit)
		f.thumbPreviewBmp.SetSize(f.ImgSinger.Width(), f.ImgSinger.Height())

		f.thumbPreviewBmp.Assign(f.ImgSinger.Picture().Graphic())
		f.taskbar1 = vcl.NewTaskbar(f)
		f.taskbar1.SetOnThumbPreviewRequest(f.onTaskbar1ThumbPreviewRequest)
		f.taskbar1.SetOnThumbButtonClick(f.onTaskbar1ThumbButtonClick)
		f.taskbar1.SetTabProperties(types.NewSet(types.CustomizedPreview))

		f.taskbar1.TaskBarButtons().BeginUpdate()
		// buttons
		tbtn := f.taskbar1.TaskBarButtons().Add()
		tbtn.SetHint("上一曲")
		f.ImageList1.GetIcon(0, tbtn.Icon())

		tbtn = f.taskbar1.TaskBarButtons().Add()
		tbtn.SetHint("播放")
		f.ImageList1.GetIcon(1, tbtn.Icon())

		tbtn = f.taskbar1.TaskBarButtons().Add()
		tbtn.SetButtonState(tbtn.ButtonState().Include(types.TbsHidden))
		tbtn.SetHint("暂停")
		f.ImageList1.GetIcon(2, tbtn.Icon())

		tbtn = f.taskbar1.TaskBarButtons().Add()
		tbtn.SetHint("下一曲")
		f.ImageList1.GetIcon(3, tbtn.Icon())

		f.taskbar1.TaskBarButtons().EndUpdate()

	}

	f.bassPlayer = bass.NewBass()
	// 我的测试
	switch runtime.GOOS {
	case "windows":
		f.addFoler("F:\\KuGou")
	case "darwin":
		usrHome := os.Getenv("HOME")
		f.addFoler(usrHome + "/Music/网易云音乐")
		f.addFoler(usrHome + "/Music/iTunes/iTunes Media/Music")
	case "linux":
		f.addFoler("/home/ying32/音乐")
	}
}

func (f *TForm1) onTaskbar1ThumbPreviewRequest(sender vcl.IObject, aPreviewHeight, aPreviewWidth int32, previewBitmap *vcl.TBitmap) {
	//fmt.Println("OnTaskbar1ThumbPreviewRequest")
	previewBitmap.Assign(f.thumbPreviewBmp)
}

func (f *TForm1) onTaskbar1ThumbButtonClick(sender vcl.IObject, aButtonID int32) {

	switch aButtonID {
	case 0:
		f.BtnPrev.Click()
	case 1:
		f.BtnPlay.Click()
	case 2:
		f.BtnPause.Click()
	case 3:
		f.BtnNext.Click()
	}
}

func (f *TForm1) setTaskbarHint(str string) {
	if f.isSupportTaskbar {
		f.taskbar1.SetToolTip(str)
	}
}

func (f *TForm1) setTasbarButtonState(aPlayVisible, aPauseVisible bool) {

	if f.isSupportTaskbar {

		// 更新完后再提交，不然就会出现闪烁
		f.taskbar1.TaskBarButtons().BeginUpdate()
		defer f.taskbar1.TaskBarButtons().EndUpdate()

		var state types.TThumbButtonStates
		// play
		tbtn := f.taskbar1.TaskBarButtons().Items(1)
		state = tbtn.ButtonState()
		if aPlayVisible {
			state = state.Exclude(types.TbsHidden)
		} else {
			state = state.Include(types.TbsHidden)
		}
		tbtn.SetButtonState(state)

		// pause
		tbtn = f.taskbar1.TaskBarButtons().Items(2)
		state = tbtn.ButtonState()
		if aPauseVisible {
			state = state.Exclude(types.TbsHidden)
		} else {
			state = state.Include(types.TbsHidden)
		}
		tbtn.SetButtonState(state)
	}
}

func (f *TForm1) OnFormDestroy(sender vcl.IObject) {
	if f.isSupportTaskbar {
		f.thumbPreviewBmp.Free()
	}
	f.bassPlayer.Close()
	bass.BassFree()
}

func (f *TForm1) OnMIAddFileClick(sender vcl.IObject) {
	if f.OpenDialog1.Execute() {
		f.addFile(f.OpenDialog1.FileName())
	}
}

func (f *TForm1) OnMIAddFolderClick(sender vcl.IObject) {
	if ok, str := vcl.SelectDirectory2("选择目录", "", types.NewSet(types.SdNewUI, types.SdShowEdit), nil); ok {
		f.addFoler(str)
	}
}

func (f *TForm1) addFile(fileName string) {
	name := filepath.Base(fileName)
	if len(name) < 5 {
		return
	}
	nameArr := strings.Split(name[:len(name)-4], "-")
	if len(nameArr) >= 2 {
		lenVal := int32(bass.GetFileLength(fileName))
		f.playCtl.Add(TPlayListItem{strings.TrimSpace(nameArr[1]), strings.TrimSpace(nameArr[0]), lenVal, "", fileName})
	}
}

func (f *TForm1) addFoler(rootPath string) {
	defer func() {
		if err := recover(); err != nil {
			fmt.Println("addFoler: ", err)
		}
	}()
	_, err := os.Stat(rootPath)
	if os.IsNotExist(err) {
		return
	}
	filepath.Walk(rootPath, func(path string, info os.FileInfo, err error) error {
		ext := filepath.Ext(info.Name())
		if ext == ".mp3" || ext == ".m4a" {
			f.addFile(path)
		}
		return nil
	})
}

func (f *TForm1) OnPlayListSelect(sender vcl.IObject, item TPlayListItem) {
	f.stopPlay()
	f.bassPlayer.Close()
	f.bassPlayer.OpenFile(item.FileName)
	f.bassPlayer.SetVolume(f.volbar.Position())
	f.play()
	str := item.Caption + " - " + item.Singer
	f.SetCaption(str)
	f.setTaskbarHint(str)
}

func (f *TForm1) OnBtnPlayClick(sender vcl.IObject) {
	f.play()
}

func (f *TForm1) OnTimer1Timer(sender vcl.IObject) {
	if f.bassPlayer.IsValid() && f.bassPlayer.State == bass.PsPlaying {

		f.LblTime.SetCaption(f.bassPlayer.TimeStrLabel())
		pos, _ := f.bassPlayer.GetPosition()
		mLen, _ := f.bassPlayer.GetLength()

		if pos >= mLen {
			if f.playCtl.CanNext() {
				f.playCtl.Next()
			} else {
				f.stopPlay()
				f.playCtl.Stop()
			}
		}

		f.progress.SetPosition(int(float32(pos) / float32(mLen) * 100))

		caption := []rune(f.Caption())
		if len(caption) > 0 {
			temp := caption
			c := temp[:1]
			temp = temp[1:]
			f.SetCaption(string(temp) + string(c))
		}
	}
}

func (f *TForm1) OnVolChange(sender vcl.IObject) {
	f.bassPlayer.SetVolume(f.volbar.Position())
}

func (f *TForm1) OnBtnPauseClick(sender vcl.IObject) {
	f.pause()
}

func (f *TForm1) OnBtnMinClick(sender vcl.IObject) {
	vcl.Application.Minimize()
}

func (f *TForm1) OnBtnCloseClick(sender vcl.IObject) {
	vcl.Application.Terminate()
}

func (f *TForm1) stopPlay() {
	f.Timer1.SetEnabled(false)

	f.bassPlayer.Stop()

	f.bassPlayer.SetPosition(0)
	f.progress.SetPosition(0)

	f.BtnPause.Hide()
	f.BtnPlay.Show()

	f.setTasbarButtonState(true, false)

	f.SetCaption("Mp3Player")
}

func (f *TForm1) play() {
	f.bassPlayer.Play(false)

	f.BtnPlay.Hide()
	f.BtnPause.Show()
	f.Timer1.SetEnabled(true)

	f.setTasbarButtonState(false, true)
}

func (f *TForm1) pause() {
	f.bassPlayer.Pause()
	f.BtnPause.Hide()
	f.BtnPlay.Show()
	f.Timer1.SetEnabled(false)

	f.setTasbarButtonState(true, false)
}

func (f *TForm1) OnPanel1MouseDown(sender vcl.IObject, button types.TMouseButton, shift types.TShiftState, x, y int32) {
	if button == types.MbLeft {
		//f.Perform(messages.WM_SYSCOMMAND, message)
	}
}

func (f *TForm1) OnBtnPrevClick(sender vcl.IObject) {
	f.playCtl.Prev()
}

func (f *TForm1) OnBtnNextClick(sender vcl.IObject) {
	f.playCtl.Next()
}