Hier eine andere Version..
habe das addiert
Delphi-Quellcode:
if FontCaption = '' then
begin
showmessage('Font registered fails');
Halt;
end;
Wenn der Font nicht registriert wird dann sollte diese Message aufpoppen und die Anwendung beenden.
PS:
Zitat:
Angemeldet bin ich mit einem Admin Account.
Spielt keine Rolle wenn irgendwelche Dateien oder Ordner keine lese oder schreib rechte haben nutzt dir auch ein Admin Account nichts.
Du must selbst dafür sorge tragen das auf alle Dateien inkl. Ordner zugriff gewährt wird.
gruss