[Allegro] Kontrolle von Font-Installation

[Thomas Berger]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Liebe Liste,

| auf Herrn Allers' Frage hin habe ich eine andere Loesung ausprobiert,
| die mich noch eleganter deucht, weil sie nicht fuer nur alle
| Windows-Betriebssysteme funktioniert, sondern auch die Faelle abdeckt,
| in denen das Betriebssystem nicht auf c: liegt. Dergleichen gibt's ja
| leider durchaus. Folgende Zeilen habe ich in _START.FLX geschrieben:
|
| +++++++++++++++++++++++
|
| get env windir
| ins #uev
| var #uev "\\fonts\\a-times.ttf"
| fsize
| if no jump info
| jump weiter
|
| :info
| var "Die Fonts sind nicht installiert ..."
| ansi
| mes
|
| :weiter
|
| +++++++++++++++++++++++

zum Vergleich die entsprechenden Zeilen aus _start.flx der
Demodatenbank, die Herrn Allers zu seiner Frage provozierten:

|>>
get env windir
var +"\\fonts\\a-letter.ttf"
ftime
if not no jump fertig
var "Auf Ihrem PC sind die allegro-Schriften nicht installiert"
var + n n "Empfehlung: Damit Index und Kurzliste brauchbar aussehen,"
var + n "stellen Sie über 'Optionen / Datenfont' die Schrift 'Courier
New' ein"
var + n n "Oder lassen Sie sich die allegro-Schriften installieren"
ansi
mes

:fertig
<<<

viele Gruesse
Thomas Berger
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.3-nr1 (Windows XP)
Comment: Using GnuPG with Thunderbird - http://enigmail.mozdev.org

iD8DBQFCDz4KENVh3bB0lwMRAjZaAKCb9VRj3qae8/J3A/4Mxo2vMo/32QCgk8DH
6Qp2p64mjRf6ssevOYSSe4Q=
=hF3n
-----END PGP SIGNATURE-----