Here is a workaround for those who want both Delphi 2009 and Delphi 2010 installed and working.
I'm using Delphi 2009 .NET, but Delphi 2010 doesn't have .NET.
They offer Prism for .NET.
Simple solution is using Delphi 2009 or Delphi 2010 with Prism and thus installing Visual Studio 2008,
but why make it simple
I installed Delphi 2009 .NET and then installed Delphi 2010.
Then i used Delphi Distiller to clean license for Delphi 2009 and that worked just fine,
but Delphi 2010 did not start so i used Delphi Distiller to also clean license for Delphi 2010 and
that work just fine, but now Delphi 2009 wouldn't start.
Delphi 2009 and Delphi 2010 seems to use the same license files in:
C:\Users\All Users\Embarcadero\.cgb_license
C:\Users\All Users\Embarcadero\reg_eqx.txt
C:\Users\All Users\Embarcadero\.licenses\.cg_license
Delphi Distiller outputs different license files, but same filenames for Delphi 2009 and Delphi 2010 thus
overwriting the license files making them not work together.
So instead of using Delphi Distiller everytime you run Delphi 2009 or Delphi 2010:
Clean license in Delphi Distiller for Delphi 2009.
Backup these files:
C:\Users\All Users\Embarcadero\.cgb_license
C:\Users\All Users\Embarcadero\reg_eqx.txt
C:\Users\All Users\Embarcadero\.licenses\.cg_license
Clean license in Delphi Distiller for Delphi 2010.
Backup these files:
C:\Users\All Users\Embarcadero\.cgb_license
C:\Users\All Users\Embarcadero\reg_eqx.txt
C:\Users\All Users\Embarcadero\.licenses\.cg_license
Then write a small app. in Delphi like this:
///////////////////////// Code snippet
program runDelphi2009;
{$APPTYPE CONSOLE}
uses
Windows, ShellAPI, SysUtils;
begin
try
// Backupfiles for Delphi2009 from Delphi Distiller did i copy to: C:\Program Files\CodeGear\RAD Studio\6.0\License\
CopyFile(PChar('C:\Program Files\CodeGear\RAD Studio\6.0\License\.cgb_license'), PChar('C:\Users\All Users\Embarcadero\.cgb_license'), False);
CopyFile(PChar('C:\Program Files\CodeGear\RAD Studio\6.0\License\reg_eqx.txt'), PChar('C:\Users\All Users\Embarcadero\reg_eqx.txt'), False);
CopyFile(PChar('C:\Program Files\CodeGear\RAD Studio\6.0\License\.licenses\.cg_license'), PChar('C:\Users\All Users\Embarcadero\.licenses\.cg_license'), False);
ShellExecute(STD_OUTPUT_HANDLE, 'open', 'C:\Program Files\CodeGear\RAD Studio\6.0\bin\bds.exe', nil, nil, SW_SHOWNORMAL)
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.
///////////////////////// Code snippet
program runDelphi2010;
{$APPTYPE CONSOLE}
uses
Windows, ShellAPI, SysUtils;
begin
try
// Backupfiles for Delphi2010 from Delphi Distiller did i copy to: C:\Program Files\Embarcadero\RAD Studio\7.0\License\
CopyFile(PChar('C:\Program Files\Embarcadero\RAD Studio\7.0\License\.cgb_license'), PChar('C:\Users\All Users\Embarcadero\.cgb_license'), False);
CopyFile(PChar('C:\Program Files\Embarcadero\RAD Studio\7.0\License\reg_eqx.txt'), PChar('C:\Users\All Users\Embarcadero\reg_eqx.txt'), False);
CopyFile(PChar('C:\Program Files\Embarcadero\RAD Studio\7.0\License\.licenses\.cg_license'), PChar('C:\Users\All Users\Embarcadero\.licenses\.cg_license'), False);
ShellExecute(STD_OUTPUT_HANDLE, 'open', 'C:\Program Files\Embarcadero\RAD Studio\7.0\bin\bds.exe', nil, nil, SW_SHOWNORMAL)
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.
/////////////////////////
Make a shortcut in your desktop or whatever and run these apps. when you want to run Delphi 2009 or Delphi 2010.
