AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Mehrdimensionale Variable variabler Dimension
Thema durchsuchen
Ansicht
Themen-Optionen

Mehrdimensionale Variable variabler Dimension

Ein Thema von Whookie · begonnen am 9. Okt 2014 · letzter Beitrag vom 12. Okt 2014
 
Whookie

Registriert seit: 3. Mai 2006
Ort: Graz
446 Beiträge
 
Delphi 10.3 Rio
 
#1

Mehrdimensionale Variable variabler Dimension

  Alt 9. Okt 2014, 23:54
Delphi-Version: XE5
Bin gerade dabei eine Klasse zu bauen, mit der zur Laufzeit ein Variable angelegt werden kann, die ein Array beliebiger Dimension (0-3) eines bestimmten Types enthalten kann (Boolean, Double, Integer, AnsiString, ...).

Im Prinzip bin ich bei sowas gelandet:

Delphi-Quellcode:
  
TDimArray = Array Of Integer;

TVariable<T> = Class
  private
    fDimensions: TDimArray;
    fPData: PByte;
    fMemSize: Integer;
  public
    constructor Create(AName: AnsiString; const ADimensions: TDimArray); virtual;

    property Value[Index: TDimArray]: T read GetVal write SetVal;
 End;
Was daran natürlich nicht so elegant ist, sind die Zugriffe über Value, bei denen ich mir nicht sicher bin ob sie von der Performance her so günstig sind:

Delphi-Quellcode:
Var
  x: TVariable<Integer>;
begin
  x := TVariable<Integer>.Create('Test', [2,3,9]);
  x.Value[[0,0,2]] := 16
  ...
Verwaltet werden die Daten in einem großen Speicherblock (fPData) weil keinen Weg gefunden habe eine Mehrdimensionale Variable variabler Dimension zu definieren (geht sowas überhaupt??).

Statt der Value- Property wären auch einzelne entsprechend dimensionierte Properties denkbar:

Delphi-Quellcode:
    property Value1D[Index: Integer]: T read GetValue1D write SetValue1D;
    property Value2D[x, y: Integer]: T read GetValue2D write SetValue2D;
    property Value3D[x, y, z: Integer]: T read GetValue3D write SetValue3D;
Ist möglicherweise schneller aber nicht besonders elegant. Gibts hier eine Möglichkeit einfach die "richtige" property anzulegen zb. über Generics?
Whookie

Software isn't released ... it is allowed to escape!
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:25 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 by Thomas Breitkreuz