Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Array-Eigenschaften (https://www.delphipraxis.net/40795-array-eigenschaften.html)

Cicaro 21. Feb 2005 09:41


Array-Eigenschaften
 
Hallo!

Also, ich entwickle gerade Komponenten. Eines verwendet Array-Eigenschaften (wie z.B. Canvas Pixels verwendet). Meine Eigenschaft sieht etwa so aus:
Delphi-Quellcode:
private
FArr:array[0..MaxX,0..MaxY] of Integer;
published
property Arr[x,y:Integer]:Integer read FArr write FArr;
Mein Problem ist dabei FArr, da es wegen MaxX und MaxY statisch ist.
Mit dynamischen Variablen, die Zeiger auf Nachbarn enthalten (oder so ähnlich), wollte ich nicht verwenden, weil sie unter Umständen sehr viel Speicherplatz einnehmen würden.
TCanvas liest oder schreibt die Pixels über External-Prozeduren. Da weiß ich auch nicht, ob ich dieselben für meine Eigenschaften nutzen kann.

Meine Frage ist also:

Wie erzeuge ich dynamische Arrays ?

Jelly 21. Feb 2005 09:56

Re: Array-Eigenschaften
 
Hier mal ein Bsp. mit allem Wichtigen drin. Nicht vergessen den Speicher zu reservieren mit SetLength.

Delphi-Quellcode:
type
 TArr = array of integer ;
var
 A : TArr ;

begin
     Setlength (A,10) ;
     for i := 0 to 9 do
        A[i] := i ;

     SetLength (A,11) ;
     A[10] := 11 ;
end.

Cicaro 21. Feb 2005 14:15

Re: Array-Eigenschaften
 
Danke für die Hilfe !

Cicaro 8. Jun 2005 10:14

Re: Array-Eigenschaften
 
Noch eine Frage (die passt in den Thread):

wenn meine Array-Eigenschaft (ein record) aus einer Funktion gelesen werden muss, weil ich beispielsweise die Grenzen bewachen will, dann kann ich dem Record die einzelnen Felder nicht zuweisen, weil ich dann ja dem Funktions-Result einen Wert zuweise. Das geht ja nicht! Bis jetzt musste ich das Problem so lösen, dass ich den einen Array des Records in mehrere Arrays von Integer aufgeteilt habe.

Kann man das Problem anders lösen, so dass man nur ein Array verwendet.

Beispiel:
Delphi-Quellcode:
type
 TMyRecord = record
              a:Integer;
              b:Integer;
             end;

Tfff = class
private
  function GetArr(i:Integer):TMyRecord;
  procedure SetArr(i:Integer;a:TMyRecord);
public
  property Arr[i:Integer]:TMyRecord read GetArr write SetArr;
end;

Arr[3].a:=12; // das geht nicht

Robert_G 8. Jun 2005 10:29

Re: Array-Eigenschaften
 
Ist es denn soooo schwer einfach mal "class" anstatt "record" zu schreiben?
Ihr müsst doch nicht immer alles und jeden mit primitiven Typen erschlagen. ;)
Records sind doch innerhalb der Anwendungslogik absolut sinnlos, vor allem wenn man sie nur benutzt weil man keinen Bock auf Create/Free hat...

barf00s 8. Jun 2005 10:39

Re: Array-Eigenschaften
 
es sollte auch mitnem record gehen :)
vorrausgesetzt, GetArr/SetArr ist richtig definiert


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