[Neolane]

Сообщение от NumLock

используй StrUtils.AnsiUpperCase():

Код:

DWORD CharUpperBuff(
    LPTSTR lpsz,	// pointer to buffer containing characters to process 
    DWORD cchLength 	// number of characters to process  
   );

большое спасибо