und was spricht gegen dein einfachen und bewährten Weg?
Delphi-Quellcode:
type
TMeinRekord = record
name: string;
nickname: string;
end;
var
MeinRekordArray: array[0..9] of TMeinRekord;
function EineFunktion(s: string): TMeinRekord;
...
function EineFunktion_nickname(s: string): string;
begin
result := EineFunktion(s).nickname;
end;
...
procedure irgendwas;
begin
EineFunktion_nickname('peter')
end;