Discussion :

[poly128]

J'ai un fichier typé avec un entier et une string et il fonctionne tres bien. Mais, quand je veut rajouter une image il plante.

Code :

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

1
2
3
4
5
6
7
8
9
tchiffre=record
    age:integer;
    nom:string[20];
    photo:tbitmap;
end;
.....
.....
.....
membre:file of tchiffre;

Comment faire pour mettre un tbitmap dans un fichier typé ?

[PadawanDuDelphi]

Bonsoir,

Juste une petite question, tu creer bien ton tbitmap avant de l'utiliser?

@+.

[poly128]

Malheureusement oui.

[tourlourou]

dans un record, un champ objet (ou string) ne contient que la référence à l'objet (donc un pointeur, sur 4 octets)
pour enregistrer l'objet, il faut le faire à la main !
soit dans un fichier séparé (Bitmap.SaveToFile avec dans le record un champ String[255] qui contient le chemin
soit dans un fichier unique : dans ton record, un champ taille du bitmap, puis tu l'écris à la suite (utilise les streams)
soit tes bitmaps ont tous la même taille (icônes pe) et tu utilises un champ array[1..taille] of Byte pour les contenir

bon code

[PadawanDuDelphi]

Bonjour,

Il reste aussi le moyen de stocker tes images dans un TImagesList, et de conserver l'indice de l'image dans ton record.

@+.

[Philippe Gormand]

Bonjour.

Tu ne peux pas mettre un TBitmap dans une structure destinée à être enregistrée dans un fichier. Un TBitMap est un pointeur et c'est interdit.
Cependant , il y a une solution qui fonctionne très bien.
Tu trouveras toutes les explications, méthodes avec exemples et sources dans mon dernier tutoriel sur les fichiers.

(Page principale sur DELPHI sur le site ou sur ma page privé).

En espérant que cela t'aide.

A+

[Sub0]

J'ai réalisé une fonction permettant de sauver un TBitmap dans une chaîne et vis-versa :
http://www.developpez.net/forums/sho...6030&page=5#63

D'ailleurs ce sujet devrait t'intéresser...

[poly128]

Merci la fonction de Sub0 marche a merveille.