Rave reports et langue arabe

Version imprimable

06/01/2008, 11h42
med_2007

Rave reports et langue arabe

J'utilise Delphi 2005 et rave reports pour la réalisation d'un logiciel en arabe.
Dans l'environnement de Rave reports, la prévisualisation de l'état qui contient du text en arabe est normale (de droite à gauche).
Mais, l'exécution de l'état depuis delphi 2005 fait apparaitre les caractères arabes anormalement, de gauche à droite, (normalement de droite à gauche).
SVP je vous une réponse le plutôt possible ?
12/07/2008, 13h09
alpatchikho

il faut rendre le suport du windows en arbe c-à-d (panneau de cofiguration puis option regional puis choisir langue arabe puis option avancée choir langue arabe ) une fenetre de dialogue s'affiche vous demande de redemarer le micro le micro redemare et assayer votre application.
16/07/2008, 14h21
gtahar

Citation:

Envoyé par med_2007

J'utilise Delphi 2005 et rave reports pour la réalisation d'un logiciel en arabe.
Dans l'environnement de Rave reports, la prévisualisation de l'état qui contient du text en arabe est normale (de droite à gauche).
Mais, l'exécution de l'état depuis delphi 2005 fait apparaitre les caractères arabes anormalement, de gauche à droite, (normalement de droite à gauche).
SVP je vous une réponse le plutôt possible ?

ALLER PAR LE PANNEAU DE CONFIGURATION A LA PAGE
http://www.zshare.net/image/1541977133298ed9/

j'ai testé toutes les possibilités cité dans cette discussion aucune d'elles ne marche, alors j'ai creé cette fonction de remplacement

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
function inverse(s:shortstring):shortstring;
var
    i,l:byte;
    j:shortstring;
    K:array [1..30] of shortstring;
begin
     for I := 1 to 30 do
       K[i]:='';
         J:='';l:=1;
      for I :=1 to length(s)  do
      begin
              if s[i]=' ' then
              begin
                      k[l]:=j;
                      j:='';
                     l:=l+1;
              end
              else
              begin
                    j:=j+s[i];
 
              end;
      end;
      j:='';
      for I := 30 downto 1 do
             if K[i]<>'' then
              j:=j+' '+k[i];
 
     inverse:=j;
end;

cette fonction reçoit le texte en arabe elle fait l'inversion des mots pour qu'ils apparaissent corréctement dans Rave Report

04/03/2014, 07h53
SergioMaster

Bonjour,

Outre le fait qu'il s'agit d'un "déterrage de sujet" je trouve pas terrible cette fonction de checkal , surtout qu'il existe déjà une fonction ReverseString (à partir de D6 dans strutils)
04/03/2014, 16h46
chekkal

bonjour @sergio,

ça n'a pas été ma volonté de "deterer", je suis tombé sur cette discussion par hasard en cherchant une solution à mon probléme. Donc en parfaite gentelmen j'ai proposé cette fonction;).

sinon pour la fonction que tu m'a donnée je crois pas qu'il soit efficace.:mrgreen:
05/03/2014, 08h06
SergioMaster

méa culpa , il s'agissait d'inversion de mots et non de caractères :oops:
il n'empêche je n'en saisi pas le sens , mais ne parlant que peu l'arabe et ne m'étant jamais mis à l'écriture ....
05/03/2014, 10h01
chekkal

Bonjour @sergio,

là je marque un point, moi je parle Kabyle,Arabe,Français et Anglais:mouarf:.

sinon pour bien expliquer prenant un exple:

j'ai la phrase suivante: Crayon noir-> imprimer noir Crayon avec Rave d' ou la fonction que j'utilise.
14/07/2014, 15h50
asafaw

Rave reports 10 Delphi XE2

Bonjour,

:lol:Les états éditant de l'Arabe et développées avec Delphi7 et Rave Reports 5.0.0.4 fonctionnent correctement.

:ptdr:Par contre je n'arrive pas à trouver une solution en Delphi XE2 - Rave Reports 10 qui inverse les mots d'une phrase en arabe, en plus je ne peut pas utiliser une fonction d'inversion parce que j'utilise en même temps l'arabe et le français.

Que puis-je faire ?

Merci.