Changeset 285 for CoolAudio/Systems/UAudioSystemWindows.pas

Timestamp:

Oct 11, 2011, 8:50:37 AM (13 years ago)

Author:

george

Message:

 

File:

• CoolAudio/Systems/UAudioSystemWindows.pas (modified) (2 diffs)

CoolAudio/Systems/UAudioSystemWindows.pas

@@ -220 +220 @@
 var
   Parm: TMCI_Open_Parms;
+  ParmFileName: string;
 begin
   if FDeviceId <> 0 then DoClose;
@@ -226 +227 @@
   Parm.dwCallback := 0;
   Parm.lpstrDeviceType := DeviceName[FDeviceType];
-  Parm.lpstrElementName := PChar(UTF8Decode(FFileName));
+  ParmFileName := UTF8Decode(FFileName);
+  Parm.lpstrElementName := PChar(ParmFileName);
 
   FFlags := 0;