![]() |
procedure, wie kann Ein/Rückgabe der Gleiche sein
Im Moment erscheint bei mir die Fehlermeldung bei mir Counter redefiniert!Geht es überhaupt, da Eingabe und Rückgabe ie gleiche Variable haben?
Delphi-Quellcode:
procedure CountX(Counter: array of Integer;aStart,aEnd:Integer;Var Counter:array of Integer);
|
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
nimm einfach den ersten paremeter weg und lass nur der var-parameter stehen, dann ist ein- und rückgabe das gleiche.
|
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
Nein das geht nicht, sagt doch auch schon die Fehlermeldung. Desweiteren wäre es besser, wenn du dir einen eigenen Typen deklarierst:
Delphi-Quellcode:
type
TIntArray = array of Integer; |
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
Du darfst nicht zweimal den gleichen Variablen-Namen benutzen, da Delphi ja sonst nicht weist, welche van den beiden variablen du in deiner procedure meinst, wenn du "counter" schreibst.
Delphi-Quellcode:
gruss
procedure CountX(aStart, aEnd: Integer; Var Counter: array of Integer);
[Add] Wenn du es so machst, wie Luckie dir es vorgeschlagen hat, kannst du es auch als funktion machen:
Delphi-Quellcode:
type
TIntArray = array of Integer; function CountX(Counter: TIntArray; aStart, aEnd: Integer): TIntArray |
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
Zitat:
Kommt da nicht nur ein Wert zurück? Mein Plan war ich zur Eingabe Counter..144] und daraus berechnen sich dann Counter[144..1500].Das geht doch meiner Meinung nach nicht? mit einer funktion. |
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
:wall: Wenn eine Funktion so definiert ist, das sie ein Array zurückgibt.. :roll:
|
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
Zitat:
:stupid: Und im Büchlein stand, function gibt nur einen Wert zurück |
Re: procedure, wie kann Ein/Rückgabe der Gleiche sein
Ein Array ist ein Wert. Du was du meinst wäre einen Skalar ;)
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:38 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz