Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Wie kann ich jpeg#s in D3 einlesen? (https://www.delphipraxis.net/26576-wie-kann-ich-jpeg-s-d3-einlesen.html)

bruno01 28. Jul 2004 22:05

Re: Wie kann ich jpeg#s in D3 einlesen?
 
Hallo Norton,
leider,leider es geht nicht, er erkennt das jpeg-format nicht.
:cry: :cry:

scp 28. Jul 2004 22:41

Re: Wie kann ich jpeg#s in D3 einlesen?
 
Zitat:

Zitat von bruno01
Hallo Norton,
leider,leider es geht nicht, er erkennt das jpeg-format nicht.
:cry: :cry:

Welche Fehlermeldung gibt es denn genau? hast du die Unit JPEG in der uses? Ich kann dein Problem nämlich nicht nachvollziehen, habe den Code so in einem neuen Projekt in D3 Pro getestet, ging einwandfrei.

fkerber 29. Jul 2004 01:36

Re: Wie kann ich jpeg#s in D3 einlesen?
 
Liste der Anhänge anzeigen (Anzahl: 1)
HI!

Habe das mal mit D3 programmiert und angehängt.

Ciao fkerber

bruno01 29. Jul 2004 05:47

Re: Wie kann ich jpeg#s in D3 einlesen?
 
Hallo fkerber,
das klappt auch bei mir, danke für die Hilfe. :-D

Ich habe immer mit OpenPictureDialog DBImages gearbeitet, weil ich das Bild ja in eine Datenbank (Paradoxtabelle) speichern will und das klappt eben nicht. Kann ich den mit Deiner Variante auch für die DB benutzen? :?:

Die vielen Downloads zeigen, dass dieses Thema mehrere Usern interessiert.
Nochmals Danke. :bouncing4:

fkerber 29. Jul 2004 06:04

Re: Wie kann ich jpeg#s in D3 einlesen?
 
Hi!

Die vielen Downloads? 4? naja, immerhin noch 3 andere.
Ich kenne mich mit DB leider nicht aus, am Besten du postest es als seperate Frage im DB-Forum.


Ciao fkerber

bruno01 29. Jul 2004 06:23

Re: Wie kann ich jpeg#s in D3 einlesen?
 
OK fkerber
gehe in das DB-Forum, mal sehen ob ich weiterkomme. :P

mikhal 29. Jul 2004 07:45

Re: Wie kann ich jpeg#s in D3 einlesen?
 
Weiter oben wurde eine Laderoutine angeboten, eventuell mußt du sie erweitern:

Code:
procedure LadeJpg(FileName: String; Bild: TBitMap);
  var Jpeg: TJpegImage;
begin
  Jpeg:=TJpegImage.Create;
  try // unbedingt in einen Exception-Block fassen
    jpeg.LoadFromFile(filename);
    jpeg.DibNeeded; // <- Bitmap erzeugen!
    Bild.Assign(Jpeg);
  finally
    jpeg.free;
  end;
end;
Grüße
Mikhal


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:29 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz