Weiß jemand wie man den font (size, name, usw. ) von dem "Text" teil in einem LisboxItem herausfinden kann ohne das styling zu deaktivieren?
Delphi-Quellcode:
//Maxwidth ermitteln
var aMaxTextWidth:Extended := 0.0;
var aTextWidth : Extended := 0.0;
var Bmp:FMX.Graphics.TBitmap := FMX.Graphics.TBitmap.Create;
try
Bmp.canvas.Font.Assign(aListbox.ListItems[0].TextSettings.Font);
For var i:Integer := 0 to aListbox.Items.Count-1 do
Begin
aTextWidth := Bmp.canvas.TextWidth(aListbox.ListItems[i].Text);
if aTextWidth > aMaxTextWidth then
aMaxTextWidth := aTextWidth;
End;
finally
Bmp.Free;
end;
aListbox.ListItems[0].TextSettings.Font ist offensichtlich nicht der Font der benutzt wird
aListbox.StylesData['text.font.size'] oder so?
Ich will nicht das Styling des fonts deaktivieren oder bestimmen, sondern den tatsächlich verwendeten Font ermitteln.