AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

XML mit Bilder

Ein Thema von ngott2 · begonnen am 4. Sep 2014 · letzter Beitrag vom 4. Sep 2014
Antwort Antwort
ngott2

Registriert seit: 26. Aug 2013
Ort: Emsland
73 Beiträge
 
Delphi XE6 Professional
 
#1

XML mit Bilder

  Alt 4. Sep 2014, 10:31
Hallo,
ich möchte ein bestehendes Projekt erweitern und zwar mit Bilder, die in der bereits vorhandenen XML gespeichert werden sollen.


Wie geht man das an besten an (Wie speichert man Daten wie Bilder in eine XML und liest sie wieder aus.)?

Bin für jeden Tipp dankbar.

mfg
ngott2
  Mit Zitat antworten Zitat
Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.004 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#2

AW: XML mit Bilder

  Alt 4. Sep 2014, 10:50
Die Binären Daten kannst du Base64 codieren. Damit werden die binären Daten in einen String konvertiert. Der natürlich etwas mehr platz benötigt.

Such mal hier im Forum nach Base64.
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat
Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#3

AW: XML mit Bilder

  Alt 4. Sep 2014, 11:01
Ein kleines Beispiel für Bitmaps, gegf. anzupassen
Delphi-Quellcode:
USES Soap.EncdDecd;

function BitmapToBase64(ABitmap: TBitmap): AnsiString;
var
  MS: TMemoryStream;
begin
  MS := TMemoryStream.Create;
  try
    ABitmap.SaveToStream(MS);
    Result := EncodeBase64(MS.Memory,MS.Size);
  finally
    MS.Free;
  end;
end;

function Base64ToBitmap(const S: AnsiString): TBitmap;
var
  SS: TStringStream;
  B: TBytes;
begin
  B := DecodeBase64(S);
  SS := TStringStream.Create(B);
  try
    Result := TBitmap.Create;
    Result.LoadFromStream(SS);
  finally
    SS.Free;
  end;
end;

procedure TForm5.Button1Click(Sender: TObject);
begin
  Memo1.Text := BitmapToBase64(Image1.Picture.Bitmap);
  Image2.Picture.Bitmap.Assign(Base64ToBitmap(Memo1.Text));
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat
ngott2

Registriert seit: 26. Aug 2013
Ort: Emsland
73 Beiträge
 
Delphi XE6 Professional
 
#4

AW: XML mit Bilder

  Alt 4. Sep 2014, 11:21
Danke.
  Mit Zitat antworten Zitat
Jens01

Registriert seit: 14. Apr 2009
594 Beiträge
 
#5

AW: XML mit Bilder

  Alt 4. Sep 2014, 11:32
Ich würde vorher noch komprimieren zB mit zLib. Macht die Datei erheblich kleiner und schneller.
Achtung: Bin kein Informatiker sondern komme vom Bau.
  Mit Zitat antworten Zitat
Dejan Vu
(Gast)

n/a Beiträge
 
#6

AW: XML mit Bilder

  Alt 4. Sep 2014, 11:45
Macht die Datei erheblich ... und schneller.
Wie kann eine Datei schneller werden?
  Mit Zitat antworten Zitat
Jens01

Registriert seit: 14. Apr 2009
594 Beiträge
 
#7

AW: XML mit Bilder

  Alt 4. Sep 2014, 11:50
Na, zLib wirkt wie eine Art Doping.
Achtung: Bin kein Informatiker sondern komme vom Bau.
  Mit Zitat antworten Zitat
Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.554 Beiträge
 
Delphi 6 Enterprise
 
#8

AW: XML mit Bilder

  Alt 4. Sep 2014, 12:51
Wobei es da doch sicher auf das Format des Bildes ankommt. JPEG-Bilder z.B. sind doch schon oft komprimiert.
Ralph
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:02 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf