Einzelnen Beitrag anzeigen

Gruber_Hans_12345

Registriert seit: 14. Aug 2004
1.426 Beiträge
 
Delphi 2007 Professional
 
#1

GDI+ GDIPOBJ PNG Farbraum

  Alt 4. Aug 2020, 09:44
Hallo, ich habe ein kleines Problem mit PNG die ich mit Delphi und GDI+ (GDIPOBJ) zeichnen lassen möchte und zwar zeigt er mir in dem gezeichneten Bild kein weiss an, sondern ändert die Farbe in ein sehr helles grau.

mein simplester Code
Delphi-Quellcode:
procedure TForm27.Button3Click(Sender: TObject);
var
    FStream : TMemoryStream;
    SA : TStreamAdapter;
    FImage : TGPImage;
    Graphs : TGPGraphics;
begin
    FStream := TMemoryStream.Create;
    FStream.LoadFromFile('d:\test.png');
    FStream.Position := 0;
    SA := TStreamAdapter.Create(FStream, soReference);
    FImage := TGPImage.Create(SA, TRUE);
    //FImage := TGPImage.Create(SA, FALSE);
    PAintBox1.Canvas.Brush.Color := clWhite;
    PAintBox1.Canvas.FillREct(REct(0,0,200,200));
    Graphs := TGPGraphics.Create(PaintBox1.Canvas.Handle);
    Graphs.DrawImage(fImage, 10, 10);
    Graphs.Free;
    fImage.Free;
    fStream.Free;
end;
Ich vermute das er irgendwie irgendwo einen Farbraum definiton oder co hat, aber egal wie ich das PNG abspeichere das graue statt weiss bleibt.

Hat noch wer Tipps was ich da testen kann?
Gruss Hans

2B or not 2B, that is FF
  Mit Zitat antworten Zitat