ok, wollen wir mal nicht so sein
Strings teilen kannst du zB mit Copy.
Delphi-Quellcode:
Key1 := Copy(MeinText, 1, length(MeinText) div 2);
Key2 := Copy(MeinText, length(MeinText) div 2, length(MeinText) div 2);
Kann sein das hier mal ein Buchstabe am Anfang/Ende verschluckt wird...ich hab das grad nicht getestet^^