Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Problem mit Property und Indexübergabe (https://www.delphipraxis.net/155343-problem-mit-property-und-indexuebergabe.html)

Sim_Star 19. Okt 2010 15:58

Delphi-Version: 5

Problem mit Property und Indexübergabe
 
Hallo,

Hier mal kurz mein Beispielobject:

Delphi-Quellcode:
Type A = record
  Date1 : byte;
  Date2 : byte;
  Date3 : array of B;
end;

Type B = record
  Date1 : byte;
  Date2 : byte;
end;

Type Test = class
  private
    FData = array of A;

    procedure FUpdateBinA(IndexofA : integer;IndexofB: integer; AData :B);

  public

  property UpdateBinA[IndexofA : integer;IndexofB: integer] : read FReadBinA write FUpdateBinA;
end;
Ich habe nun folgendes Problem:
Man erstelle Object Test, welches z.B. FData von der Länge 10 hat.
Nun erstelle ich ein Record vom Type B.

Jetzt möchte ich Date3 in FData von Test an einer beliebingen Stelle ändern, und zwar über die Property UpdateBinA;
Das Problem das ich jetzt habe ist das der zwei Indizes:

das hier funktioniert nicht:
Delphi-Quellcode:
var Data : B; .... Test.UpdateBinA[0,0] := Data;
Was mache ich falsch, bzw. wo ist hier der Denkfehler, bei einem Index geht es schließlich auch!

LG Marco

Björn Ole 19. Okt 2010 16:55

AW: Problem mit Property und Indexübergabe
 
Wär da nicht UpdateBinB ein besserer Bezeichner?
Delphi-Quellcode:
Test = class
private
  FData: array of A;
  function FReadBinB(IndexofA, IndexofB: integer): B;
  procedure FWriteBinB(IndexofA, IndexofB: integer; const Value: B);
public
  property UpdateBinB[IndexofA, IndexofB: integer]: B read FReadBinB write FWriteBinB;
end;

Sim_Star 19. Okt 2010 16:59

AW: Problem mit Property und Indexübergabe
 
Naja es geht ja nicht um den Bezeichner, sondern darum dass die Methode dann nicht funktioniert.

Björn Ole 19. Okt 2010 17:03

AW: Problem mit Property und Indexübergabe
 
War ja auch nur ein Hinweis nebenbei. :wink:
Funktioniert es denn mit meiner Klassendefinition? Wo hängts noch?

Sim_Star 19. Okt 2010 17:24

AW: Problem mit Property und Indexübergabe
 
Joah es hat funktioniert...

Ich habe bei mir irgenwo ne falsche Variable genommen und bin nicht drauf gekommen....


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