Mengen zuweisen

[chaosben]

Hi Jinujin und herzlich Willkommen in der DP

Was du willst, kann man auf sehr verschieden Weise lösen. Das beginnt bei einem Array und geht bis zu TList.

Ein Array könnte etwa so aussehen:

Delphi-Quellcode:

var
  Liste : array of array[0..1] of String
begin
  SetLength(Liste,2);
  
  Liste[0][0]:='Erwin Müller';
  Liste[0][1]:='02354532352';
  
  Liste[1][0]:='Katherina Dom';
  Liste[1][1]:='34534534534'; 
end;

Das ist natürlich nicht sooo schön. Besser wäre:

Delphi-Quellcode:

type
  TEintrag = record
    Name : String;
    Tel  : String;
  end;
  TEinragsListe = array of TEintrag;

var
  Liste : TEintragsListe;
begin
  SetLength(Liste,2);
  
  Liste[0].Name:='Erwin Müller';
  Liste[0].Tel:='02354532352';
  
  Liste[1].Name:='Katherina Dom';
  Liste[1].Tel:='34534534534';
end;

So könnte man damit schon leben. OOP - Liebhaber würden etwa so anfangen:

Delphi-Quellcode:

type 
  TEintrag = class
  private
    FName : String;
    FTel  : String;
  public
    constructor Create();
    destructor Destroy();
  published
    property Name : String read GetName write SetName;
    property Tel  : String read GetTel  write SetTel;
  end;

//Implementation

Am Ende würden sie sich dann noch eine TList-Klasse ableiten, mit der sie die einzelnen Einträge verwalten. Aber dazu siehe Delphi-Hilfe (TList).

[Roter Kasten]Mist, ich schreib zu langsam Aber ich poste es trotzdem wegen dem Umfang.[/Roter Kasten]