Discussion :

[jdudoret]

Bonjour,

J'ai à afficher des noms au format unicode : dans ce contexte, il est question d'utiliser deux directives de compilation. {$H+} et {$H-}.
Où place - t - on ces directives dans l'unit1 ayant déclaré

Code :

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

1
2
3
4
5
6
7
var russ : wideChar;
 
begin
...
    russ := '06'+ widechar(#1040) + '6' + widechar (#1045);
    richedit1.text := russ;
...

Merci pour les connaisseurs.
J.D

[Gilbert Geyer]

Bonjour,

Le hazard a voulu que je viennes juste d'utiliser cette directive. Je l'ai déclarée dans le Type comme suit:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
CONST
  MaxSize           = 500005;
  MaxStrLength      = 127;
 
TYPE
  {$H-}   // Afin que string soit interprété comme désignant ShortString.
  PStr              = ^String;
  StrArray          = ARRAY[0..MaxSize] OF Pointer;
  PStrArray         = ^StrArray;
  SortProc          = PROCEDURE(VAR A : StrArray; Lo, Hi : Integer; IgnoreCase : Boolean);

... et du coup toutes mes variables du Type PStr sont interprétées comme des ShortString (ici il s'agit d'une appli où j'ai adapté à Delphi du vieux code écrit en Pascal).

A+