Discussion :

[Pedro]

Salut à tous
J'ai un souci avec les stream. Voici ce que je fais:

Code :

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

1
2
3
4
5
6
7
 
    t.Seek(BmpStart,soFromBeginning);
    tm:=TMemoryStream.Create;
    tm.CopyFrom(t,BmpSize);
    FBack.LoadFromStream(tm);
    tm.Clear;
    FreeAndNil(tm);

Sachant que t est un TFileStream, et que FBack est un TBitmap.
En fait, je veux charger un aerçu d'un fichier dwg qui n'est en fait qu'un bmp 256 couleurs contenu dans le fichier dwg à la position (BmpStart et de taille BmpSize).
Le problème c'est que ça ne marche pas: Aucun message d'erreur mais par contre, après le LoadFromStream, le handle de mon FBack est 0 Alors que juste avant, il est correct...
Quelqu'un a une idée?
Merci d'avance

[edam]

j'ai jamais utilisé sa mais ,une questioon comment tu as enregistré???

[cpdump]

Est ce que ton bitmap est paramétré en adéquation avec le bitmap dans le fichier (taille, nbcouleurs, ...) ?
Est que le format attendu par le Loadfromstream correspond à ce qu'il y a dans le fichier ?

[sovitec]

Ma réponse sera un peu similaire à celle de cpdump.

Est ce que si tu sauvegardes ton stream dans un fichier tu arrives à le relire en tant que fichier bmp ?

[Pierre Castelain]

Je t'avais bien dit qu'une des erreurs les plus communes avec les streams était d'oublier de les remettre au début :

Code :

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

1
2
3
4
5
6
7
8
 
    t.Seek(BmpStart,soFromBeginning); 
    tm:=TMemoryStream.Create; 
    tm.CopyFrom(t,BmpSize); 
    tm.Seek(0, soFrombeginning); //   <- LA !
    FBack.LoadFromStream(tm); 
    tm.Clear; // <- Ca ne sert à rien puisque tu le détruit juste après.
    FreeAndNil(tm);

[Pedro]

Oups
Merci Pierre!
Effectivement, j'avais perdu de vue que tm pouvait ne pas être au début...
Quel talent
Merci à tous