Re: Co s fonty ?

[Filip Doksansky <glassim@mbox.vol.cz>]

jerryp@bbs.infima.cz wrote:
> 
> TO: IN:AMIGA@K332.FELD.CVUT.CZ
> 
>     Hi,
> 
> >Nevite nekdo z pritomnych koderu, jak se vyhout tomu, zby vas
> >program hledal fonty ve svem vlastnim adresari a ne v FONTS: ?
> >Mam na mysli pouzitim diskfont.library Zkousel jsem mu zadat
> >relativni i absolutni cestu, ale kasle na me. Jediny co me
> 
>   A co otvira za soubory (tj.SnoopDos na nej) ?
> 
> >napadlo je, ze na tu chvili ,co si budu natahovat fonty, tak ten
> >FONTS: proste preassignuju, ale pripada mi to dost nechutny....
> >
> >               cau,FiDo of INSANITY
> 
>   Ja to mam vsechny specialni fonty reseny takhle:
> 
>        Assign FONTS: PROGDIR:fonts ADD
>        ... tady ten vlastni program
>        Assign FONTS: PROGDIR:fonts REMOVE
> 
>   To ma tu vyhodu, ze nic nepreassignujes a puvodni fonty
> jsou porad aktivni a v SYS:Fonts nemas chaos. Urcite to
> samy muzes udelat rovnou v tvym kodu (mrkni na novejsi
> funkce dos.library - urcite nejak pujde pridat cestu
> k assignu).
> 
>                        Jarda
> 
> --- AmiQwk 2.0 a#0

Uz to mam. Staci udelat Lock() na adresar, kde jsou fonty a
pak AssignAdd() a je to. Na konci zase RemAssignList() a 
odstrani to i ten Lock. Sice nechapu, proc u diskfont.library
neni mozno zadat ke jmenu fontu i trasu jako je to u OpenLibrary(),
ale budiz. Zrejme systemovi programatori od Commodora den pred tim
nekde chlastali a zde je vysledek :-)
 Jo a nejak nechapu vyznam PROGDIR: ? Ja pouzivam kombinaci
GetProgramDir() a CurrentDir() a jede to v pohode a svoje soubory
si to hleda v adresari, kde je ten program. K cemu ten PROGDIR:
vlastne je ?????

		cau,FiDo of INSANITY