Delphi lahmt plötzlich fürchterlich ab

[Leuselator]

Hallo Gemeinde!
Für folgenden Code braucht mein D7 seit heute Mittag ca. 1,5 Minuten, wenn ich ihn aus der ID starte:
(Ist Teil einer Komponente, die beim Start des Programmes erzeugt und dann vom Streamingsystem geladen wird)
[Edit]Tritt nicht auf, wenn ich das DIngen ausserhalb der IDE starte[/Edit]

Delphi-Quellcode:

TMeineComponent.Create(AOwner:TComponent);
var i : Integer;
begin
  ...
  FcmbxYea := TComboBox.Create(pnlFrame); 
  with FcmbxYea do begin 
    Parent  := FpnlFrame    ; 
    OnChange   := ComboBoxChange; 
    OnDropDown      := ComboBoxDropDown; 
    Items.Add('');
    for i := 1 to 2500 do begin       // für diese Schleife knapp 1,5 Minuten ?!?
      Items.Add(Format('%4d',[i]));  
    end; 
    OnKeyDown     := EinKeyDown; 
    DropDownCount   := 13; 
  end;

bevor ich es auf eine defekte CPU schiebe, wollte ich hier nochmal hören, ob sich das jemand erklären kann? (Einstellungen?)
Gruß

PS: