DBImage -> JPEG speichern !!
kbott
Hi Leute ...
Der Betreff sagt es schon ... ich möchte JPEG-Bilddateien Direkt in eine
Paradox Datenbank schreiben ...
Weil´s einfach kleiner wird, als mit den normalen Bitmaps.
Ich beiß mir bei dem Problem langsam aber sicher die Zähne aus und komm
einfach nicht weiter ...
Alle Tips werden gerne gelesen ... im vorraus danke ...
Klaus ...
Eisi
Arbeitest Du mit D3 ??
Bis denne dann .... Sven
-
##################################################
# Heute ein Koenig ... Morgen eine Schnapsleiche #
##################################################
kbott
Eisi schrieb in Nachricht <352a8916...@news.lynet.de>...
JA ! 3.01 Standard...
haste eine Idee ? immer her damit ... kann alles brauchen ...
Klaus
Eisi
On Sat, 4 Apr 1998 11:34:57 +0200, "kbott" <kb...@metronet.de> wrote:
>
>JA ! 3.01 Standard...
>
>haste eine Idee ? immer her damit ... kann alles brauchen ...
>
>Klaus
>
Also ich weiss, dass man durch das blosse Einbinden von JPEG in der
USE-Klausel dazu fuehrt, dass in einer TImage-Komponente auch
JPG-Bilder angezeigt werden koennen. Ich habe das zwar nicht
ausprobiert, bin jedoch der Meinung, dass diese Unterstuetzung auch
fuer TDBImage gelten muesste. Wie gesagt, habe ich das selbst noch
nicht ausprobiert, aber vielleicht klappt's ja.
kbott
Eisi schrieb in Nachricht <35285232...@news.lynet.de>...
erst mal Danke für die Antwort ...
Mit der TImage geht es auch ... nur bei der TDBImage halt nicht ...
Also ich sag mal was ich bis jetzt weiss :
- Wenn TDBImage Bilder speichert dann eben immer als Bitmap ...
sobald ich irgendwas anderes als ne bitmap speichern will gibt´s einen
'EInvalidBitmap' oder so in der Art ... ich kanns schon nicht mehr sehen ..
ich dachte dann wenn ich ein BLOB-Feld erzeuge kann ich das umgehen ... und
die daten dann in die Datenbank schreiben ...
Leider bin ich auch nicht gerade der Proicoder und wenn ich dieses Blobfeld
habe schaffe ich es einfach nicht was in die DB zu schreiben ... (vieleicht
mache ich da was falsch ... )
ich hab einige Bücher ... aber da steht fast nix drinne über Blob´s. und die
Online-hilfe iss zwar gut ... aber Beispiele suche ich da auch vergebens
...
Vieleicht haste ja noch einen Rat ... oder eine Stelle wo ich mich mal
hinwenden kann ...
ich hoffe ja immer noch das ich selbst drauf komme ... Hoffentlich bleibt
die Hoffnung erhalten ...
bye ... klaus
Eisi
On Sat, 4 Apr 1998 21:50:51 +0200, "kbott" <kb...@metronet.de> wrote:
>ich hoffe ja immer noch das ich selbst drauf komme ... Hoffentlich bleibt
>die Hoffnung erhalten ...
>
>bye ... klaus
>
Also ich habe mal ein wenig herum experimentiert und meine Buecher
gewaelst, jedoch ohne Erfolg. Diverse Ideen, wie z.B. das speichern
der Grafik in ein Binary-Feld scheitern allein daran, dass das Bild,
wenn es angezeigt wird, nicht mehr komprimiert ist. Der Sinn waere
also dahin.
Eine andere Idee, waere das Speichern der Ausgangsdatei in ein
Binary-Feld. Damit wuerde auch die Komprimierung erhalten bleiben.
Jedoch hab ich keinen blassen Schimmer, wie man das in die Tat
umsetzen sollte. Die Hilfe gibt nur an, dass Binary-Felder z.B. dafuer
verwendet werden, Sounddaten zu speichern. Also muesste es auch mit
Bild-Daten gehen.
Ich selbst binde keine Bilder in Datenbanken ein, jedenfalls nicht das
Bild selbst. Ich verwalte diese lieber extern.
kbott
kbott schrieb in Nachricht <6g361b$d56$1...@news.metronet.de>...
>Hi Leute ...
>
>Der Betreff sagt es schon ... ich möchte JPEG-Bilddateien Direkt in eine
>Paradox Datenbank schreiben ...
>
>Weil´s einfach kleiner wird, als mit den normalen Bitmaps.
>
>Ich beiß mir bei dem Problem langsam aber sicher die Zähne aus und komm
>einfach nicht weiter ...
>
>Alle Tips werden gerne gelesen ... im vorraus danke ...
>
>Klaus ...
>
>
>>
>Hi Klaus,
>was ist mit BLOB Field. Kannst du darin nicht Deine Daten einfach Binär
>ablegen.
>Wie zeigst du Sie in deiner Anwendung an ??
>Gruß
> .....Arndt
>
>
ich habe ein BLOB Feld benutzt . Aber der ich schaffe es einfach nicht das
er die Daten des Jpeg Bildes speichert ...
ich mache wahrscheinlich was falsch ... nur weiss ich nicht was :-)
um die Anzeige habe ich mich noch nicht gekümmert ... bis jetzt kann ich die
Daten ja noch nicht mal speichern ...
aber im jetztigen Programm werden die Bilder halt als Bitmap mit TDBImage
gezeigt ...
Falls es noch mit dem Binären speichern klappen sollte , dachte ich die
Daten dann eben auch wieder Binär auszulesen und Sie dann in einem normalen
TImage anzuzeigen ...
Wenn ich alle Bilder habe werden es so um die 7000 sein ... deshalb der
ganze Aufwand ... die bitmap ist einfach zu groß ...
vieleicht hast du ja die Rettende Idee ... ich mach den Ganzen Tag hier rum
un komm nicht weiter ... ich finde auch nix über Binäres Speichern und Blobs
in meinen Büchern ...
Ok ... bye ... hoffe auf Antwort ---
Klaus
kbott
Eisi schrieb in Nachricht <3526d4ef...@news.lynet.de>...
ja ... also mir geht ´s auch so ... ich habe keine Ahnung wie ich ein
Binär-Feld schreiben soll ... aber das gibt´s doch nicht ... das muss doch
funktionieren ... ich werd am Montag noch mal nach Frankfurt fahren und in
so einem Bücherladen alles wälzen was ich zumThema finde ...
Wie sieht das aus ? 'bilder extern verwalten' alles in ein verzeichniss und
dann bei bedarf laden ? ... ist das nicht zu langsam wenn´s größer wird ?
am end muss ich das so auch machen .... aber nur ungern ...
Hier... korrekt das du dir die arbeit gemacht hast ...
bye .. Klaus
Eisi
On Sun, 5 Apr 1998 10:47:45 +0200, "kbott" <kb...@metronet.de> wrote:
Hi Klaus
Mit "Bilder extern verwalten" meinte ich schon, diese auf der Platte
in einem seperatem Verzeichnis zu speichern. Wenn es jedoch ueber
7.000 Stueck werden koennen, wuerde ich die nicht in ein Verzeichnis
unterbringen, weil sonst das oeffnen der Files zu lange dauert. In
diesem Fall wuerde ich dann weitere Unterverzeichnisse anlegen. In der
Datenbank speichere ich dann nur den Pfad und den Dateinamen ab. Wenn
die Bilder jedoch vom Programm her logisch zugeordnet werden koennen,
kann man sich das Speichern des Pfades & des Dateinamens natuerlich
sparen. Ich schreibe z.B. gerade ein Immobilienverwaltungs-Programm,
in dem der Anwender die Moeglichkeit hat, fuer jedes Objekt bis zu 6
Bilder zu speichern. Jedes Objekt hat eine eindeutige Nummer, also
kann ich mir die Verwaltung des Dateinamens sparen und den selbst
festlegen. z.B. mit Objektnummer+Bildnummer. Dann wuerde das 4. Bild
des Objektes Nummer 31 den Dateinamen "00314.JPG" erhalten.
Ich habe uebrigens auch auf einigen Homepages nach einer eventuellen
Komponente gesucht, jedoch dienen die alle lediglich der Anzeige oder
Konvertierung. Keine einzige beschaeftigt sich mit der Ablage der
Bilder in einer Datenbank.
Manchmal habe ich wirklich das Gefuehl, man kann sich zum Thema Delphi
hunderte Buecher kaufen und immer noch nicht ueber alles Informiert
sein :)))
kbott
Eisi schrieb in Nachricht <35277cf9...@news.lynet.de>...
>On Sun, 5 Apr 1998 10:47:45 +0200, "kbott" <kb...@metronet.de> wrote:
>
>>
>Ich habe uebrigens auch auf einigen Homepages nach einer eventuellen
>Komponente gesucht, jedoch dienen die alle lediglich der Anzeige oder
>Konvertierung. Keine einzige beschaeftigt sich mit der Ablage der
>Bilder in einer Datenbank.
>
>Manchmal habe ich wirklich das Gefuehl, man kann sich zum Thema Delphi
>hunderte Buecher kaufen und immer noch nicht ueber alles Informiert
>sein :)))
>
Wirst lachen ... ich habe auch gesucht ... und bin im AOL fündig geworden
...
das Ding heisst : 'ImageLib' (www.imagelib.com) und kostet 300 .- :-)))
da ich nicht rockefeller bin werde ich mir das nur ganz am ende kaufen ...
also , wenn ich ganz am ende bin ...
ich habe aber ne e-Mail von einem Coder aus Frankfurt bekommen, der muss
Bilder im JPEG-Format komprimieren und der hat schon erfolgreich Blob´s
geschrieben.
Da weden wir mal ein 'BrainBuster-Meeting' veranstalten ... mal sehen was
dabei herauskommt.
ok ... bis dann
Klaus
Eisi
On Sun, 5 Apr 1998 17:27:47 +0200, "kbott" <kb...@metronet.de> wrote:
>Wirst lachen ... ich habe auch gesucht ... und bin im AOL fündig geworden
>...
>das Ding heisst : 'ImageLib' (www.imagelib.com) und kostet 300 .- :-)))
>
>da ich nicht rockefeller bin werde ich mir das nur ganz am ende kaufen ...
>also , wenn ich ganz am ende bin ...
>
>ich habe aber ne e-Mail von einem Coder aus Frankfurt bekommen, der muss
>Bilder im JPEG-Format komprimieren und der hat schon erfolgreich Blob´s
>geschrieben.
>
>Da weden wir mal ein 'BrainBuster-Meeting' veranstalten ... mal sehen was
>dabei herauskommt.
>
>ok ... bis dann
>
>Klaus
>
Sag mir bescheid, wenn Du ne Loesung gefunden hast ... Interessiert
mich naemlich auch brennend.
Viel Glueck :)
Dennis Schmitt
Eisi wrote:
> On Sat, 4 Apr 1998 11:34:57 +0200, "kbott" <kb...@metronet.de> wrote:
> >JA ! 3.01 Standard...
> >haste eine Idee ? immer her damit ... kann alles brauchen ...
> >Klaus
Moin,
> Also ich weiss, dass man durch das blosse Einbinden von JPEG in der
> USE-Klausel dazu fuehrt,
gibt es die überhaupt? Soweit ich weiß muß man erstmal das JPEG-Format
einbinden (findet man auf der D3 CD unter INFO\EXTRAS)... Erst dann
sollte der Zugriff auf die Image-Kompos funken... (ohne Gewähr)
> dass in einer TImage-Komponente auch
> JPG-Bilder angezeigt werden koennen. Ich habe das zwar nicht
> ausprobiert, bin jedoch der Meinung, dass diese Unterstuetzung auch
> fuer TDBImage gelten muesste. Wie gesagt, habe ich das selbst noch
> nicht ausprobiert, aber vielleicht klappt's ja.
Siehe oben. Ich glaube man muß zuerst diese JPEG-Erweiterung einbinden
damit man auch mit TImage-Kompos die JPEG Bilder anzeigen kann...
> Bis denne dann .... Sven
--
Best wishes, | Homepage: http://www.pils.de/~desch
Dennis Schmitt
Eisi
>
>gibt es die überhaupt? Soweit ich weiß muß man erstmal das JPEG-Format
>einbinden (findet man auf der D3 CD unter INFO\EXTRAS)... Erst dann
>sollte der Zugriff auf die Image-Kompos funken... (ohne Gewähr)
>
Also bei mir war die Standardmaessig nach der Installation von D 3.01
im LIB-Verzeichnis vorhanden.
>
>Siehe oben. Ich glaube man muß zuerst diese JPEG-Erweiterung einbinden
>damit man auch mit TImage-Kompos die JPEG Bilder anzeigen kann...
>
Jupp, das haben wir auch gewusst. Hier geht es aber explizit darum,
JPEG-Bilder in Paradox-Tabellen abzuspeichern. Wohl gemerkt, als JPEG
und nicht umgewandelt in BMP (wegen der Komprimierung, die ja bei
einer Umwandlung in BMP verloren gehen wuerde!).
Bis denne dann .... Sven
kbott
Eisi schrieb in Nachricht <3527ad2c...@news.lynet.de>...
>On Sun, 5 Apr 1998 17:27:47 +0200, "kbott" <kb...@metronet.de> wrote:
>>
>
>Sag mir bescheid, wenn Du ne Loesung gefunden hast ... Interessiert
>mich naemlich auch brennend.
>
>Viel Glueck :)
Mach ich ...
Andreas Pohlmann
On Sat, 4 Apr 1998 21:50:51 +0200, "kbott" <kb...@metronet.de> wrote:
[...]
>
>Mit der TImage geht es auch ... nur bei der TDBImage halt nicht ...
>
[...]
>
>Vieleicht haste ja noch einen Rat ... oder eine Stelle wo ich mich mal
>hinwenden kann ...
>
>ich hoffe ja immer noch das ich selbst drauf komme ... Hoffentlich bleibt
>die Hoffnung erhalten ...
Voraussetung:
Die bei D3 mitgelieferten "jpeg-Units" sind eingebunden.
Anmerk: Der Code stammt aus einem etwas komplizierterm Project. Die
Zugriffe auf die Felder können natürlich auch einfacher vorgenommen werden.
Aber das Prinzip sollte klar werden, hoffe ich...
Also: Laden
-------------------------------------------------------------------------------
procedure TForm[].SbBlobLoadClick(Sender: TObject);
var
t : TTable;
blField : TBlobField;
fName : string;
begin
[...]
> In dem Dialog sollten Dir, nach dem Einbinden der D3 jpeg-units,
> auch jpeg angezeigt werden,
if OpenPictureDialog.Execute then begin
fName := OpenPictureDialog.FileName;
> Tabelle und dessen Blobfield ermitteln
t := TTable(DataSrc.DataSet);
blField := TBlobField(t.FieldByName(F_BOLB_DATA));
> jpeg-File einlesen und speichern
t.Edit;
blField.LoadFromFile(fName);
t.Post;
end;
[...]
end;
-----------------------------------------------------------------------
Ganz einfach, oder?
Das Anzeigen ist etwas komplizierter. Die Anzeige erfolgt über ein
*TImage*!
Du mußt also den DataChange-Event 'beobachten', um das Image zu
aktualisieren.
-----------------------------------------------------------------------
procedure TForm[].DataSrcDataChange(Sender: TObject; Field: TField);
var
bf : TBlobField;
s : TBlobStream;
> Diese Object steht auch erst nach der jpeg-Einbindung bereit.
jep : TJPEGImage;
t : TTable;
begin
inherited;
> dito.
t := TTable(DataSrc.DataSet);
bf := TBlobField(t.FieldByName(F_BOLB_DATA));
> Blobfeld testen. Hier die primitive Art.
if (bf.BlobSize > 0) then begin
> Stream erzeugen
s := TBlobStream.Create(bf, bmRead);
[...]
> TJPEGImage erzeugen und füllen
jep := TJPEGImage.Create;
jep.LoadFromStream(s);
> jpeg zu TImage packen und aufräumen
Image.Picture.Graphic := jep;
jep.Free;
[...]
s.Free;
[...]
Image.Update;
end //if (bf.BlobSize > 0)
[...]
end;
-----------------------------------------------------------------------
Andreas Pohlmann
kbott
Andreas Pohlmann schrieb in Nachricht <35274163...@news.cityweb.de>...
>On Sat, 4 Apr 1998 21:50:51 +0200, "kbott" <kb...@metronet.de> wrote:
>
>[...]
>>
>>Mit der TImage geht es auch ... nur bei der TDBImage halt nicht ...
>>
>[...]
>>
>>Vieleicht haste ja noch einen Rat ... oder eine Stelle wo ich mich mal
>>hinwenden kann ...
>>
>>ich hoffe ja immer noch das ich selbst drauf komme ... Hoffentlich
bleibt
>>die Hoffnung erhalten ...
>
>Voraussetung:
>Die bei D3 mitgelieferten "jpeg-Units" sind eingebunden.
>
>Anmerk: Der Code stammt aus einem etwas komplizierterm Project. Die
>Zugriffe auf die Felder können natürlich auch einfacher vorgenommen werden.
>Aber das Prinzip sollte klar werden, hoffe ich...
>
Vielen Dank ... das werd ich mir gleich mal zu Gemüte führen ...
Korrekt !!
jil...@imagelib.com
> You don't need to be a millionaire to afford ImageLib. Buy it directly from
SkyLine Tools and receive free shipping to Germany. The Combo which is
$199.00 US ships with @theEdge FREE SPECIAL. The Edge used to sell for
$139.00. Remember you get what you pay for.
In article <6g87tv$nu8$1...@news.metronet.de>,
"kbott" <kb...@metronet.de> wrote:
>
>
> Eisi schrieb in Nachricht <35277cf9...@news.lynet.de>...
> >On Sun, 5 Apr 1998 10:47:45 +0200, "kbott" <kb...@metronet.de> wrote:
> >
> >>
> >Ich habe uebrigens auch auf einigen Homepages nach einer eventuellen
> >Komponente gesucht, jedoch dienen die alle lediglich der Anzeige oder
> >Konvertierung. Keine einzige beschaeftigt sich mit der Ablage der
> >Bilder in einer Datenbank.
> >
> >Manchmal habe ich wirklich das Gefuehl, man kann sich zum Thema Delphi
> >hunderte Buecher kaufen und immer noch nicht ueber alles Informiert
> >sein :)))
> >
>
> Wirst lachen ... ich habe auch gesucht ... und bin im AOL fündig geworden
> ...
> das Ding heisst : 'ImageLib' (www.imagelib.com) und kostet 300 .- :-)))
>
> da ich nicht rockefeller bin werde ich mir das nur ganz am ende kaufen ...
> also , wenn ich ganz am ende bin ...
>
> ich habe aber ne e-Mail von einem Coder aus Frankfurt bekommen, der muss
> Bilder im JPEG-Format komprimieren und der hat schon erfolgreich Blob´s
> geschrieben.
>
> Da weden wir mal ein 'BrainBuster-Meeting' veranstalten ... mal sehen was
> dabei herauskommt.
>
> ok ... bis dann
>
> Klaus
>
>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
Eisi
On Wed, 08 Apr 1998 15:36:17 -0600, jil...@imagelib.com wrote:
>
>> You don't need to be a millionaire to afford ImageLib. Buy it directly from
>SkyLine Tools and receive free shipping to Germany. The Combo which is
>$199.00 US ships with @theEdge FREE SPECIAL. The Edge used to sell for
>$139.00. Remember you get what you pay for.
>
>In article <6g87tv$nu8$1...@news.metronet.de>,
> "kbott" <kb...@metronet.de> wrote:
SNIP.......
WAAAAAAHHHHHHHHNNSINN ....
Wie hilfesbereit manche Leute doch sind :)) Aber was ich jetzt nicht
verstanden habe ist, ob ich die $139.00 jetzt auf mein Konto
ueberwiesen bekomme oder via Scheck. Und vor allem .... Wie packe ich
da ein JPEG-Bildchen rein ????? Ach, DELPHI ist ja soooooo schwer :(((
Bis denne dann .... Sven Eisenkraemer
Detlef Meister
> Jupp, das haben wir auch gewusst. Hier geht es aber explizit darum,
> JPEG-Bilder in Paradox-Tabellen abzuspeichern. Wohl gemerkt, als JPEG
> und nicht umgewandelt in BMP (wegen der Komprimierung, die ja bei
> einer Umwandlung in BMP verloren gehen wuerde!).
Is doch ganz einfach:
- JPEG-Bild als DATEI in einen Stream laden (LoadFromFile),
- den BLOB aus diesem Stream füllen.
Da ich meine Sourcen momentan nicht verfügbar habe, müßt Ihr schon mal
selber suchen...
Bye,
Detlef.