Discussion :

[mario52]

Bonjour

j'essaie de lire un fichier mais sans resultat !

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
var res   : resource; 
 
    line  : string; 
 
begin 
      res := OpenResource('\fichier.txt'); 
 
      if (resourceAvailable(res)) then 
                                    begin           
                                    line := ReadLine(res); 
                                    SetColor( 0,255, 0);
                                    drawText(line, 10, 10);
                                    repaint;	
                                    Delay(1000); 
                                    CloseResource(res); 
                                    end else begin
                                                SetColor(255, 0, 0); 
                                                drawText('Erreur', 0, 0);
                                                repaint;
                                                Delay(1000); 
                                              end; 
SetColor(0, 0, 255);
drawText('Fini', 10, 10); 
repaint;      
Delay(1000);
 
end.

j'ai copie le fichier .txt dans tous les repertoires pour test mais rien n'y fait !
j'ai copie le chemin complet en vain !

merci
mario

PS:content qu'il y ait un forum MidletPascal j'avais parle de ce compilateur il y a quelques annees mais , passe totalement inapercu
zero-java/

[krachik]

Bonjour

Quand tu dis "sans résultat", qu'est ce qui se passe exactement? que le contenu de ton fichier n'est pas lu? que le fichier n'est pas trouvé?

Maintenant de plus près

Code :

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

res := OpenResource('\fichier.txt');

C'est un slash qu'il faut et non un anti-slash, et donc comme ceci

Code :

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

res := OpenResource('/fichier.txt');

j'ai copie le fichier .txt dans tous les repertoires pour test mais rien n'y fait !
j'ai copie le chemin complet en vain !

Peu importe où tu as mis ton fichier original, il faut l'ajouter dans les ressources de MIDlet Pascal pour qu'il soit lu. ALors suivant que tu utilises MP2 ou MP3 il faut cliquer sur le + pour ajouter une ressource(pour MP2) ou clique droit sur le dossier ressource et choisir Add(pour MP3) après cette opération, tu retrouveras ton fichier dans le dossier res dans projet.

Je pense que ça devrait aller maintenant.

[mario52]

Bonjour
merci pour la reponse

sans resultat parce qu' il passe le test "resourceAvailable(res)" et m'affiche l'Erreur , le fichier n'est pas lu

Code :

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

1
2
3
4
5
6
7
8
 
if (resourceAvailable(res)) then begin
                                 end else begin
                                             SetColor(255, 0, 0); 
                                             drawText('Erreur', 0, 0);
                                             repaint;
                                             Delay(1000); 
                                             end;

mais la procedure que tu m'as donnee lie le fichier au programme (si j'ai bien compris)
ce que je cherche , c'est de lire un fichier texte quelconque dans le GSM par exemple une liste que je peux modifier sur l'ordinateur et le remettre dans le GSM et aller le lire sans modification du programme.
Un petit editeur de fichier texte.
mario

[krachik]

Si resourceAvailable(res) renvoie false c'est que le fichier n'est pas trouvé . En changeant ce que j'avais dit concernant le slash, ça ne marche toujours pas?

Que tu exécutes sur un téléphone ne posera pas de problème vu que le fichier sera embarqué dans le fichier jar.

[darrylsite]

Que tu exécutes sur un téléphone ne posera pas de problème vu que le fichier sera embarqué dans le fichier jar.

Si j'ai bien compris, je crois qu'il veut accéder à n'importe quel fichier se trouvant sur le téléphone

c'est de lire un fichier texte quelconque dans le GSM par exemple une liste que je peux modifier sur l'ordinateur et le remettre dans le GSM et aller le lire sans modification du programme

Je crois que faire ça en native n'est pas possible pour le moment sous MIDlet Pascal. Il est par contre possible de lire uniquement les ressources contenues dans le jar.
Ce que dit la doc :

The function opens the resource file located within the application's JAR file

Pour arriver à faire ce que dit mario52, il faudrait écrire un bout de code en java pour en faire une librairie-unité. En plus, il faudra que l'application demande l'autorisation pour accéder accéder à un autre fichier sur le téléphone.

[krachik]

Oui tu as raison, j'avais un peu trop vite lu. Ce n'est pas possible pour le moment comme le dit darrylsite sous MIDlet Pascal dont va falloir faire recours à une lib externe pour réaliser ce que tu veux, et encore, cela dépendra du téléphone cible c'est à dire s'il implémente ou dispose de jsr 75