Hallo,
Also bei mir funktioniert das hier ohne Probleme:
Delphi-Quellcode:
uses
TypInfo;
procedure TForm1.FormCreate(Sender: TObject);
var plist: PPropList;
i, n: Integer;
begin
n := GetPropList(Self,plist);
try
for i := 0 to n-1 do
Memo1.Lines.Add(plist^[i]^.Name);
finally
FreeMem(plist);
end;
end;
Wie sieht denn die Klasse des Objekts aus, dass du übergibst?
Sind generische Properties drin?
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."