picshow work with DelphiXE?

PICSHOW

     
 
Hi,
anyone made this work with DelphiXE?
http://www.delphiarea.com/products/delphi-components/picshow/

if yes,
could you please help me out?

thanks
0
daniel
10/10/2011 2:29:31 PM
 
embarcadero.delphi.tools  5366 articles. 3 followers. Follow

 3 Replies
 1164 Views

Similar Articles

[PageSpeed] 44
 
 
See related articles to this posting

 

 

 
daniel Legrand wrote:

> Hi,
> anyone made this work with DelphiXE?
> http://www.delphiarea.com/products/delphi-components/picshow/
> 
> if yes,
> could you please help me out?
> 
> thanks

Hi Daniel,

You must first update the DelphiArea.inc file with references to Delphi
2010, XE and XE2 (the amended version should look more or less as
below). You must then use the Component/Install Component menu to add
the PicShow component. When asked for a 'Unit file name' choose the
'PSReg.pas' file and select the 'Install into a new package' option
then click next. Choose a package name (e.g. 'DelphiArea') and
description (e.g. 'DelphiArea components') and click finish. When asked
to select a framework choose 'Visual Component Library'. You should
then see the components installed into the component palette.

Cheers,
KB. 
 

_________________________________________________________________ 

{ Compiler Settings }

{$B-} // Complete Boolean Evaluation Off
{$R-} // Range Checking Off
{$Q-} // Overflow Checking Off
{$V-} // Var String Checking Off
{$T-} // Typed @ operator Off
{$X+} // Extended Syntax On
{$P+} // Open String Params On
{$O+} // Optimization On
{$IFDEF WIN32}
{$H+} // Use long strings by default
{$ENDIF}

{ Assume the latest version of compiler is available }



{$DEFINE COMPILERXE2_UP}
{$DEFINE COMPILERXE_UP}
{$DEFINE COMPILER2010_UP}
{$DEFINE COMPILER2009_UP}
{$DEFINE COMPILER2007_UP}
{$DEFINE COMPILER2006_UP}
{$DEFINE COMPILER2005_UP}
{$DEFINE COMPILER7_UP}
{$DEFINE COMPILER6_UP}
{$DEFINE COMPILER5_UP}
{$DEFINE COMPILER4_UP}

{ Then detect if it is older (.NET versions are ignored) }

{$IFDEF VER230}           // Delphi XE2
{$ENDIF}

{$IFDEF VER220}           // Delphi XE
  {$UNDEF COMPILERXE2_UP}
{$ENDIF}

{$IFDEF VER210}           // Delphi 2010
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
{$ENDIF}


{$IFDEF VER200}           // Delphi 2009
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
{$ENDIF}

{$IFDEF VER185}           // Delphi 2007
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
{$ENDIF}

{$IFDEF VER180}           // Delphi 2006
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
{$ENDIF}

{$IFDEF VER170}           // Delphi 2005
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
{$ENDIF}

{$IFDEF VER150}           // Delphi 7
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
{$ENDIF}

{$IFDEF VER140}           // Delphi 6 & C++Builder 6
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
{$ENDIF}

{$IFDEF VER130}           // Delphi 5 & C++Builder 5
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
{$ENDIF}

{$IFDEF VER130}           // Delphi 5 & C++Builder 5
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
{$ENDIF}

{$IFDEF VER125}          // C++Builder 4
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
{$ENDIF}

{$IFDEF VER120}          // Delphi 4
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
{$ENDIF}

{$IFDEF VER110}          // C++Builder 3
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
  {$UNDEF COMPILER4_UP}
{$ENDIF}

{$IFDEF VER100}          // Delphi 3
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
  {$UNDEF COMPILER4_UP}
{$ENDIF}

{$IFDEF VER93}          // C++Builder 1
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
  {$UNDEF COMPILER4_UP}
{$ENDIF}

{$IFDEF VER90}          // Delphi 2
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
  {$UNDEF COMPILER4_UP}
{$ENDIF}

{$IFDEF VER80}          // Delphi 1
  {$UNDEF COMPILERXE2_UP}
  {$UNDEF COMPILERXE_UP}
  {$UNDEF COMPILER2010_UP}
  {$UNDEF COMPILER2009_UP}
  {$UNDEF COMPILER2007_UP}
  {$UNDEF COMPILER2006_UP}
  {$UNDEF COMPILER2005_UP}
  {$UNDEF COMPILER7_UP}
  {$UNDEF COMPILER6_UP}
  {$UNDEF COMPILER5_UP}
  {$UNDEF COMPILER4_UP}
{$ENDIF}
0
Kim
10/11/2011 1:47:12 AM
 
> anyone made this work with DelphiXE?
> http://www.delphiarea.com/products/delphi-components/picshow/
>

I did the following:

Add to the DELPHIAREA.INC

{$DEFINE COMPILERXE2_UP}
{$DEFINE COMPILERXE_UP}
{$DEFINE COMPILER2010_UP}
....
{$IFDEF VER230}  //Delphi XE2
{$ENDIF}

{$IFDEF VER220} //Delphi XE
{$ENDIF}

{$IFDEF VER210}  //Delphi 2010
{$ENDIF}

Manually change all the uses clauses in:

PicShow.pas


uses

WinAPI.Windows, WinAPI.Messages, System.SysUtils, System.Classes, 
VCL.Graphics, VCL.Controls, VCL.Forms,VCL.Dialogs, VCL.Menus, Data.DB, 
VCL.DBCtrls, PSEffect;
....

implementation

uses

{$IFDEF GRAPHICEX} GraphicEx, {$ENDIF}{$IFDEF COMPILER6_UP} System.Types, 
{$ENDIF}{$IFDEF COMPILER2009_UP} Vcl.Imaging.PngImage, 
{$ENDIF}Vcl.Imaging.JPEG, WinAPI.MMSystem;

PSEffect.pas

uses

WinAPI.Windows, System.SysUtils, System.Classes, VCL.Graphics;

....

implementation

uses

{$IFDEF COMPILER6_UP} System.Types, {$ENDIF} System.Math;



PSReg.pas

uses

WinAPI.Windows, System.Classes,



To install it I had to add all three units to a new package and add a 
reference DesignIDE.dcp to  the required section.
I'll probably strip out all the older compilers code and definitions they 
just make thinks a little bit confusing.
0
Gilbert
10/11/2011 2:18:50 AM
 
> {quote:title=Kim Bracknell wrote:}{quote}
> daniel Legrand wrote:
> 
> > Hi,
> > anyone made this work with DelphiXE?
> > http://www.delphiarea.com/products/delphi-components/picshow/
> > 
> > if yes,
> > could you please help me out?
> > 
> > thanks
> 
> Hi Daniel,
> 
> You must first update the DelphiArea.inc file with references to Delphi
> 2010, XE and XE2 (the amended version should look more or less as
> below). You must then use the Component/Install Component menu to add
> the PicShow component. When asked for a 'Unit file name' choose the
> 'PSReg.pas' file and select the 'Install into a new package' option
> then click next. Choose a package name (e.g. 'DelphiArea') and
> description (e.g. 'DelphiArea components') and click finish. When asked
> to select a framework choose 'Visual Component Library'. You should
> then see the components installed into the component palette.
> 
> Cheers,
> KB. 
>  
> 
> _________________________________________________________________ 
> 
> { Compiler Settings }
> 
> {$B-} // Complete Boolean Evaluation Off
> {$R-} // Range Checking Off
> {$Q-} // Overflow Checking Off
> {$V-} // Var String Checking Off
> {$T-} // Typed @ operator Off
> {$X+} // Extended Syntax On
> {$P+} // Open String Params On
> {$O+} // Optimization On
> {$IFDEF WIN32}
> {$H+} // Use long strings by default
> {$ENDIF}
> 
> { Assume the latest version of compiler is available }
> 
> 
> 
> {$DEFINE COMPILERXE2_UP}
> {$DEFINE COMPILERXE_UP}
> {$DEFINE COMPILER2010_UP}
> {$DEFINE COMPILER2009_UP}
> {$DEFINE COMPILER2007_UP}
> {$DEFINE COMPILER2006_UP}
> {$DEFINE COMPILER2005_UP}
> {$DEFINE COMPILER7_UP}
> {$DEFINE COMPILER6_UP}
> {$DEFINE COMPILER5_UP}
> {$DEFINE COMPILER4_UP}
> 
> { Then detect if it is older (.NET versions are ignored) }
> 
> {$IFDEF VER230}           // Delphi XE2
> {$ENDIF}
> 
> {$IFDEF VER220}           // Delphi XE
>   {$UNDEF COMPILERXE2_UP}
> {$ENDIF}
> 
> {$IFDEF VER210}           // Delphi 2010
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
> {$ENDIF}
> 
> 
> {$IFDEF VER200}           // Delphi 2009
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
> {$ENDIF}
> 
> {$IFDEF VER185}           // Delphi 2007
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
> {$ENDIF}
> 
> {$IFDEF VER180}           // Delphi 2006
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
> {$ENDIF}
> 
> {$IFDEF VER170}           // Delphi 2005
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
> {$ENDIF}
> 
> {$IFDEF VER150}           // Delphi 7
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
> {$ENDIF}
> 
> {$IFDEF VER140}           // Delphi 6 & C++Builder 6
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
> {$ENDIF}
> 
> {$IFDEF VER130}           // Delphi 5 & C++Builder 5
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
> {$ENDIF}
> 
> {$IFDEF VER130}           // Delphi 5 & C++Builder 5
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
> {$ENDIF}
> 
> {$IFDEF VER125}          // C++Builder 4
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
> {$ENDIF}
> 
> {$IFDEF VER120}          // Delphi 4
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
> {$ENDIF}
> 
> {$IFDEF VER110}          // C++Builder 3
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
>   {$UNDEF COMPILER4_UP}
> {$ENDIF}
> 
> {$IFDEF VER100}          // Delphi 3
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
>   {$UNDEF COMPILER4_UP}
> {$ENDIF}
> 
> {$IFDEF VER93}          // C++Builder 1
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
>   {$UNDEF COMPILER4_UP}
> {$ENDIF}
> 
> {$IFDEF VER90}          // Delphi 2
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
>   {$UNDEF COMPILER4_UP}
> {$ENDIF}
> 
> {$IFDEF VER80}          // Delphi 1
>   {$UNDEF COMPILERXE2_UP}
>   {$UNDEF COMPILERXE_UP}
>   {$UNDEF COMPILER2010_UP}
>   {$UNDEF COMPILER2009_UP}
>   {$UNDEF COMPILER2007_UP}
>   {$UNDEF COMPILER2006_UP}
>   {$UNDEF COMPILER2005_UP}
>   {$UNDEF COMPILER7_UP}
>   {$UNDEF COMPILER6_UP}
>   {$UNDEF COMPILER5_UP}
>   {$UNDEF COMPILER4_UP}
> {$ENDIF}

Hi Kim,
Thanks a lot :)
it works like charm.
posted @ 2020-07-09 15:52  老榕树  阅读(268)  评论(0)  编辑  收藏  举报