[gelöst] Lazarus MYSQL mit ZEOS mediumblob Datenstreams für .pdf / .jpg / .png / .msg Dokumente

[Levario]

Hallo zusammen,

ich möchte verschiedene Daten in einer Datenbank speichern. Dafür verwende ich eine MYSQL Datenbank. Der Typ für die Datei ist mediumblob mit 16MB Speicherplatz. Diese Datenbank soll PDF Dokumente, Bilder (.jpg und .png), sowie E-Mails von Outlook (.msg) speichern können.

Für Images finde ich viele Beispiele online. Für PDFs und .msg leider nicht. Gibt es hier Möglichkeiten einen Blob in einen Stream zu kopieren und diesen in eine PDF Dokument oder .msg umzuwandeln?

Schreibt gerne Links oder erklärt es mir ich finde aktuell nichts dazu.

Gruß

Levi

[djdhg]

Meinst du das hier: https://www.freepascal.org/docs-html/fc ... tream.html

[Levario]

Meinst du das hier: https://www.freepascal.org/docs-html/fc ... tream.html

Ja nur wie gehe ich dann eine .pdf aus oder eine .msg? Für Images habe ich ja Komponenten in Lazarus.

[djdhg]

Spontan würde ich das erstmal so probieren:

fs:=TFileStream.Create('c:\test.pdf', fmOpenRead);

https://www.freepascal.org/docs-html/rt ... tream.html

Lg

[Levario]

Ich habe eine Lösung gefunden für PDF Dokumente und .msg Dokumente (Outlook): Für .jpg / .png / .eml funktioniert diese Methode nicht.

procedure TForm1.Button1Click(Sender: TObject);
var
ms : TMemoryStream;
begin
// Datenbank Abfrage mit Zeos
Form1.ZQuery1.SQl.Clear;
Form1.ZQuery1.SQL.Text := 'Select * FROM test';
Form1.ZQuery1.Open;

ms:=TMemoryStream.Create; // TMemorystrem erstellen
ms.Position:=0; // Memory Stream beginnt beim Zeichen 0

TBlobField(ZQuery1.FieldByName('datei')).SaveToStream(ms); // Datenbank Abfrage in den Stream ms speichern
ms.SaveToFile('E:\test.pdf'); // Dokument Speichern
ms.free; // ms MemoryStream freigeben
OpenDocument('E:\test.pdf'); /Dokument öffnen, unter uses wird LCLIntf benötigt
end;

Bei Änderung des Dateityps nach z.B. .msg Speichert und öffnet er auch E-Mail im Outlook Format. Es kann sein das er nachfragt mit welcher Software die Datei geöffnet werden soll. OpenDocument nutzt das Programm das ihr als Favorit eingestellt habt.

[icho2099]

Wenn du neben dem Blob auch den Dateinamen speicherst, in deiner Tabelle, dann geht das für jeden Dateityp, wenn du den gespeicherten Namen verwendest.

[Levario]

Hallo icho2099,

vielen Dank für die Info habe es gerade getestet und es funktioniert.

Es funktionieren alle Dateien, wenn man den Dateinamen des Ursprungs nutzt.

[Zvoni]

Hallo icho2099,

vielen Dank für die Info habe es gerade getestet und es funktioniert.

Es funktionieren alle Dateien, wenn man den Dateinamen des Ursprungs nutzt.

Auch wenn "gelöst": Das wichtige ist die Datei-Endung (File-Extension), nicht der "Datei-Name".
Dein Fall klingt nach einem DMS, und von den DMS' die bei uns in der Firma im Einsatz waren/sind, war/ist der "ursprüngliche" Datei-NAME immer uninteressant.
Interessant war immer nur der Datei-Typ (Datei-Endung).
Bei einem Re-Export zurück aus der Datenbank raus wurde/wird nie der ursprüngliche Datei-Name vergeben, sondern nach einem bestimmten Algoritmus ein generischer Name vorgeblendet (Welcher dann in einem "SaveAs"-Dialog entsprechend dann geändert werden kann)

[Levario]

Danke ich habe es getestet und es funktioniert mit allen Dateien, wenn man den richtigen Namen nimmt.