deliphi Android 字体列表
时间: 2023-12-27 17:22:56 浏览: 21
很抱歉,我不是一个可以访问互联网的应用程序,因此无法为您提供完整的Delphi Android字体列表。
但是,在Delphi中,您可以使用以下代码来获取设备上可用的所有字体名称:
```delphi
uses
FMX.FontGlyphs;
procedure TForm1.Button1Click(Sender: TObject);
var
Fonts: TStrings;
I: Integer;
begin
Fonts := TFontGlyphManager.DefaultSystemFontFamilies;
Memo1.Lines.Clear;
for I := 0 to Fonts.Count - 1 do
Memo1.Lines.Add(Fonts[I]);
end;
```
这将填充Memo组件中的字体名称。希望这可以帮助您开始解决您的问题。
相关问题
deliphi 手机 字体列表
在Delphi中,可以使用以下代码获取Android设备上所有可用字体的列表:
```delphi
uses
Androidapi.JNI.GraphicsContentViewText,
Androidapi.JNI.JavaTypes;
function GetAndroidFontsList: TArray<string>;
var
TypefaceClass: JNIClass;
TypefaceObj: JObject;
FNames: TJavaObjectArray<JString>;
I: Integer;
begin
TypefaceClass := TJTypeface.JavaClass;
TypefaceObj := TJTypeface.JavaClass.create(TypefaceClass.getField(StringToJString('DEFAULT')).get(nil));
FNames := TypefaceClass.getMethod(StringToJString('getAvailableFontFamilies')).invoke(TypefaceObj, nil) as TJavaObjectArray<JString>;
SetLength(Result, FNames.Length);
for I := 0 to FNames.Length - 1 do
Result[I] := JStringToString(FNames.Items[I]);
end;
```
这将返回一个字符串数组,其中包含设备上可用的所有字体名称。希望这可以帮助您开始解决您的问题。
deliphi 字体列表
如果您是在查询 Delphi 可用的字体列表,可以使用以下代码:
```delphi
var
i: Integer;
begin
for i := 0 to Screen.Fonts.Count - 1 do
begin
// 输出字体名称
ShowMessage(Screen.Fonts[i]);
end;
end;
```
这段代码将会输出当前系统上所有可用的字体名称。
如果您的问题不是这个,请您提供更详细的问题描述,我会尽力帮助您。