Forum: Multimedia
Delphi
by Bbommel,
21. Mai 2009
Nein, wenn ich mich recht entsinne, funktionierte das vor D2009 nicht mit Widestrings, da hast du recht. In meiner Vor-D2009-Zeit hatte ich deswegen auch extra WideTextWidth (ich glaube, so hieß das) aus den TNT-Komponenten benutzen müssen. Jetzt in D2009 funktioniert es dann natürlich schon.
Forum: Multimedia
Delphi
by Bbommel,
19. Mai 2009
Nachtrag: Hab übersehen, dass TFont ja nicht kopiert wird. Damit das klappt, müsstest du dir also Font.Name und Font.Size in jeweils eine eigene Variable sichern, bei meinem Beispiel entsteht nur ein Zeiger auf das TFont-Objekt.
Forum: Multimedia
Delphi
by Bbommel,
19. Mai 2009
Alternativ fällt mir dazu ein: Du kannst von deinem Form das "Canvas" und dann dessen Methode "TextWidth" benutzen, um das rauszufinden.
Also z.B.:
procedure TForm1.MachIrgendwas;
var oldFont: TFont;
myWidth: integer;