Procedure oder Funktionsaufruf mit Wertveränderung
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:
Irgendwie will das nicht. Was kann ich anders machen, damit es funktioniert.
Procedure wortaendern (name: string);
begin name := name + '1234'; end; Procedure Tform1.button1click(Sender: Objekt); var neuer_name: string; begin neuer_name := woraendern ('Sven'); end; Danke. |
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Du must den Parameter als var Name deklarieren, dann gehts.
|
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Delphi-Quellcode:
Procedure wortaendern ( {-->} var {<--} name: string);
begin name := name + '1234'; end; Procedure Tform1.button1click(Sender: Objekt); var neuer_name: string; begin neuer_name := woraendern ('Sven'); end; |
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Du kannst mit Hilfe einer Funktion machen;
Delphi-Quellcode:
oder mit einer Prozedur mit Var-Parameter:
function wortaendern (name: string): string;
begin Result := name + '1234'; end;
Delphi-Quellcode:
!!Achtung: Nur bei einer Funktion bekommst du einen Rückgabewert!!
procedure wortaendern (var name: string);
begin name := name + '1234'; end; |
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Sagt mal, wie oft wird denn hier NOCH die selbe Antwort hingeschrieben?
|
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Aufruf für Funktion:
Delphi-Quellcode:
Aufruf für Prozedur:
Procedure Tform1.button1click(Sender: Objekt);
var neuer_name: string; begin neuer_name := woraendern ('Sven'); end;
Delphi-Quellcode:
Beiden hat des selben Effekt! :stupid:
Procedure Tform1.button1click(Sender: Objekt);
var neuer_name: string; begin neuer_name := 'Sven'; woraendern (neuer_name); end; |
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Danke für die zahlreiche Hilfe.
Schönes Wochenende. |
Re: Procedure oder Funktionsaufruf mit Wertveränderung
@daywalker299: Danke dir auch! 8)
|
Re: Procedure oder Funktionsaufruf mit Wertveränderung
Delphi-Quellcode:
wird garantiert nicht funktionieren, weil nicht deklariert wurde welchen Rückgabewert die Funktion liefern soll...
function wortaendern (name: string);
begin Result := name + '1234'; end;
Delphi-Quellcode:
function wortaendern (name: string){-->}: string{<--};
begin Result := name + '1234'; end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:22 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz