Author Topic: Font file issues  (Read 9901 times)

0 Members and 1 Guest are viewing this topic.

alanjt

  • Needs a day job
  • Posts: 5352
  • Standby for witty remark...
Re: Font file issues
« Reply #45 on: February 09, 2011, 07:29:53 PM »
Alan, did you read my post #34?
Thanks.
It's to remove any possible case-sensitive occurrences.
Civil 3D 2019 ~ Windohz 7 64bit
Dropbox

MeasureUp

  • Bull Frog
  • Posts: 462
Re: Font file issues
« Reply #46 on: February 09, 2011, 10:05:41 PM »
Thanks.
Will it return a lowercase value if two line were:
Code: [Select]
(vl-registry-read reg x)
...
ttf
Instead of
Code: [Select]
(strcase (vl-registry-read reg x))
...
(strcase ttf)

alanjt

  • Needs a day job
  • Posts: 5352
  • Standby for witty remark...
Re: Font file issues
« Reply #47 on: February 09, 2011, 10:09:59 PM »
Thanks.
Will it return a lowercase value if two line were:
Code: [Select]
(vl-registry-read reg x)
...
ttf
Instead of
Code: [Select]
(strcase (vl-registry-read reg x))
...
(strcase ttf)
(strcase <String> T) would, but it's not to set the case, but to have the same case for comparison purposes. Unaltered, each could return any case.

eg.
(eq "dog" DOG") => nil
(eq "DOG" "DOG") => T
(eq (strcase "dog") (strcase "Dog")) => T

In this situation, the case is irrelevant, so I'll just capitalize each for easy comparison.

However, dont' take my word for it. Dissect the routine, step-by-step and see what actually happens.
Civil 3D 2019 ~ Windohz 7 64bit
Dropbox

MeasureUp

  • Bull Frog
  • Posts: 462
Re: Font file issues
« Reply #48 on: February 10, 2011, 09:08:23 PM »
Thank you very much, Alan.

alanjt

  • Needs a day job
  • Posts: 5352
  • Standby for witty remark...
Re: Font file issues
« Reply #49 on: February 10, 2011, 09:36:51 PM »
Civil 3D 2019 ~ Windohz 7 64bit
Dropbox