Discussion :

[mario9]

Bonjour

J'essais depuis quelque temp de sauvegarder une image dans téléphone Android pour les fichiers Sqlite et fichier texte ca va bien mais j'ai des problemes a sauvegarder une image

voici la ligne de commande que j,essais

ImageViewer1.Bitmap.SaveToFile(TPath.GetPicturesPath + PathDelim + 'test.bmp'); ce code ne fonctionne pas

si je remplace image par un memo avec ext .text ca fonctionne

Merci de votre aide

Mario

[exoseven]

le format .bmp n'est pas pris en charge sous android, just .gif, .jpeg, .jpg ou .png

essaye

Code :

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

ImageViewer1.Bitmap.SaveToFile(TPath.GetPicturesPath + PathDelim + 'test.png');

[mario9]

Merci de votre aide

J'ai fais plusieurs essais et je n'ai plus de message d'erreur mais je ne vois pas mon image dans l'imageviewer2 et je ne vois pas pourquoi voici mon code tres simple et la forme
que j'utilise pour faire les essais.

Mario

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
 
 uses system.IOUtils;
procedure TForm2.Button1Click(Sender: TObject);
begin
 //memo
   memo2.Lines.LoadFromFile(TPath.GetDocumentsPath + '/test.txt');
   DocPathLabel.Text := TPath.GetDocumentsPath;
end;
 
 
procedure TForm2.Button2Click(Sender: TObject);
begin
//memo
   Memo1.Lines.SaveToFile(GetHomePath + '/test.txt');
   DocPathLabel.Text := TPath.GetDocumentsPath;
end;
 
procedure TForm2.Button3Click(Sender: TObject);
begin
//image
   ImageViewer2.Bitmap.LoadFromFile(TPath.GetPicturesPath + PathDelim +  '/test.png');
   Label1.Text := TPath.GetDocumentsPath;
end;
 
procedure TForm2.Button4Click(Sender: TObject);
begin
//image
    ImageViewer1.Bitmap.SaveToFile(TPath.GetPicturesPath  + PathDelim + '/test.png');
    Label1.Text := TPath.GetDocumentsPath;
end;

[exoseven]

surement parce que vous ajoutez 2 fois \

faites

Code :

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

 ImageViewer2.Bitmap.LoadFromFile(TPath.GetPicturesPath + PathDelim +  'test.png');

[SergioMaster]

Bonjour,

je suggère plutôt d'utiliser TPath.Combine(TPath.GetPicturesPath,'Test.jpg') plutôt que PathDelim, ce qui évitera de se poser des questions sur le nombre de délimiteurs.

il me semble aussi que l'utilisation de TBitmapCodecManager pour sauvegarder les images pourrait être utile/nécessaire. Je sais que j'ai déjà utilisé ce genre de choses mais je ne sais plus où .... jusqu'à ce que je le retrouve , bonnes recherches

[mario9]

Bonjour

Merci de votre aide ca me permet d'avancer dans mes connaissances et mon projet.

Les commandes pour sauvegarder l'image fonctionne chaque fois que je fais une sauvegarde je vois lespace occupé dans mon téléphone augmenter mais mon probleme semble venir du fais que je sauvegarde une image vide.

Si vous regarder l'image, j'essais de copier le contenue de l'image1 dans un fichier et la récupéré sur l'image2 qui est toujours vide.



Je dois mal configurer mon image avant de faire le transfert. Si vous avez une idée supplémentaire.Je continue ma lecture et essais avec ce que SergioMaster ma souligné (TBitmapCodecManager )
pour voir ce que ca donne.

Merci beaucoup

Mario