Kombination der Groß-Klein Buchstaben

[gizzy]

Unter Unix sind ja namen wie "Datei" und "DatEi" unterschiedlich.
Wie kann ich also per algorhytmus alle Kombination heraus finden?
Heißt für: "aaa" gibt es die Möglichkeiten => "Aaa", "aAa", "aaA", "aAA", "AAA", "AAa", "AaA", "aaa".

Mir gehen langsam die Ideen aus..

das hatte ich bisher, bringt mir aber nur einen Teilen der möglichkeiten und dann noch doppelt:

Delphi-Quellcode:

name:= 'aaa';
  For i:=1 to Length(name) do begin
    Sub:= Copy(name,i,1);
    dahinter:= Copy(name, i+1,Length(name)-i+1);
    davor:= Copy(name, 1, i-1);
    chars[i-1]:= sub;
    charsend[i-1]:=dahinter;
    charsbegin[i-1]:= davor;
  end;
  For i:=0 to Length(name)-1 do begin
    SetLength(triesup,Length(triesup)+1);
    triesup[i]:= charsbegin[i] + AnsiLowerCase(chars[i]) + charsend[i];
  end;
  For i:=0 to Length(name)-1 do begin
    SetLength(triesdown,Length(triesdown)+1);
    triesdown[i]:= charsbegin[i] + AnsiUpperCase(chars[i]) + charsend[i];
  end;

Vielleicht gibt ja schon eine Lösung, habe leider über die Suchfunktion nichts gefunden.
Kann ja sein das einer von euch eine Idee hat.

Viele Grüße!