200+ Texte in ein memo laden

[lbccaleb]

2x verwendet:

Delphi-Quellcode:

  private
    MyCountryDescriptions : TStringList;
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
    MyCountryDescriptions : TStringList;

Dadurch dass du die Stringlist ja die ganze Zeit über in Benutzung hast, wie das Programm läuft, ist es vllt besser für dich musst du die Stringlist im Form.OnCreate erzeugen und erst im Form.Close wieder freigeben, da Sie sonst in der Procedure nicht initzialisiert ist.


Edit2:

Enferne die Version aus dem Privat Abschnitt, da sonnst die Procedure:
Procedure CopyCountryDescription(Const Country : String; Description : TStrings); Kein Zugriff auf die Variable hat.