Sortie des éditions communautaires des EDI Embarcadero Delphi 12 et C++Builder 12

Expert éminent sénior

Le 09/08/2024 à 21:07

Tu sais que l'on peut télécharger un zip de tous le repo : https://github.com/graphics32/graphi...ads/master.zip, pas besoin d'aller le chercher ailleurs

ou plus simplement utilisé TortoiseGit pour gérer le repo.

Delphi n'a pas un plug-in Git Intégration de Git dans l'EDI qui lui aussi permet donc gérer un github en quelques clics

2

0

jptrol

Membre à l'essai

Le 05/08/2024 à 15:29

Envoyé par SergioMaster

Source de l'annonce

Embarcadero vient d'annoncer le lancement de Delphi 12 Community Edition et de C++Builder 12 Community, deux versions gratuites et complètes du célèbre IDE Delphi et de l'IDE phare C++Builder.

Les éditions communautaires gratuites et complètes de Delphi et C++Builder sont conçues pour vous aider à démarrer la programmation.

Notez que l'édition communautaire ne doit pas être utilisée comme essai prolongé, car les licences sont différentes.

Bonjour,

Je viens de passer de DELPHI 11 à DELPHI 12 comme l'impose le "contrat" de la CE . Je découvre en lisant cette présentation que la CE ne garantirait pas la compatibilité ascendante des projets
réalisés avec l'édition n - 1.
Je comptais poursuivre un développement à l'aide de GRAPHICS32 sur un projet qui fonctionnait très bien sous DELPHI 11 Alexandria et qui refuse de se compiler sous DELPHI 12 Athens (projet comprenant entre autres l'affichage des données GSHH représentant les traits de côtes du monde entier) . Je ne trouve nulle part la bonne méthode pour réintégrer le package GR32. Il est vrai que GRAPHICS32 étant une application tierce elle peut poser quelques problèmes mais Embarcadero en fait lui-même la publicité et on aurait pu penser qu'il se serait soucié de la compatibilité.
Quelqu'un a-t'il utilisé aussi GRAPHICS32 jusque là ?

0

der§en

Membre éprouvé

Le 05/08/2024 à 20:41

Bonjour, comment tu essais d’intégrer Graphics32 à Delphi 12 (en recompilant les sources) ?

Sinon, pour les nouveaux, vérifier bien si vous êtes dans les clous concernant les critères d’utilisations de la version CE car le service juridique d’idera (propriétaire d’Embarcadero) sera impitoyable

0

jptrol

Membre à l'essai

Le 07/08/2024 à 14:36

Envoyé par der§en

Bonjour, comment tu essais d’intégrer Graphics32 à Delphi 12 (en recompilant les sources) ?

Bonjour,

En fait dans un premier temps j'ai tenté de compiler le projet lui-même avec les sources telles qu'elles se compilaient sans problème avec Delphi 11 donc sans modifier aucune source :

Dans la fonction TGDIBackend.TextExtent de GR32_Backends_VCL suivante

Code :

Sélectionner tout

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
function TGDIBackend.TextExtent(const Text: String): TSize;
var
  DC: {$IFDEF BCB}Cardinal{$ELSE}HDC{$ENDIF};
  OldFont: HGDIOBJ;
begin
  UpdateFont;
  Result.cX := 0;
  Result.cY := 0;
  if Handle <> 0 then
    Windows.GetTextExtentPoint32(Handle, PChar(Text), Length(Text), Result)
  else
  begin
    StockBitmap.Canvas.Lock;
    try
      DC := StockBitmap.Canvas.Handle;
      OldFont := SelectObject(DC, Font.Handle);
      Windows.GetTextExtentPoint32(DC, PChar(Text), Length(Text), Result);
      SelectObject(DC, OldFont);
    finally
      StockBitmap.Canvas.Unlock;
    end;
  end;
end;

J'obtiens l'erreur E2003 : identificateur 'canvas' non défini ( et ceci 7 fois sur la totalité du source). StockBitmap est pourtant bien défini dans GR32.pas en tant que TBitmap (VCL.Graphics.TBitmap).
C'est évidemment fantaisiste.

Donc dans un deuxième temps j'essaie de réinstaller GRAPHICS32 suivant la procédure donnée sur le site :

Code :

Sélectionner tout

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Installation procedure for RAD Studio / Delphi:

    Unzip the files;
    Add the location of main installation directory to
    Tools | Environment Options | Library | Library Path for Delphi 7 and BCB 6 or
    Tools | Options | Environment Options | Delphi Options | Library - Win32 | Library Path for Delphi 2005 or higher

    Select File | Open... on the menu bar. Set Files of type to Delphi package source, locate and open one of the following design-time package that fit your IDE:

    GR32_DSGN_RSXE2 for Embarcadero RAD Studio XE2 / Delphi XE2,
    GR32_DSGN_RSXE1 for Embarcadero RAD Studio XE1 / Delphi XE1,
    GR32_DSGN_RS2010 for Embarcadero RAD Studio 2010 / Delphi 2010,
    GR32_DSGN_RS2009 for CodeGear RAD Studio 2009 / Delphi 2009,
    GR32_DSGN_RS2007 for CodeGear RAD Studio 2007 / Delphi 2007,
    GR32_DSGN_RS2006 for Borland Developer Studio 2006,
    GR32_DSGN_D2005 for Delphi 2005,
    GR32_DSGN_D7 for Delphi 7,
    GR32_DSGN_CB6 for C++ Builder 6

    A package editor window will appear. Click Compile, then click Install;
    If compiler asks whether you want to save changes, usually it is a good idea to choose No.

Le source le plus récent disponible sur le site de GRAPHICS 32 est GR32_DSGN_RSXE5.dpk . Si je le compile je retrouve exactement les mêmes 7 messages d'erreur que ci-dessus , à savoir 'canvas' non défini.

Il ne semble pas que l'application tierce GRAPHICS32 soit encore suivie. Ce ne serait pas par hasard que ça fonctionnait encore sous DELPHI 11 ?

0

ShaiLeTroll

Expert éminent sénior

Le 07/08/2024 à 15:41

Sinon, il n'y aurait pas des IFDEF lié quelque part lié à la version dans le code de GRAPHICS32

Il y en a déjà un sur BCB pour Boland C++ Builder
Ce genre de lib regorge de IF sur COMPILERVERSION et les VERXXX, comme VER360 pour Delphi 12
Souvent plus rien de ne fonctionne sans le bloc qui déclare D12 et donc les DxUP

https://github.com/graphics32/graphics32 existe il y a des mises à jour dessus, faudrait récupérer les sources
je vois par exemple https://github.com/graphics32/graphi...%20and%20later, pas difficile pour faire un package D12

Et pour l'erreur, on pourrait croire que TBitmap ne soit pas le Vcl.Graphics.TBitmap mais une autre classe en collision, il y a par exemple l'unité GR32.ImageFormats.TBitmap ou alors le tagBITMAP de Windows.pas, l'ordre des uses posant problème pour savoir si c'est Vcl.Graphics.TBitmap ou Winapi.Windows.TBitmap = Winapi.Windows.tagBITMAP

Dans GR32 et GR32_Backends_VCL, il est important que Winapi.Windows soit avant Vcl.Graphics, c'est le dernier ajouté dans les uses qui "gagne".
A vérifier que FRAMEWORK_VCL est bien défini aussi

0

jptrol

Membre à l'essai

Le 09/08/2024 à 19:22

Envoyé par ShaiLeTroll

Sinon, il n'y aurait pas des IFDEF lié quelque part lié à la version dans le code de GRAPHICS32

Il y en a déjà un sur BCB pour Boland C++ Builder
Ce genre de lib regorge de IF sur COMPILERVERSION et les VERXXX, comme VER360 pour Delphi 12
Souvent plus rien de ne fonctionne sans le bloc qui déclare D12 et donc les DxUP

https://github.com/graphics32/graphics32 existe il y a des mises à jour dessus, faudrait récupérer les sources
je vois par exemple https://github.com/graphics32/graphi...%20and%20later, pas difficile pour faire un package D12

Et pour l'erreur, on pourrait croire que TBitmap ne soit pas le Vcl.Graphics.TBitmap mais une autre classe en collision, il y a par exemple l'unité GR32.ImageFormats.TBitmap ou alors le tagBITMAP de Windows.pas, l'ordre des uses posant problème pour savoir si c'est Vcl.Graphics.TBitmap ou Winapi.Windows.TBitmap = Winapi.Windows.tagBITMAP

Dans GR32 et GR32_Backends_VCL, il est important que Winapi.Windows soit avant Vcl.Graphics, c'est le dernier ajouté dans les uses qui "gagne".
A vérifier que FRAMEWORK_VCL est bien défini aussi

Merci beaucoup . Je me trompais en effet d'adresse. En effet c'est maintenant à partir de GitHub qu'est maintenue l'application GRAPHICS32

De ce fait , pour être constructif voici la méthode pour faire fonctionner Delphi 12 Athens avec GRAPHICS32

Pour éviter toute confusion renommer l'ancien répertoire GRAPHICS32 pour pouvoir le remplacer
Se rendre à l'adresse https://github.com/graphics32/graphi.../master/Source et télécharger tous les *.pas (Clipper seulement si vous utilisez la librairie Clipper). Evidemment c'est fastidieux mais voir ci-dessous . Ces fichiers sources sont à enregistrer dans le nouveau répertoire GRAPHICS32
Créer un sous-répertoire Design et y charger tous les fichiers contenus ici : https://github.com/graphics32/graphi.../Source/Design
Remonter à GRAPHICS32 et créer un deuxième sous-répertoire Packages .
Dans le sous-répertoire Packages créer un nouveau sous-répertoire dont le nom est indifférent : j'ai choisi Update_D12_2024
Y installer les 5 fichiers à l'adresse : https://github.com/graphics32/graphi...%20and%20later

Pour le projet , en principe si GRAPHICS32 occupe la même place que l'ancien l'option de répertoire doit être la même. Pour moi , il a suffit de recompiler un premier projet pour que tout se passe bien.
Pour accélérer le téléchargement vous pouvez le prendre en zip sur le cloud ( vérifié par Norton security Ultra ) ici :
https://drive.google.com/file/d/16x4...ew?usp=sharing
L'arborescence y est respectée.

0

jptrol

Membre à l'essai

Le 09/08/2024 à 21:37

Envoyé par ShaiLeTroll

Tu sais que l'on peut télécharger un zip de tous le repo : https://github.com/graphics32/graphi...ads/master.zip, pas besoin d'aller le chercher ailleurs

ou plus simplement utilisé TortoiseGit pour gérer le repo.

Delphi n'a pas un plug-in Git Intégration de Git dans l'EDI qui lui aussi permet donc gérer un github en quelques clics

Ah merci. En effet. Encore mieux

0

Identifiez-vous

Créer un compte

Sortie des éditions communautaires des EDI Embarcadero Delphi 12 et C++Builder 12

Identifiant
Mot de passe

Mot de passe oublié ?