Procedure oder Funktionsaufruf mit Wertveränderung

[Piro]

Moin,

ich möchte gerne einer Procedure einen Wert geben, welcher dann verarbeitet wird und danach wieder von der Procedure einer Varaiblen zugewiesen wird;

- die ganze Deklaration ist ok, benötige nur Hilfe bei der Werteübergabe

Delphi-Quellcode:

Procedure wortaendern (name: string);
begin
 name := name + '1234';
end;

Procedure Tform1.button1click(Sender: Objekt);
var
 neuer_name: string;
begin
 neuer_name := woraendern ('Sven');
end;

Irgendwie will das nicht. Was kann ich anders machen, damit es funktioniert.

Danke.