Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Variable über funktionsnamen zurückgeben (https://www.delphipraxis.net/13079-variable-ueber-funktionsnamen-zurueckgeben.html)

Thorben86 10. Dez 2003 15:08


Variable über funktionsnamen zurückgeben
 
Hi, ich möchte bei einer selbst definierten Funktion das ergebnis über den Procedurenamen zurückgeben. Kann mir einer sagen, wie ich das mache? :wiejetzt:

Beispiel:
Delphi-Quellcode:
procedure Tf_raten.raten(eingabe,schluessel:string);
begin
...
end;
Hierbei werden eingabe und schluessel beim aufrufen übergeben
Es soll ein String übergeben werden.

SleepyMaster 10. Dez 2003 15:10

Re: Variable über funktionsnamen zurückgeben
 
Delphi-Quellcode:
procedure Tf_raten.raten([b]var[/b] eingabe,schluessel:string);
begin
eingabe:='xyz';
end;
[edit=Admin]Delphi-Tags eingefügt. Künftig bitte selber machen. ;-) Mfg, Daniel[/edit]

Thorben86 10. Dez 2003 15:26

Re: Variable über funktionsnamen zurückgeben
 
das ist ne möglichkeit

SleepyMaster 10. Dez 2003 15:28

Re: Variable über funktionsnamen zurückgeben
 
Joahr! Söllte ed sein! ;)

Stanlay Hanks 10. Dez 2003 15:30

Re: Variable über funktionsnamen zurückgeben
 
Hi. Solche Prozeduren nennt man auch Funktionen. :wink: Funktionen geben ihren Rückgabewert im Funktionsnamen (oder in Funktionsinternen Variable "Result", läuft aber glaub ich aufs gleiche raus) zurück.

Bsp:

Delphi-Quellcode:
function Raten(Eingabe, Schlüssel : String) : Boolean; //Rückgabewert angeben, sonst meckert der Compiler (verständlicherweise)
begin
IF
.
.
. //Wenn die Entschlüsselung stimmt
THEN
Raten := true
end;
Aufrufen kannst du das dann mit:

Delphi-Quellcode:
Form1.Visible := Raten('Hallo Welt','Hallo DP'); //Wenn Raten = true dann Form sichtbar.
Man liest sich, Stanlay :hi:

SleepyMaster 10. Dez 2003 15:35

Re: Variable über funktionsnamen zurückgeben
 
Bei Functionen kann man aber nur einen Wert zurückgeben, wobei man bei proceduren/functionen bei denen die Werte als Variablen übergeben werden, man beliebig viele übergeben kann.

(Wenn man nur einen Rückgabewert benötigt, dann sind die functionen natürlich wesentlich besser)

Luckie 10. Dez 2003 15:36

Re: Variable über funktionsnamen zurückgeben
 
Das ist aber noch die alte Pascal schreibweise. In Delphi sollte man die interne Variable result für die Rückgabe des Fuznktionswertes nutzen.
Delphi-Quellcode:
function: foo: Integer;
begin
  result := 123;
end;

Stanlay Hanks 10. Dez 2003 15:38

Re: Variable über funktionsnamen zurückgeben
 
Zitat:

Zitat von Thorben86
Hi, ich möchte bei einer selbst definierten Funktion das ergebnis über den Procedurenamen zurückgeben. Kann mir einer sagen, wie ich das mache? :wiejetzt:
...
Hierbei werden eingabe und schluessel beim aufrufen übergeben
Es soll ein String übergeben werden.

Er will aber einen String zurückgeben, da biete sich doch eine Funktion geradezu an...

@Luckie wusste gar nicht, dass das alte schreibweise ist...tja man lernt nie aus (ich schon gar nicht :wink:) Aber ich hab ja extra in Klammern geschrieben, dass es noch Result gibt.

Man liest sich, Stanlay :hi:

SleepyMaster 10. Dez 2003 16:50

Re: Variable über funktionsnamen zurückgeben
 
[EDIT]

Stanlay Hanks 10. Dez 2003 16:58

Re: Variable über funktionsnamen zurückgeben
 
Ebenfalls Edit...hat sich geklährt :wink:


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:36 Uhr.
Seite 1 von 2  1 2      

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