sınıf alanları listeleme

[nightwolfcem]

oluşturduğum sınıfların alanlarına ulaşmam gerekiyor.
Yani genel bir fonksiyon yazıp, bir sınıfın hangi alanları var bulmam ve bunların değerleri ile dosyaya yazdırmam lazım.
Bir çok sınıfım var ve genel bir fonksiyon olması şart . Bunun hakkında önerisi olan varsa sevinirim. aslında en güzeli sınıfların DefineProperties fonksiyoınunu ezip her özelliği kaydettirmek, ama oda çok uzun oluyor . Benim istediğim bu işi yapıcak ,ana sınıfa yazılıcak bir fonksiyon.
bu arada delphi nin system library sinde
function TObject.FieldAddress(const Name: ShortString): Pointer; fonksiyonu dikkatimi cekti bu fonksiyon teker teker nesne içindeki tüm alanların ismini kontrol edip eğer verilen isimle uyuyorsa o alanın adresini dönderiyor. yanlız kod assembly de yazılmış ve kendi sınıfıma aynen kopyaladığımda, aynı kod hatalı çalışıyor.
bunun nedeni nedir acaba ?

[unicorn64]

delphi 2010 kullanıyorsanız, bu sürümle gelen rtti (Run Time Type Information) yı kullanabilirsiniz... gerçi ifade biraz yanlış oldu, rtti eskiden beri var ama 2010 sürümüyle gelen özelliklerle çok kolay bir kullanım imkanı sağlanmış. sınıfa ait property, field ve fonksiyonların listesini alabilir, nesnenin belirttiğiniz isimdeki property sinin değerine ulaşabilirsiniz...

ayrıca typInfo unitinde bulunan GetPropList,GetStrProp, GetObjectProp gibi fonksiyonlar da işinizi görebilir...