字体(10分)

可爱 · 2008-03-14

我用delphi要删除一字体怎么办

power255 · 2008-03-14

把Fonts文件夹的文件删除。

可爱 · 2008-03-14

用deletefile函数删除不掉

power255 · 2008-03-14

用RemoveFontResource　

liyinwei · 2008-03-14

RemoveFontResource(PChar('facelift.ttf'));
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);

可爱 · 2008-03-15

字体文件的路径是什么

power255 · 2008-03-17

字体文件的路径是
%windir%/Fonts
%windir%是你所装系统的WINDOWS文件夹，可以直接用%windir%

可爱 · 2008-03-17

还有我用deletefile怎么删不掉字体文件

power255 · 2008-03-17

因为你删的字体文件在使用中，不是所有的字体都能删除的。

可爱 · 2008-03-17

%windir%delphi识别不了

power255 · 2008-03-17

......
那你把%windir%改为C:/WINDOWS

可爱 · 2008-03-17

这才能识别,如果系统不装在C:呢
怎么得到字体路径
你那是系统装在C盘

power255 · 2008-03-17

忘记了，你用GetWindowsDirectory函数吧
var
sysdir:array[0..254] of char;
begin
GetWindowsDirectory(sysdir,255);
ShowMessage(strpas(sysdir));
end;