Изменить регистр строки

external(VOID, "upper", "upper", pathfolder()+"string_register.dll");
external(VOID, "lower", "lower", pathfolder()+"string_register.dll");

string s;
char result[9999]; // размер массива должен быть не меньше длины строки + 1

s="В нижний регистр, To lowercase";
lower(s, size(s), address(#result[0]));
messagebox(format(#result[0]));

s="В верхний регистр, To uppercase";
upper(s, size(s), address(#result[0]));
messagebox(format(#result[0]));