diff options
| author | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-10-27 06:31:04 +0000 |
|---|---|---|
| committer | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-10-27 06:31:04 +0000 |
| commit | 8cca9e3e6f591c35d35d132a9d3f93ffc7cdfee8 (patch) | |
| tree | 985dac320ed9d8456a682c952c1b0ab0f502859b /Game/Code/Screens/UScreenSong.pas | |
| parent | 64f2c9b369185575d397dccbbcacc7f818874952 (diff) | |
| download | usdx-8cca9e3e6f591c35d35d132a9d3f93ffc7cdfee8.tar.gz usdx-8cca9e3e6f591c35d35d132a9d3f93ffc7cdfee8.tar.xz usdx-8cca9e3e6f591c35d35d132a9d3f93ffc7cdfee8.zip | |
made some major progress with ffmpeg audio playback !!!
YAY !!!
still a little choppy, so I suspect incorrect buffer sizes or something like that.
also made some mods to support Unicode song file iteration on windows,
this is no worse than what we had before, but is not complete..
oh this code only supports win 2000 and up ..
no Win 98...
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@533 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
| -rw-r--r-- | Game/Code/Screens/UScreenSong.pas | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/Game/Code/Screens/UScreenSong.pas b/Game/Code/Screens/UScreenSong.pas index ea1dd8a5..4d146283 100644 --- a/Game/Code/Screens/UScreenSong.pas +++ b/Game/Code/Screens/UScreenSong.pas @@ -261,7 +261,9 @@ begin begin For I := 1 to high(CatSongs.Song) do begin - if (CatSongs.Song[(I + Interaction) mod I2].Visible) AND (Length(CatSongs.Song[(I + Interaction) mod I2].Title)>0) AND (UpCase(CatSongs.Song[(I + Interaction) mod I2].Title[1]) = Letter) then + if (CatSongs.Song[(I + Interaction) mod I2].Visible) AND + (Length(CatSongs.Song[(I + Interaction) mod I2].Title)>0) AND + (widechar(UpperCase(CatSongs.Song[(I + Interaction) mod I2].Title)[1]) = widechar(Letter)) then begin SkipTo(CatSongs.VisibleIndex((I + Interaction) mod I2)); @@ -280,7 +282,9 @@ begin begin For I := 1 to high(CatSongs.Song) do begin - if (CatSongs.Song[(I + Interaction) mod I2].Visible) AND (Length(CatSongs.Song[(I + Interaction) mod I2].Artist)>0) AND (UpCase(CatSongs.Song[(I + Interaction) mod I2].Artist[1]) = Letter) then + if (CatSongs.Song[(I + Interaction) mod I2].Visible) AND + (Length(CatSongs.Song[(I + Interaction) mod I2].Artist)>0) AND + (widechar(uppercase(CatSongs.Song[(I + Interaction) mod I2].Artist)[1]) = widechar(Letter)) then begin SkipTo(CatSongs.VisibleIndex((I + Interaction) mod I2)); |