2 ComboBoxen mit gleichem Inhalt füllen per Multithreading

[DangerDistel]

Hallo

ich möchte, wie im Titel, 2 ComboBoxen separat mit dem gleichen Inhalt füllen.

Ich beziehe die Quelle aus einer Liste. Die Liste besitzt aber mehr als 14000 Einträge.
Meine Frage: Ich würde die gern per MultiThreading erledigen und welche Schritte wären dafür notwendig?
Ich habe (leider) nie mit MultiThreading wirklich zu tun gehabt.
Mein erster Ansatz daher:

Delphi-Quellcode:

procedure TfmPersonenverwaltung.FillStadtCB(Arr_ComboBoxes: Array of TComboBox);
var i_arr, ix: integer;
begin
  if Length(Arr_ComboBoxes) > 0 then
  begin
    for i_Arr:=Low(Arr_ComboBoxes) to High(Arr_ComboBoxes) do
    begin
      if Arr_ComboBoxes[i_arr] <> nil then
      begin
        Arr_ComboBoxes[i_arr].Clear;
        for ix:=0 to GClassStaedteList.StaedteListe.Count -1  do
        begin
          Application.ProcessMessages;
          Arr_ComboBoxes[i_arr].AddItem(TStadtverwaltung(GClassStaedteList.StaedteListe[ix]).StdV_Plz + ', '  +
                                        TStadtverwaltung(GClassStaedteList.StaedteListe[ix]).StdV_Ort,
                                        TObject(TStadtverwaltung(GClassStaedteList.StaedteListe[ix]))
                                       );
        end;
      end;
    end;
  end;
end;