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:

markieren

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

Dispose von Recorddaten in Combobox

Dispose von Recorddaten in Combobox

Forumregeln