نقل قول: مشکل با اشاره گر
نیازی به تعریف اشاره گر نیست ، اشیاء در دلفی خودشون اشاره گر هستند ، یعنی به شیئ از نوع کلاس پایه مورد نظر در حافظه اشاره میکنن ، پس اون کد شما یعنی اشاره به اشاره گر یک شئ !
پس اون TLabel^ باید بشه TLabel و کدتون هم اینطور Stable تر هست :
if (Sender IS TLabel) then
begin
TLabel(Sender).Font.Color := clRed;
if Assigned(P) then
P.Font.Color := clblack;
P := TLabel(Sender);
end;
نقل قول: مشکل با اشاره گر
ممنونم از پاسختون
ایا راهی دارد که با داشتن نام یک ابجکت که در استرینگ ذخیره کردیم ، به ان دسترسی پیدا کنیم؟
نقل قول: مشکل با اشاره گر
قبل از ارسال جستجو کنید ، بارها در موردش بحث شده .
FindComponent