Delphi 2005 vers Delphi 5 ...

Résolu
efouad
Messages postés
11
Date d'inscription
mardi 7 février 2006
Statut
Membre
Dernière intervention
26 novembre 2008
- 7 juin 2008 à 08:46
f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
- 7 juin 2008 à 15:29
Salut tous , Poutons convertir une application win 32 Delphi 2005 vers Delphi 5 ...

Merci ...

By FOUAD Mohammed ...

1 réponse

f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
38
7 juin 2008 à 15:29
Delphi 2005 : RTLVersion = 17.0 // Def VER170
Delphi 5 : RTLVersion = 13.0 // Def VER130

unit Unit1;

interface

{$IF RTLVersion >= 18.0}
  {$DEFINE DELPHICODE2} // TurboDelphi, Delphi 2006, 2007
{$ELSEIF RTLVersion >= 14.0}
  {$DEFINE DELPHICODE1} // Delphi 6, 7, 8, 2005
{$ELSEIF RTLVersion >= 10.0}
  {$DEFINE DELPHICODE0} // Delphi 3, 4, 5
{$IFEND}

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

{$IFDEF DELPHICODE2}
  const DelphiCode = 2;
{$ELSE}
{$IFDEF DELPHICODE1}
  const DelphiCode = 1;
{$ELSE}
  const DelphiCode = 0;
{$ENDIF}
{$ENDIF}

type
  TForm1 = class(TForm)
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.

<hr size="2" width="100%" />
3