Discussion :

[dibak]

Bonjour,
je ne suis pas un un très habitué de delphi, et je dois refaire un programme donc nettoyer un code déjà existant dans delphi/rad studio 11.
j'y ai trouvé le début de code suivant:

unit construire;
interface
{modeswitch externalclass}
uses
JS,
.........

Je souhaite comprendre la directive <<{modeswitch externalclass}>>, d'autant plus que le compilateur signale erreur sur cette ligne: 'E1030 invalid compiler directive'
Je voudrais donc savoir ce que veut dire cette directive. de prime abord j'ai pensé à un commentaire à cause de la présence des deux accolades, mais le compilateur me signale plutôt une erreur sur cette ligne.

Veuillez m'excuser si la question peut paraître ridicule, je travaille plus avec c++ builder qu'avec delphi.
Merci d'avance,
cordialement,
Dibak.

[free07]

Bonjour,

Vu que je ne connais pas cette directive de compilation, j'ai fait une recherche de 'MODESWITCH' dans les sources de Delphi ( 10.2 ) et il n'a retrouvé cette directive que dans les sources Indy ( C:\Program Files (x86)\Embarcadero\Studio\19.0\source\Indy10\System ) et cette directive est en commentaires :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
  {$IFDEF WINDOWS}
  // .NET and Delphi 2009+ support UNICODE strings natively!
  //
  // FreePascal 2.4.0+ supports UnicodeString, but does not map its native
  // String type to UnicodeString except when {$MODE DelphiUnicode} or
  // {$MODESWITCH UnicodeStrings} is enabled.  However, UNICODE is not
  // defined in that mode yet until FreePascal's RTL has been updated to
  // support UnicodeString.  STRING_UNICODE_MISMATCH is defined in
  // IdCompilerDefines.inc when the compiler's native String/Char types do
  // not map to the same types that API functions are expecting based on
  // whether UNICODE is defined or not.  So we will create special Platform
  // typedefs here to help with API function calls when dealing with that
  // mismatch...

Il y a d'ailleurs un $ avant 'ModeSwitch' et avec une recherche google, on ne la retrouve que pour le compilateur FreePascal. Est ce vraiment une directive qui a été utilisée avec des versions de Delphi ?

En espérant que cela puisse un peu t'aider...

[SergioMaster]

Comme Free07, pour moi {modeswitch externalclass} n'est pas une directive mais, un simple commentaire.

Le code tel que présenté, je l'ai mis dans une de mes unités, sans le $ aucun souci -> commentaire
avec bien évidemment


j'ai trouvé des références à la directive MODESWITCH pour FreePascal et encore je n'y vois pas EXTERNALCLASS
mais aucune dans Delphi

[popo]

La seul trace de {$MODESWITCH EXTERNALCLASS} que j'ai pu dénicher se trouve dans le Transpiler "Pas2js".

Ce dépôt GitHub:
https://github.com/Kryuski/pas2js-for-delphi

Et un Wiki qui en parle :
https://wiki.lazarus.freepascal.org/Pas2js_Transpiler

[dibak]

Salut,
merci bien pour vos indications.
pour l'instant je vais considérer cela comme un commentaire, d'autant plus que l'erreur que le compilateur signale sur cette ligne ne semble pas empêcher l’exécution du code.

cordialement,
Dibak.