AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Verwirrung um TImage und den DPI Wert
Thema durchsuchen
Ansicht
Themen-Optionen

Verwirrung um TImage und den DPI Wert

Ein Thema von Athris · begonnen am 18. Okt 2017 · letzter Beitrag vom 10. Apr 2024
Antwort Antwort
Athris

Registriert seit: 18. Nov 2014
28 Beiträge
 
Delphi XE2 Professional
 
#1

Verwirrung um TImage und den DPI Wert

  Alt 18. Okt 2017, 14:47
Guten Nachmittag,

vorweg muss ich gestehen dass ich in Sachen Bildbearbeitung in Delphi noch sehr neu bin.

Kurz zu meinem Projekt:
Mein aktuelles Hobby Projekt geht in die Richtung Bildbearbeitung.
Über einen Dialog lasse ich den Benutzer Länge und Breite seines Werkes in Pixel einstellen und passe dementsprechend Width und Length meines TImages an.
Auf diesem TImage kann der Benutzer Labels platzieren, andere Bilder oder halt drauf herummalen.
Die Speicherung des Bildes verläuft über TImage.Picture.SaveToFile ab.

Jetzt habe ich festgestellt, dass laut Windows die erzeugten Bilder stets eine DPI Anzahl von 96 DPI besitzen (laut Suche ist dies der Standard für Monitore). Jetzt würde ich aber gerne die Bilder auch für den Druck verwenden, bei dem eher Richtung 300 DPI gegangen wird. Aus dieser Problematik entstehen meine Fragen:
1. Gibt es die Möglichkeit die DPI Zahl eines TImages festzusetzen?
2. Gibt es eventuell sogar die Möglichkeit, dass der Benutzer (wie bei Photoshop) selbst einen DPI Wert angibt?
3. Mache ich vielleicht etwas bei der Speicherung falsch?

Ich weiß natürlich das DPI generell für Dots per Inch steht, also angibt aus wie vielen Pixeln ein Inch besteht. Aber dennoch verwirrt mich das Thema etwas.
Wie machen dass den andere Grafikanwendungen?


Meine Verwirrung wird noch einmal von folgendem Szenario unterstrichen:
1. Ich möchte eine Grafik erstellen die beim Ausdruck 5,90x9,10cm groß ist
2. Ich erstelle also in meinem Programm eine Grafik mit den Maßen 697x1075 Pixel. Die Grafik erhält nach der Speicherung laut Windows 96 DPI
2. In Photoshop erstelle ich die selbe Grafik mit den selben Maßen, aber bei DPI gebe ich 300 an
3. Ich öffne beide Grafiken in Paint und klicke auf DRUCKEN / SEITE EINRICHTEN. Dort gebe ich an das Paint nicht skalieren soll (also 100% Größe)
4. Beim Druck ist mein erstes Bild mit 96 DPI eine ganze DIN A4 Seite groß, während das zweite Bild aus Photoshop die perfekte Größe hat... 5,9 x 9,1 cm

Geändert von Athris (18. Okt 2017 um 14:54 Uhr)
  Mit Zitat antworten Zitat
Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.108 Beiträge
 
Delphi 2009 Professional
 
#2

AW: Verwirrung um TImage und den DPI Wert

  Alt 18. Okt 2017, 20:13
Welches Dateiformat verwendest du?
Lade die Grafiken mal hier hoch, dann kann man die binär analysieren.
Janni
2005 PE, 2009 PA, XE2 PA

Geändert von Redeemer (18. Okt 2017 um 20:17 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#3

AW: Verwirrung um TImage und den DPI Wert

  Alt 18. Okt 2017, 20:43
Meine Verwirrung wird noch einmal von folgendem Szenario unterstrichen:
1. Ich möchte eine Grafik erstellen die beim Ausdruck 5,90x9,10cm groß ist
2. Ich erstelle also in meinem Programm eine Grafik mit den Maßen 697x1075 Pixel. Die Grafik erhält nach der Speicherung laut Windows 96 DPI
2. In Photoshop erstelle ich die selbe Grafik mit den selben Maßen, aber bei DPI gebe ich 300 an
3. Ich öffne beide Grafiken in Paint und klicke auf DRUCKEN / SEITE EINRICHTEN. Dort gebe ich an das Paint nicht skalieren soll (also 100% Größe)
4. Beim Druck ist mein erstes Bild mit 96 DPI eine ganze DIN A4 Seite groß, während das zweite Bild aus Photoshop die perfekte Größe hat... 5,9 x 9,1 cm
Für mich ist das das erwartete Verhalten ... aber zur Erklärung:

Die Bilder auf dem PC sind ja alle in Pixel-Maßen. Die dpi-Angabe ist davon separat im Bild gespeichert und gibt lediglich die Anregung, wie groß das Bild später bei einem eventuellen Druck sein soll.

Also beim Druck wird geguckt: Ah ja, in dem Bild stehen 150 dpi drin, dass sollen wohl 150 Pixel von dem Bild auf einen Zoll skaliert werden. Irgendeine Skalierung findet da ja immer statt, weil beim Erstellen des Bildes meistens nicht klar ist, welche Auflösung das Ausgabemedium hat.
Um dein Bild nicht nur am Bildschirm, sondern auch auf dem Papier auf die gewünschte Größe zu bekommen, musst du einen passenden dpi-Wert im Bild speichern. Falls Delphi da nichts bereit stellt: https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx
Du kannst auch nachträglich die Bitmap (/was auch immer) Datei öffnen und den Wert schreiben.
  Mit Zitat antworten Zitat
Athris

Registriert seit: 18. Nov 2014
28 Beiträge
 
Delphi XE2 Professional
 
#4

AW: Verwirrung um TImage und den DPI Wert

  Alt 19. Okt 2017, 09:26
Also verstehe ich das richtig, dass der unter EIGENSCHAFTEN aufgelistete DPI Wert nur ein Hinweiswert für z.B. eine Applikation oder ein Drucker ist?

Das heißt ich müsste bei der Neuerstellung eines Bildes den Benutzer nach dem gewünschten DPI Wert fragen und diese beim Speichern des Bildes in die Datei reinschreiben?

Grundsätzlich speichere ich meine Bilder zurzeit so:
Delphi-Quellcode:
function SaveImage(vstrImagePath: String; vpntImage: TPicture): boolean;
var
  strDateiendung: string;
  pntBitmap: TBitmap;
  pntJPEGImage: TJPEGImage;
  pntPNGImage: TPngImage;
begin
  Result := False;
  pntBitmap := TBitmap.Create;
  try
    try
      pntBitmap.Assign(vpntImage);
      strDateiendung := UpperCase(ExtractFileExt(vstrImagePath));
      if strDateiendung = '.BMPthen begin
        pntBitmap.SaveToFile(vstrImagePath);
        Result := True
      end
      else if strDateiendung = '.PNGthen begin
        pntPNGImage := TPngImage.Create();
        try
          pntPNGImage.Assign(pntBitmap);
          pntPNGImage.SaveToFile(vstrImagePath);
          Result := True;
        finally
          pntPNGImage.Free;
        end;
      end
      else if (strDateiendung = '.JPG') or (strDateiendung = '.JPEG') then begin
        pntJPEGImage := TJPEGImage.Create();
        try
          pntJPEGImage.Assign(pntBitmap);
          pntJPEGImage.SaveToFile(vstrImagePath);
          Result := True;
        finally
          pntJPEGImage.Free;
        end;
      end;
    except on
      E:Exception do begin
        MessageDlg('Fehler beim Speichern der Grafikdatei '+vstrImagePath+': '+E.Message, mtError, [mbOk], 0);
      end;
    end;
  finally
    pntBitmap.Free;
  end;
  Mit Zitat antworten Zitat
TiGü

Registriert seit: 6. Apr 2011
Ort: Berlin
3.071 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Verwirrung um TImage und den DPI Wert

  Alt 19. Okt 2017, 10:20
Das heißt ich müsste bei der Neuerstellung eines Bildes den Benutzer nach dem gewünschten DPI Wert fragen und diese beim Speichern des Bildes in die Datei reinschreiben?
Ja, so wie das die Programme auch machen (bzw. einen Default-Wert annehmen).
Das hier sollte dich auf die richtige Spur führen:
http://www.delphipraxis.net/913313-post14.html
  Mit Zitat antworten Zitat
Athris

Registriert seit: 18. Nov 2014
28 Beiträge
 
Delphi XE2 Professional
 
#6

AW: Verwirrung um TImage und den DPI Wert

  Alt 19. Okt 2017, 10:48
Grundsätzlich kann ich also beim Speichern meinem Bitmap dieses "Flag" setzen und dann die Datei als .bmp speichern oder auch als .png bzw. .jpg (siehe meine gepostete Funktion)?
  Mit Zitat antworten Zitat
Antwort Antwort

 

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:46 Uhr.
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 by Thomas Breitkreuz