Einzelnen Beitrag anzeigen

night

Registriert seit: 23. Jun 2006
22 Beiträge
 
Turbo Delphi für Win32
 
#9

Re: TJpegImage saveToStream und saveTo File funktioniert nic

  Alt 1. Sep 2009, 15:49
Zitat von Blup:
Zitat von night:
Das FData[i].FPicture wird ja auch auf das Image kopiert und angezeigt.
Das geht aber aus deinen Code-Schnipseln nicht hervor.
Geladen und angezeigt wird Data, FData wird nur beim Speichern benutzt.
Wenn FData[i].FPicture eine gültige Komponente ist, heist das noch lange nicht das auch Daten einer Grafik enthalten sind.
Data.FPicture.LoadFromFile(form1.OpenPictureDialog 1.FileName); Hier wird das Bild geladen.

form1.IPicture.Picture.Bitmap.Assign(Data.FPicture ); und hier auf das Image kopiert. und es wir auch angezeigt.



Zitat von Klaus01:
Guten Morgen,

bist Du dir sicher, dass kein File angelegt wurde.

ms.SaveToFile('test.jpg'); Ohne jedwede Pfadangabe kannst Du dir nicht sicher sein wo das File abgelegt wird.

Grüße
Klaus
Okay ich teste es gleich mal mit dem ganzen Pfad.


Zitat von sx2008:
Ich sehe da jede Menge Code Smells in deinen Sourcecode Schnippseln.
Du greifst z.B. ständig auf die globale Variable form1 zu.

Oder noch ein Beispiel:
Der Aufruf von form1.OpenPictureDialog1.execute ist doch von Hinten-durch-die-Brust-ins-Auge.
Gib' der procedure loadPicture einen Übergabeparameter const filename:string und der Code wird deutlich besser.
Wenn du diese Probleme beseitigst, dann wird auch dein ursprüngliches Problem leichter zu beheben.
Habe ich geändert und ich übergebe auch das Datum. Das Problem besteht aber weiterhin.
  Mit Zitat antworten Zitat