Zitat:
New(PString(TempVar));
Gibst du das auch irgendwo mal wieder frei?
Dein Code sieht ja ziemlich kompliziert aus.
Delphi-Quellcode:
type
TMyEnum = (meNone, meTwo, meThree);
var
MyEnum: TMyEnum = meThree;
MyString: string = 'Hallo';
procedure TForm1.FormCreate(Sender: TObject);
begin
TJvInspectorVarData.New(JvInspector1.Root, 'MyEnum', TypeInfo(TMyEnum), @MyEnum);
TJvInspectorVarData.New(JvInspector1.Root, 'MyString', TypeInfo(string), @MyString);
end;