Abfrage ob Schriftart installiert?
-
Hallo,
ich kann mit Printer()->Canvas->Textout->Font u.s.w. eine Schriftart zuweisen.
Wie kann ich überprüfen, ob diese überhaupt auf dem Rechner verfügbar ist?
Vielen Dank
-
Siehe BCB-Hilfe:
TScreen::Fonts
TPrinter::Fonts
-
Vielen Dank für die schnelle Antwort. Ich habe es jetzt so gemacht. Ist doch ok, oder?
String Schriftart="Lucida Console"; bool Schrift = false; for (int i = 0; i < Printer()->Fonts->Count && !Schrift; i++) { if (!(Schriftart.AnsiCompare(Printer()->Fonts->Strings[i]))) Schrift=true ; } if (Schrift) ShowMessage("Schrift installiert"); else ShowMessage("Schrift nicht installiert");Edit:
Bitte die Code-Tags benutzen. Danke![ Dieser Beitrag wurde am 28.02.2003 um 11:48 Uhr von Jansen editiert. ]
-
Das geht noch etwas einfacher:
... if (Printer()->Fonts->IndexOf(Schriftart) >= 0) Schrift == true; ...
-
Das Ganze noch etwas kürzer (genau ein Zeichen weniger *g*) und noch etwas schöner (meiner Ansicht nach, da sich so schneller ablesen lässt auf was eigentlich getestet wird):
... if (Printer()->Fonts->IndexOf(Schriftart) > -1) Schrift = true; ...-junix
[ Dieser Beitrag wurde am 28.02.2003 um 13:11 Uhr von junix editiert. ]
-
Schift**==**true;
-
Jo, Jansen, solltest dich was Schämen
-junix
-
Hab ich doch letztens schon gesagt, meine Tasttatur ist nicht richtig entprellt.
-
Mit'm Alter geht's Zittern los!
-
sprichts du aus Erfahrung??
Altenburger!
Nimms nicht ernst!
viele Grüße
dose
-
Nööööö,
Ich bin so alt, da zittert nichts mehr!
Gut seh'n kann ich schlecht, aber schlecht hören kann ich gut!!! :p
PS: Hi Dose, wie ist das bei Dir jetzt mit Dosenpfand? :p
[ Dieser Beitrag wurde am 28.02.2003 um 21:03 Uhr von DerAltenburger editiert. ]