مشکل استفاده از اشاره گرها

[mehdi_239]

سلام دوستان
برای استفاده از اشاره گرها به مشکل برخوردم و درخواست کمک دارم:
یک کلاس دارم و به پروپرتی های اون مقدار دادم و حالا میخام به مقدار اونا دسترسی داشته باشم ولی نمیخام مستقیم از نام پروپرتی استفاده کنم بلکه میخام نام اون رو بریزیم داخل یک متغیر و بعد با استفاده از اشاره گر به مقدار پروپرتی دسترسی داشته باشم .
البته کسانی که با فاکس پرو کار کرده باشند میدونند این موضوع با قرار دادن یک @ جلوی متغیر حل میشه.

با مثال :
type
p_class=class
name : string;
end;

در برنامه میخام
var
p : p_class;
srch_nam_prprty : string;
val_of_prprty : ^string;
begin
p := p_class.create;
p.name:='mehdi';
srch_nam_prprty='p.name';
val_of_prprty=@srch_nam_prprty;
showmeesage('val_of_prprty');
end;
در خروجی mehdi نمایش داده شود.

میخام مقدار پروپرتی p.name در متغیر val_of_prprty قرار بگیره.
خدا کنه منظورم را انتقال داده باشم اگه نیاز به توضیح بیشتر هست بفرمائید.
با سپاس