Array of Record - Einzelne Fixe Elemente?

[Real-TTX]

Hey,

Ist es möglich dass ich einem Array von einem Record ein festen Wert zuweise ?

Mein Record :

Delphi-Quellcode:

  Values = record
    ValueFrom : string;
    ValueFromType : string;
    ValueTo : string;
    ValueToType : string;
    ValueSectionA : string;
    ValueSectionB : string;
    ValueSectionC : string;
    ValueSectionD : string;
  end;

Und so greife ich drauf zu:

Delphi-Quellcode:

Value[0].ValueFrom := '0,5';
...
Value[1].ValueFrom := '01';
...

Edit1.Text := Value[0].ValueFrom;

etc.... Aber ich habe pro Record eine feste Bezeichnung.

Ich will zb "Value.Name" benutzen können ? Es ist ja ein Array of Record. Aber das Array of Record soll auch ein einzelnen Wert haben, der auserhalb der Liste/ dem Array liegt. Ist das möglich?

Ich hoffe ihr konntet mir folgen....

LG, Real-TTX

[Klaus01]

Zitat:

Zitat von Real-TTX

Ich hoffe ihr konntet mir folgen....

Ehrlich gesagt, nein ich konnte Dir nicht folgen.
Hast Du vielleicht mal ein Beispiel wie Du dir das vorstellst?

Grüße
Klaus

[sx2008]

Verwende doch eine Aufzählung:

Delphi-Quellcode:

TWert = (wNetwerk, wWLAN, wHauptspeicher, wScreenX, wScreenY);  // die Aufzählung
TValues = record  // Datentypen sollen immer mit T.... beginnen !
    ValueFrom : string;       // vielleicht sollte man hier den Prefix "Value" weglassen; zuviel Schreibarbeit
    ValueFromType : string;
    ValueTo : string;
    ValueToType : string;
    ValueSectionA : string;
    ValueSectionB : string;
    ValueSectionC : string;
    ValueSectionD : string;
  end;

TValueArray = array[wNetzwerk..wScreenX] of TValues;
var
  MyValues : TValueArray;
...
  MyValues[wWLAN].ValueFrom := '1 MBit';
  MyValues[wWLAN].ValueTo   := '54 MBit';

[Real-TTX]

Naja, ich weis nicht genau wie ich das lösen soll. Ich Programmier noch nicht so lange in Pascal/Delphi.

Ich habe eine Funktion. Diese liest mir Sämtliche Werte aus einer XML Datei aus. Vorgegebene Anzahl etc. Ein Fester Wert wäre: Der Name. Nun dachte ich dass ich den Typ "Array of TValues"(Ist eine Wertetabelle) nehme für diese Funktion.Nun will ich ein Record haben. Zb:

Werte[0].From ... Werte[0].SectionD ... etc

Desweiteren noch "Werte.Name" ...

Ohne dass ich auf ein Array Element zugreifen muss... ? Ich weis echt nicht wie ich es anders erklären kann :/

Gruß

[rollstuhlfahrer]

Ich glaub, ich habs verstanden. Guck dir mal den Quellcode in Delphi für TStrings/TStringlist an.
Du brauchst ein Objekt, das eine Property als DEFAULT hat. So kannst du deine Abfragen mit [0],[1],... und gleichzeitig auch mit .name; .xxx machen

rollstuhlfahrer

[himitsu]

ein Name pro Array-Element?

also warum dann nicht in dem Record?

Code:

Values = record
    [b]Name : string;[/b]
    ValueFrom : string;
    ValueFromType : string;
    ValueTo : string;
    ValueToType : string;
    ValueSectionA : string;
    ValueSectionB : string;
    ValueSectionC : string;
    ValueSectionD : string;
  end;

Delphi-Quellcode:

Werte[0].Name

[Christian Seehase]

Moin sx2008,

kleiner Vorschlag zur Vereinfachung.

Statt

Delphi-Quellcode:

TWert = (wNetwerk, wWLAN, wHauptspeicher, wScreenX, wScreenY);  // die Aufzählung 

TValueArray = array[wNetzwerk..wScreenX] of TValues;

kann man es auch so

Delphi-Quellcode:

TWert = (wNetwerk, wWLAN, wHauptspeicher, wScreenX, wScreenY);  // die Aufzählung 
TValueArray = array[TWert] of TValues;

schreiben.

Vorteil:
Ändere ich was an TWert, brauche ich bei der Array-Deklaration nichts zu ändern.

[rollstuhlfahrer]

und was ist mit meinem Objekt wie TStrings??

Zitat:

Zitat von Real-TTX

Werte[0].From ... Werte[0].SectionD ... etc

Trifft zu

Zitat:

Zitat von Real-TTX

Desweiteren noch "Werte.Name" ... (<- Add: hier keine Arraystruktur)

Das auch

Gruß

[Real-TTX]

Wie würde dass denn mit TStrings gehen, wenn man fragen darf ? Ich habe mir das mal angeschaut, aber verstehe ich das noch nicht so ganz :/ :wall:

Gruß

[Real-TTX]

Ein Name Pro Array und nicht Record aus dem einfach Grund dass es sich um auslesen einer Wertetabelle handelt. Diese Tabelle hat IMMER 4 (mit Header 5) Zeilen. Die Werte lese ich aus. Und diese Tabelle hat ein Name und nicht die einzelnen Spalten. Zb Name der Tabelle "DIN ISO 2768 T1"... Genau das ist mein Problem, ich will diesen Name nicht jedem Record zuweisen... Ich denke "rollstuhlfahrer" hat dies verstanden :P

Gruß, Real-TTX