مفهوم دستور Text := Self.Text چیست؟

[SYNDROME]

با سلام و خسته نباشید خدمت تمامی دوستان

من دیروز داشتم یک کامپونت Edit را نگاه کردم دیدم در یک خط دستور
Text := Self.Text
را نوشته است؟

منظور از این دستور چیست؟
با تشکر فراوان

[عقاب سیاه]

درود
این کد مقدار ادیت را با عنوان فرم یکی می کنه!

[SYNDROME]

با سلام و تشکر

درود
این کد مقدار ادیت را با عنوان فرم یکی می کنه!
با عنوان کدام فرم؟؟
این دستور داخل بدنه یک کامپونت Edit نوشته شده است..
با تشکر

[younes221]

سلام ،

فرمی که مالکیت Edit رو برعهده داره !


این دستور داخل بدنه یک کامپونت Edit نوشته شده است..

منظورتون داخل بدنه رویداد OnChange هست ؟ چه اشکالی داره ؟ شاید واسه منظور خاصی به کار برده باشه مثلا نشه داخل Edit رو به چیز دیگه ای تغییر داد.

[SYNDROME]

با سلام
منظورم از بدنه Edit یعنی داخل فایل Edit.pas که کامپونت Edit را نوشته است.
موقع نوشتن کامپونت Edit این دستور استفاده شده است.
می خواستم بدانم تفاوت دستور
Text := Self.Text
با
Text := Text
در چیست؟
با تشکر

[Ananas]

سلام.


می خواستم بدانم تفاوت دستور
Text := Self.Text
با
Text := Text
در چیست؟
اگه قبلش از with استفاده کرده باشه شاید فرق کنه وگرنه ظاهرا یکین و هر دوتاشون هیچ کار خاصی نمی کنن. اگه تو خط های قبلش از with استفاده کرده باشه text اول مربوط به اون شی (with) و self.text هم که برای خود اون edit.
مثلا در OnClick یک Label بنویسید :

procedure TForm1.Label1Click(Sender: TObject);
begin
with Label1 do
Caption := Self.Caption;
end;

[firststep]

self اشاره گره به کلاسی است که دارین تعریفش می کنین
پس اگر در تعریف خوده کلاس ادیت باشه منظور همون شی هستش که از این کلاس خلق شده

[firststep]

اگه اون تیکه کد که این کد درونش تعریف شده رو بزارید یهتر
یا اگر مربوط به ادیت خودمونه مکانش رو بفرمایید...