есть процедура, которая заменяет буквы нижнего регистра в верхний и наоборот??
например: a --> A или B --->b

function StrUpper(Str: PChar): PChar;

function UpCase(Ch: Char): Char;

Есть...
UpperCase/LowerCase или AnsiUpperCase/AnsiLowerCase

А как ими правильно пользоваться?
допустим у меня есть строка: sdAFAdFw fd d
мне надо получить: Sdafadfw fd d

как правильно сделать?

s := 'sdAFAdFw fd d';
s := Upcase(s[1]) + LowerCase(copy(s, 2, length(s))); // <-- Если только с латинскими символами

спасиба, разобрался....

у меня ещё один вопрос есть: как к множеству прибавить букву из строки?
например:

s:string;
d:set of char;

d:=d+s[i]

или

d:=s[i];

как сделать?

d := d + [s[i]];

или

Include(d, s[i]);

а как вывести в Memo множество?

Memo1.Lines.Add(floatTostr(d));

????????

Посимвольно:

for ch := #0 to #255 do
  if ch in d then memo1.lines.add(ch);