tja, ich habe zwar absolut keine ahnung warum ich diese faktoren brauche (habe die jetzt mal mit testen rausbekommen) aber das ergebnis sieht schon mal zu 99% gut aus (ganz kleine abweichungen sind noch drinnen) - werde es noch mal mit mehr texte probieren
Delphi-Quellcode:
scale := 0.971;
M := TGPMatrix.Create;
M.Reset;
M.Translate(-0.184*fFontHeight, 0, MatrixOrderAppend);
M.Scale(scale, 1, MatrixOrderAppend);
M.Translate((1-scale)*(X), 0, MatrixOrderAppend);
fPath.transform(M);
M.Free;
ich weiss, ich könnte die zwei translate zusammenfassen, aber so ist es wenigstens etwas übersichtlich ...