Caesar Verschlüsselung Probleme

[issejal]

hallo,
ich versuche gerade einen Text per Caesar-Verschlüsselung wie folgt zu verschlüsseln:

function decodeBuchstabe(c: Char): Char;
begin

case c of
'a' : Result := 'd';
'b' : Result := 'e';
'c' : Result := 'f';
...usw.

doch ich möchte noch einen beliebigen Schlüssel hinzufügen, so dass aus a auch e wird, wenn ich den schlüssel 4 eingebe.
ich weiß aber nicht, wie ich anfangen soll, darum bitte ich um hilfe.