Bild in MySQL (Blob) mit mysql.pas speichern

[jus]

Zitat von mfichtner:

Zitat von Morfio:

Nun möchte ich in einer MySQL-Datenbank innerhalb eines Blob-Feldes ein Bild speichern und das auch anzeigen und ändern.

Für Delphi hab' ich zwar gerade keinen Beispiel-Code parat, aber ich hab' was vergleichbares mal für TMT Pascal geschrieben:

http://www.fichtner.net/tmt/mysql/

Die Beispiele in mysql-blobs-1.0-tmt.zip müßten im Prinzip ohne allzu große Änderungen auch in Delphi compilierbar sein. Aber selbst wenn das nicht auf Anhieb klappt: Der Code zeigt auf jeden Fall, wie man ein JPG-Bild in einem Blob-Feld speichert und es wieder ausliest.

Hope this help.

sorry dass ich den alten Beitrag ausgrabe, aber hat jemand die obige mysql-blobs-1.0-tmt.zip irgendwo rumliegen? Ich habe die Fichtner mysql.pas im Einsatz und hätte gerne gewußt wie Fichtner Blob über mysql.pas blob Dateien zur DB schickt.

lg,
jus

[jus]

*push*
hat wer noch die mysql-blobs-1.0-tmt.zip von Fichtner MySQL rumliegen?

[himitsu]

Leider hat er/sie die Datei nicht hier angehängt
und unglücklicher Weise bist du zwei Monate zu spät dran. (Webseite ist wegen gewisser Umstände offline)

Falls es extrem wichtig ist:
https://www.fichtner.net/ und auch http://fichtner-meyer.com (URL von dessen eMail)

Zitat:

Brigitte Fichtner
geb. Nauck

* 6. Februar 1938 † 22. Dezember 2019

Wobei ... M oder B ... wenn es ihr Mann war (wobei Männer ja durchschnittlich vor ihren Frauen sterben).
Weil auf der Webseite nix mehr steht ... mal Denic fragen wo der Ansprechpartner erreichbar ist, denn "irgendwer" hatte ja die Webseite anschließend noch geändert und womöglich hat derjenige Zugriff auf den Computer wo die Quellcodes liegen.

Leider hat auch das Webarchive noch keine Kopie der ZIP (nach Juli 2007 war diese Untereite schon weg)
http://web.archive.org/web/200704050...net/tmt/mysql/

Zitat:

applications developed in TMT Pascal

Und falls wer das erwähnte TMT aus der archivierten Webseite sucht ... diese Seite wurde inzwichen auch umbenannt/verkauft.
http://web.archive.org/web/200704050...//www.tmt.com/
http://www.frameworkpascal.com/

[edit]
Hast du ein Glück ... eine ältere Version gibt es.
Hast du ein Prech ... eine ältere Version gibt es doch nicht. (Archiviert als text/html: Got an HTTP 302 response at crawl time)
http://web.archive.org/web/*/http://...et/tmt/mysql/*

[hoika]

Hallo,
einfach mal Google benutzen ...

Ergibt u.a.
https://stackoverflow.com/questions/...per-for-delphi

Na, ich mal nicht so sein
http://www.audio-data.de/mysql.html

[jus]

@hoika: vielen Dank fürs Raussuchen, die Links kenne ich, aber leider ist der BLOB Ansatz im aktuellen mysql.pas nicht enthalten.

vielen Dank für eure Mühen, ich hatte bereits im letzten Dezember auch schon im http://web.archive.org geschaut, aber leider keinen funktionierenden Downloadlink gefunden. Meine letzte Hoffnung ist, dass jemand es noch auf seiner Festplatte rumliegen hat. Also falls jemand den Ansatz mit dem BLOB in Verbindung mit der Fichtner MySQL.pas hat, dass bitte melden.

[hoika]

Hallo,
ah, Lesefehler.
Ich würde statt dem String einen TStringStream benutzen.

Datei -> TFileStream -> TStringStream -> TStringStream.DataString enthält dann die Datei.

PS1: Du solltest auch Stream.Size mal prüfen, das sollte einen Wert > 0 haben.
PS2: FileStream.Position vor allen Aktionen auf 0 setzen (Vielleicht ist das bei Deinem alten Code schon die Lösung).

[haentschman]

Hallöle...
Nur aus Neugier...was hat die Fichtner MySQL.pas anders als andere (FireDAC etc.) Blob ist Blob. Oder?