Thema: Delphi GDI Plus

Einzelnen Beitrag anzeigen

Gruber_Hans_12345

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

GDI Plus

  Alt 17. Feb 2005, 11:29
Kennt sich wer mit GDI Plus aus ?

Möchte gerne eine Metafile reinladen, und dann mit den Antialising sachen (Text Antialiasd, Smoothing bei Linien, TextContrast ... ) zeichnen

Delphi-Quellcode:
        fGraphics := TGPGraphics.Create(x.Canvas.Handle);
        if cbAA.Checked then begin
            fGraphics.SetTextRenderingHint(TextRenderingHintAntiAlias);
            fGraphics.SetSmoothingMode(SmoothingModeHighQuality);
            fGraphics.SetTextContrast(9);
            fGraphics.SetCompositingQuality(CompositingQualityHighQuality)
        end;
        thisTick := GetTickCount;

// fGraphics.EnumerateMetafile(GDIMetaFile, MakeRect(toRect.Left, toREct.Top, toRect.Right, toRect.Bottom), metaCallback, GDIMetaFile);
        fGraphics.DrawImage(GDIMetaFile, MakeRect(toRect.Left, toREct.Top, toRect.Right, toRect.Bottom) );
        tick2 := GetTickCount;

        fGraphics.Free;
funktioniert leider nicht (es wird zwar gezeichnet, aber die Rendering einstellungen sind egal)

zum Testen habe ich dann noch folgendes probier

Delphi-Quellcode:
function metaCallback(recordType : TEmfPlusRecordType; flags : UINT; dataSize : UINT; data : PBYTE; callbackData : pointer) : BOOL; stdcall;
begin
    fGraphics.SetTextRenderingHint(TextRenderingHintAntiAliasGridFit);
    fGraphics.SetSmoothingMode(SmoothingModeHighQuality);
    fGraphics.SetTextContrast(9);
    fGraphics.SetCompositingQuality(CompositingQualityHighQuality);


// if (recordType <> EmfRecordTypeExtTextOutW) then
    begin
        TGPMetafile(callbackData).PlayRecord(recordType, flags, dataSize, Data);
    end;
    result := TRUE;
end;

        fGraphics.EnumerateMetafile(GDIMetaFile, MakeRect(toRect.Left, toREct.Top, toRect.Right, toRect.Bottom), metaCallback, GDIMetaFile);
Es wird die Callback funktion aufgerufen (habe zum Testen mal die TextOut nicht weitergeleitet) aber auch dort funktionieren die Einstellungen nicht.
Gruss Hans

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