16 lines
336 B
Batchfile
16 lines
336 B
Batchfile
/* */
|
|
call RxFuncAdd "SysLoadFuncs", "RexxUtil", "SysLoadFuncs"
|
|
call SysLoadFuncs
|
|
|
|
app = "PM_Font_Drivers"
|
|
key = "TRUETYPE"
|
|
|
|
val = SysIni('USER', app, key)
|
|
|
|
if val = "ERROR:" then val = "none"
|
|
/* strip the terminating NULL character */
|
|
else val = substr(val, 1, pos(d2c(0), val) - 1)
|
|
|
|
say 'The current TrueType driver is ' || val
|
|
pause
|