Discussion :

[papyvore]

bonjour delphi xe8

Code :

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

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
type
  Cours = Packed record
    Indx: Integer;
    Qte: Integer;
    URL: string[250];
  end;
 
  Fichier = File Of Cours;
 
  Var
  F: Fichier;
  Ret : integer
 
{$IFDEF ANDROID}
  AdrFichier :=  TPath.Combine(TPath.GetDocumentsPath, 'cours.DAT');
{$ELSEIF Defined(MSWINDOWS)}
  AdrFichier := TPath.GetHomePath + PathDelim + 'cours.DAT';
{$ENDIF}
 
  if FileExists(AdrFichier) then
    begin
      reset(F);
      //ici mon fichier existe le message s'affiche bien
       TDialogService.MessageDialog(AdrFichier, TMsgDlgType.mtConfirmation, [TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], TMsgDlgBtn.mbYes, 0,
        procedure(const AResult: TModalResult)
        begin
        Ret := AResult;
        end
        );
        if Ret <> mrYes then
    end
    else
      Rewrite(F);
  except
     TDialogService.MessageDialog('Erreur Lire Fichier F', TMsgDlgType.mtConfirmation, [TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], TMsgDlgBtn.mbYes, 0,
      procedure(const AResult: TModalResult)
      begin
      Ret := AResult;
      end
      );
      if Ret <> mrYes then
  end;
 
  if FileSize(F) <> 0 then   //<-- ici sous windows ok FileSize(F) > 0   mais sous android FileSize(F) = 0
    begin
      reset(F);
      Seek(F, 0);
      Try
        While Not Eof(F) Do .....

ce code fonctionne sous windows
mais sous android FileSize(F) est égal a 0
question
est ce que le fichier n'est pas stocké au bon endroit pourtant il est reconnu,
ou reset sous android doit être différent ????
autant de questions pourquoi ça ne marche pas sous android

[tourlourou]

Bonjour,
j'imagine qu'il y a un Assign(Fichier, AdrFichier) quelque part dans ton code que tu n'as pas repris sur le forum ?

[pprem]

Si le filesize() est fait après un rewrite() ça me semble normal, après un reset() non.

est-ce que le fichier est bien créé ?

où est le AssignFile() ?

[papyvore]

Si le filesize() est fait après un rewrite() ça me semble normal, après un reset() non.

est-ce que le fichier est bien créé ?

où est le AssignFile() ?

Bonjour merci de vos réponses a tous deux
oui j'ai bien un AssignFile(F, AdrFichier).
le code tel que marche bien sous windows et mon fichier s'affiche bien dans un stringgrid.
j'ai placé des MessageDialog a plusieurs endroits.
c'est seulement sous android que FileSize(F) est à 0, alors que sous windows il est à 2

[pprem]

as-tu pu tester sur plusieurs appareils différents pour voir si ça tourne de façon différente ?

sur quelle version d'android ça déconne ?

je n'ai pas trouvé de relevé d'incident laissant supposer que ce serait un bogue connu, donc faut faire quelques vérifications avant de remonter l'info si ça se confirme.

[SergioMaster]

je n'ai pas trouvé de relevé d'incident laissant supposer que ce serait un bogue connu, donc faut faire quelques vérifications avant de remonter l'info si ça se confirme.

D'un autre côté, XE8 c'est pas du récent du coup remonter l'information

Du coup, même si le sujet est l'utilisation de record utiliser SQLite (même pour une seule table) serait certainement une solution plus "radicale"

[ALWEBER]

Je vote pour que tu utilises une table SQLLite. Je ne pense pas que le string[250] soit bien géré par Androïd

[pprem]

D'un autre côté, XE8 c'est pas du récent du coup remonter l'information

Forcément, pour XE8 je m'en fiche un peu, mais c'est pour voir s'il y a un problème général sur Android ou s'il est par rapport à une version précise afin de vérifier ce qu'il en est sur la dernière version en date de RAD Studio et remonter l'info si c'est justifié.

[pprem]

Concernant le choix de SQLite plutôt que les fichiers binaires basés sur un RECORD, effectivement pour les mobiles ça serait nettement mieux notamment à cause du string[250] comme le relève Alain (problème de taille des caractères qui fait que de toute façon le fichier ne sera pas portable d'un OS à un autre selon l'encodage choisi).

En revanche, si le string[250] est un AnsiString[250] (non géré par la RTL en XE8) ou se transforme en array [0..255] of char, ça peut améliorer la portabilité du fichier stocké et justifier l'utilisation des FILE FO RECORD "antiques".

Si la question de passer le fichier de la liste d'un programme à un autre ne se pose pas, il faut clairement abandonner le file of record et passer à une base SQLite ou IBLite... et pas que sur Android, mais partout.

[papyvore]

Concernant le choix de SQLite plutôt que les fichiers binaires basés sur un RECORD, effectivement pour les mobiles ça serait nettement mieux notamment à cause du string[250] comme le relève Alain (problème de taille des caractères qui fait que de toute façon le fichier ne sera pas portable d'un OS à un autre selon l'encodage choisi).

En revanche, si le string[250] est un AnsiString[250] (non géré par la RTL en XE8) ou se transforme en array [0..255] of char, ça peut améliorer la portabilité du fichier stocké et justifier l'utilisation des FILE FO RECORD "antiques".

Si la question de passer le fichier de la liste d'un programme à un autre ne se pose pas, il faut clairement abandonner le file of record et passer à une base SQLite ou IBLite... et pas que sur Android, mais partout.

j'ai fais tester avec sydney le problème est le même.
comme finalement il y a peu de données je vais passer par un fichier ini , j'ai testé ça devrait le faire.
merci de vos sugestions je regarder SQLite .