Dispose von Recorddaten in Combobox

[Sereby]

Hiho,

ich habe folgendes Problem:
ich füge einer combobox ein record mit folgendem code hinzu:

Delphi-Quellcode:

type
  TLangRec = record
    LangCode: String;
  end;
  PLangRec = ^TLangRec;

..
var
LangCode: PLangRec;
begin
  New(LangCode);
  LangCode^.LangCode := '1031';
  LangCombo.Items.AddObject(LanguageName, TObject(LangCode^));
end;

hier nun das problem:

Delphi-Quellcode:

var
  I: Integer;
  LangCode: TLangRec;
begin
  for I := LangCombo.Items.Count - 1 downto 0 do
  begin
    LangCode := TLangRec(LangCombo.Items.Objects[I]);
    Showmessage(LangCode.LangCode); //das funktioniert noch..
    Dispose(PLangRec(LangCode)); //bääääm
  end;

Das Showmessage funktioniert ohne probleme aber bei dem Dispose knallts dann mit ner zugriffsverletzung!
Das Showmessage habe ich nur testweise eingebaut um zu gucken ob der überhaupt was brauchbares macht.

edit: ich verwende Delphi 2009 auf Windows 7 x64 und das neueste FastMM4