tiodor / dspack

Automatically exported from code.google.com/p/dspack
0 stars 0 forks source link

Delphi XE4 compatibility #15

Open GoogleCodeExporter opened 8 years ago

GoogleCodeExporter commented 8 years ago
I've compiled successfully on XE4. My Package:
http://www.herrotto.de/delphi/xe4/dspack_2.3.4-r10.zip

Please integrate this into the official repository.

Regards,
Tim

Original issue reported on code.google.com by herrotto...@gmail.com on 15 Jun 2013 at 10:13

GoogleCodeExporter commented 8 years ago
Nice

Original comment by gmele...@gmail.com on 23 Jul 2013 at 2:04

GoogleCodeExporter commented 8 years ago
Hi.

Compile and Install perfectly.

When I try to compile a sample application (D6-D7 SampleGrabber), I get 3 
errors...

[dcc32 Error] DSPack.pas(1854): E2033 Types of actual and formal var parameters 
must be identical

[dcc32 Error] DSPack.pas(1859): E2033 Types of actual and formal var parameters 
must be identical

[dcc32 Error] DSPack.pas(2860): E2066 Missing operator or semicolon

Original comment by axeldeli...@gmail.com on 6 Nov 2013 at 2:11

Attachments:

GoogleCodeExporter commented 8 years ago
Hi,When I Try the videocap of the demos,the  Video and audio out of sync

Original comment by kevin120...@gmail.com on 6 Nov 2013 at 7:01

GoogleCodeExporter commented 8 years ago
Thank you very much, this package works fine in XE6 :)

Original comment by DelphiMa...@gmail.com on 11 Aug 2014 at 8:48

GoogleCodeExporter commented 8 years ago
For XE4-XE7 use this path and xe2 pack.
Index: DSPack.pas
===================================================================
--- DSPack.pas  (revision 10)
+++ DSPack.pas  (working copy)
@@ -1840,8 +1840,14 @@
   end;

   procedure TFilterGraph.HandleEvents;
-  var hr: HRESULT;
-      Event, Param1, Param2: Integer;
+  var
+    hr: HRESULT;
+    Event: Integer;
+    {$IF CompilerVersion >= 24.0}
+    Param1, Param2: NativeInt;
+    {$ELSE}
+    Param1, Param2: Integer;
+    {$IFEND}
   begin
     if assigned(FMediaEventEx) then
     begin

Original comment by XVla...@gmail.com on 16 Oct 2014 at 4:43

GoogleCodeExporter commented 8 years ago
how to install this pack on XE7?

Original comment by jlcnate.zit on 22 Dec 2014 at 6:22

GoogleCodeExporter commented 8 years ago
DSPack.pas
@@ -1840,8 +1840,14 @@
  var
    hr: HRESULT;
    Event: Integer;
    {$IF CompilerVersion >= 24.0}
    Param1, Param2: NativeInt;
    {$ELSE}
    Param1, Param2: Integer;
    {$IFEND}
//  var hr: HRESULT;
//      Event, Param1, Param2: Integer;

it should be compile-able now

and when u need to use DSPack, change it back like this

//  var
//    hr: HRESULT;
//    Event: Integer;
//    {$IF CompilerVersion >= 24.0}
//    Param1, Param2: NativeInt;
//    {$ELSE}
//    Param1, Param2: Integer;
//    {$IFEND}
  var hr: HRESULT;
      Event, Param1, Param2: Integer;

GL, HF 

Original comment by 1qaz5...@gmail.com on 24 Dec 2014 at 8:36

GoogleCodeExporter commented 8 years ago
Thank you.

Original comment by thyagool...@gmail.com on 3 Feb 2015 at 1:56