Prozedur Global erstellen

[programmierer]

Danke Leute... ich habs jetzt hinbekommn. Es funktioniert alles bestens.
hier meine Lösung:

Delphi-Quellcode:

   //Ausgabe des Kategorie-Arrays in Listbox
   procedure TForm1.ausgabe_kategorien;
    var i:integer;
   begin
    category.Items.Clear;  //category ist die ListBox
    for i:=0 to high(kategorien) do category.Items.add(kategorien[i]);  //Kategorien ist das Array
   end;

Und bei type:

Delphi-Quellcode:

type
 procedure ausgabe_kategorien();