On 9/4/2014 3:03 PM, Mark Shapiro wrote:

Mark,

> The UpperCase() and AnsiStrUpper functions both work properly. I also tried your suggestion of changing the locale in Control Panel, restarting Windows, changing it back to United States,and restarting. No change.

I guess it's not going to be that easy then.

> Let me come back again to DBSYS. Since the UPPER() and LOWER() functions work correctly in that utility, what is different about the implementation there compared with a DBISAMQuery component?

Like Jose said the only difference is that they were compiled with
Delphi 5 and dbisam delphi 5 components on another machine. Otherwise
the operation of the DBISAMQuery should be identical (in fact you have
dbsys source code so you could in theory recompile it).

So just to recap what happens :
- dbsys on your win8 dev machine : CORRECT operation
- UpperTest.exe on your win8 dev machine : ERROR (uppercase not working)
- UpperTest.exe on other computers (like mine) : CORRECT (I ran your
compiled exe "as is")

is this correct ?

It's kind of bizzare but we have something of a mystery :
- your app woks fine everywhere but your machine points towards
locale/OS issue on your machine.
- yet dbsys works ok on your machine pointing away from OS issue

Raul

Raul,

>So just to recap what happens :
>- dbsys on your win8 dev machine : CORRECT operation
>- UpperTest.exe on your win8 dev machine : ERROR (UPPER() SQL function not working)
>- UpperTest.exe on other computers (like mine) : CORRECT (I ran your
>compiled exe "as is")

>is this correct ?

Yes.

Mark

Skimming back through the thread I don't think anyone has asked this (if they have I apologise) - does UpperCase work correctly in Delphi?

If it does what about writing a custom function to replace UPPER?

I'm not sure you can overwrite it but at the worst you could have a function UPPEREx.

If you're not sure how to write custom functions I can write it here but you'll have to compile at your end since I only have an older version of DBISAM and D6.



Roy Lambert

Roy,

Thank you. I'd like to take you up on your offer to draw up a custom function.

Mark Shapiro
infocus@swbell.net

Mark


Use these with the rest of your example and let us know what happens.

Roy Lambert

Mark


Did my function work?


Roy Lambert