Ein ganz normaler String

[ibp]

wie wäre es mit...

Delphi-Quellcode:

function ErsterGrossRestKlein(const Eingabe: String): String;
begin
  if Eingabe = '' then exit;
  result:=AnsiLowerCase(Eingabe);
  result[1]:=AnsiUpperCase(Eingabe[1]);
end;

[edit] fehler verbessert [/edit]