Telefonbuch

[alleinherrscher]

Okay, einen Ansatz. (wobei ich hier eine leicht andere Variante verfolge als DaddyH, sry)

Du deklarierst dir unter Private eine Variable:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
    Telefonbuch:Tstringlist;
  public
    { Public-Deklarationen }
  end;

Wenn dein Programm startet, musst du in der FormCreate Procedure die StringList ersteinmal "erstellen":

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
   Telefonbuch:=TStringList.create;
end;

Dann brauchst du eine Procedure, um Einträge in dein Telefonbuch (in die Stringlist) einzufügen:

Delphi-Quellcode:

procedure TForm1.Hinzufügen_Zu_Telefonbuch(EinName:String;EineTelefonnummer:string);

begin

  EinTelefonbuch.Add(EinName);
  EinTelefonbuch.Add(EineTelefonnummer);

end;

Jedes Mal, wenn du EinTelefonbuch.Add aufrufst, wird ein weiterer Eintrag in die StringList geschrieben.
D.h. ein Beispiel:

Am Anfang ist deine StringList leer. Jetzt rufst du folgende Procedure auf:

Hinzufügen_Zu_Telefonbuch('Hans Meiser','0190-99999');

Jetzt steht in der StringList:

0.: Hans Meiser
1.: 0290-99999


Meine Frage an dich: Man kann mit Eckigen Klammern auf die einzelnen Einträge der Stringlist zugreifen:

EinTelefonbuch[0] ist in unserem Fall jetzt = "Hans Meiser".

Kannst du eine FUnktion basteln, die aus dem Telefonbuch nun wieder Name und Telefonnummer ausließt? Also, wenn ich dir sage: Suche mir bitte zur zweiten Person im Telefonbuch Namen und Telefonnummer... wie könnte das gehen?