Thema: Delphi Mengen zuweisen

Einzelnen Beitrag anzeigen

Benutzerbild von chaosben
chaosben

Registriert seit: 27. Apr 2005
Ort: Görlitz
1.358 Beiträge
 
Delphi XE2 Professional
 
#3

Re: Mengen zuweisen

  Alt 13. Mai 2006, 13:04
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]
Benjamin Schwarze
If I have seen further it is by standing on the shoulders of Giants. (Isaac Newton)
  Mit Zitat antworten Zitat