Forum: Object-Pascal / Delphi-Language
Delphi
by leddl,
12. Jul 2005
Ja, wahrscheinlich ist dein Wertigkeit eben nicht vom Typ TIntArry. Daran hab ich nicht gedacht. Aber das kriegst du auch noch hin, oder?
PS: Du kannst auch über den Button http://www.delphipraxis.net/templates/DPClassicBlue/images/lang_german/icon_edit.gif deinen Beitrag editieren.
Forum: Object-Pascal / Delphi-Language
Delphi
by leddl,
12. Jul 2005
Siehe mein Edit. Das schöne an VAR-Parametern ist ja, daß du in einer Variablen Parameter und Rückgabewert hast. Daher ist das ja für deinen Fall prädestiniert. (Falls du es eben so brauchst. Ganz hab ichs immer noch nicht kapiert)
Forum: Object-Pascal / Delphi-Language
Delphi
by leddl,
12. Jul 2005
Falls es dir darum geht das übergene Array umzuwandeln (Das wird mir aus deiner Prozedur nicht ganz klar, da das Array aWert dort nicht benutzt wird), dann übergib doch einfach genau dieses Array als Var-Parameter.
//Edit:
Sprich, es könnte so aussehen:
procedure TForm1.EinWert(aStart,aEnd:Integer;Var Wertigkeit:TIntArray);
Var y :Integer ;
begin
for y := aStart to aEnd do
...
Forum: Object-Pascal / Delphi-Language
Delphi
by leddl,
12. Jul 2005
Na warum fragst du in deinem Code dann nicht auch dein Ergebnis-Array ab? Du setzt ja danach deine Variablen auf die Werte, die du in die Funktion übergibst (Wertigkeit). Richtig aber wäre es, das Ergebnis zu benutzen (result).
Du müßtest daher nach dem Funktionsaufruf "Wertigkeit" jeweils durch "result" ersetzen.