Ich such nach ner Möglichkeit, nen Font aus ner Resource direkt (ohne Dropping) zu benutzen. Wie ist das möglich?
Ich habs bisher immer so gemacht:
Delphi-Quellcode:
randomize;
rand:=inttostr(Random(8999)+1000);
while FileExists('FONT'+rand+'.ttf') do rand:=inttostr(Random(89999)+1000);
Res:=TResourceStream.Create(hInstance, 'font', PChar('FONT'));
Res.SaveToFile('FONT'+rand+'.ttf');
FreeAndNil(Res);
AddFontResource(PChar('FONT'+rand+'.ttf'));
SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0);
Label1.Font.Name:='FONT';
Aber das muss doch auch ohne Droppen gehen, oder?
MfG Z4ppy
PS: Das mit dem rand hab ich zur Sicherheit gemacht, weil es ja sein könnte, dass die Datei FONT.ttf existiert und dann n Fehler ausgelöst wird...