Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi mehrdimensionale Arrays übergeben (https://www.delphipraxis.net/101447-mehrdimensionale-arrays-uebergeben.html)

mr.winkle 13. Okt 2007 13:47


mehrdimensionale Arrays übergeben
 
Hallo zusammen,

Ich möchte einer funktion ein mehrdimensionales Array mitgeben, bekomme das aber vom Syntax irgendwie nicht hin. Mein Versuch:

Delphi-Quellcode:
function TForm1.sieg(k:array[0..3] of array[0..3] of array[0..3] of byte):byte;
Funktionsaufruf mit

Delphi-Quellcode:
sieg(f);
//wobei f:array[0..3] of array[0..3] of array[0..3] of byte;
Dabei meckert der Compiler, dass er ein OF erwartet habe.
Kann das vielleicht an meiner Delphi-Version liegen? Habe Delphi 7 Personal...

Danke im Vorraus,
Thomas

DelphiKlaus 13. Okt 2007 13:51

Re: mehrdimensionale Arrays übergeben
 
Hallo Thomas,

versuch es mal so

Delphi-Quellcode:
type
  Mehrdimarray = array[0..3] of array[0..3] of array[0..3] of byte;

.
.
.

function TForm1.sieg (k : mehrdimarray):byte;

.
.
.

var
  f : MehrDimArray;

begin
  sieg (f);
  .
  .
  .
Nicht getestet, sollte aber so gehen

Klaus

mr.winkle 13. Okt 2007 14:19

Re: mehrdimensionale Arrays übergeben
 
Danke Klaus, darauf bin ich nicht gekommen!
Funktioniert einwandfrei!


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:17 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