delphi 英文字母大小写转换

function UpperCase(const S: string): string;转大写

function LowerCase(const S: string): string;转小写

function UpperCase(const S: string): string;转大写

function LowerCase(const S: string): string;转小写

举例:
var
ss,s: string;
begin
ss := 'Delphi';
s := UpperCase(ss);
ShowMessage(s); //DELPHI

s := LowerCase(ss);
ShowMessage(s); //delphi
end;

要求:有一定长字符串(8个英文字母),
要求对其中任意字个数进行大小写转换生成新的字符串.
请问该如何实现.
原串:abcdefg

要求结果:
Abcdefg
AbcdefG
abcdefG
AbcdeFg
abcdeFg
AbcdeFG
abcdeFG
AbcdEfg
abcdEfg
....之类

.....
这样子

就是模拟二进制数据的进位关系
总共是2^8种可能（包含原始字符串）
做一个256此的循环，根据循环控制变量的位标志来改变大小写状态就可以了

char * pStr;
// pStr = "abcdefgh" // 假定初始字符串全部是小写的

char * pTemp = new char[9];
memset(pTemp, 0, 9);
for ( int i=0; i<256; i++ )
{
strcpy(pTemp, pStr, 8);
for ( int j=0; j<8; j++)
{
int flag = 1< if ( i & flag )
pTemp[j] -= 0x20; // 小写字母和大写字母在ascii上面差值就是0x20
}
printf("%s\n", pTemp);
}
delete pTemp;

大写
AnsiUpperCase
小写
AnsiLowerCase

支持Unicode，比起UpperCase,LowerCase 避免很多情况出现乱码。

用字符转换函数，你上网查查看，我以前就试过，现记不清具体函数名称了