قسمت هفتم

== ادامه خواص شیء TLabel(برچسب) :

AutoSize : این خاصیت در موقع تغییر کپشن برچسب عمل می کند و موجب می شود که برچسب به اندازه مورد نیاز برای متن تغییر اندازه دهد .
Caption : این خاصیت مقدار متن نمایشی توسط برچسب را تنظیم می کند .
Enabled : این خاصیت برای فعال و غیرفعال کردن برچسب می باشد .
Layout : از این خاصیت برای ترازبندی عمودی متن موجود در خاصیت کپشن استفاده می شود . [به عنوان مثال اگر بر روی tlCenter تنظیم شود متن در میان قرار می گیرد.]
ParentBiDiMode : این خاصیت مشخص می کند که آیا برچسب خاصیت ترازبندی خود را از شیء پدر (فرم) به ارث ببرد یا خیر .
ParentColor , ParentFont , ParentShowHint : این خواص نیز مقدار رنگ و فونت و خاصیت ShowHint‌ برچسب را با توجه به شیء پدر (فرم) تنظیم می کند .
Transparnet : اگر مقدار این خاصیت True‌ باشد ، در مواقعی که کارهای گرافیکی انجام می دهیم می توان تصویر را در زیر برچسب قرار دهیم .
WordWrap : این خاصیت در موقع True بودن موجب می شود که در انتهای هر خط برچسب به جای اینکه متن به طور افقی گسترش یابد به خط بعدی انتقال یابد .
---------------------------
عنصر TEdit :
با استفاده از این عنصر می توان متن را از ورودی خواند یا در خروجی چاپ کرد .

خواص ==>>
AutoSelect : این خاصیت موجب می شود هرگاه مکان‎نما در عنصر TEdit قرار گیرد متن موجود در آن به طور خودکار انتخاب گردد .
BevelEdges , BevelInner , BevelKind , BevelOuter : این خواص مربوط به تنظیمات شکل و قیافه عنصر TEdit می باشد . با تغییر این خواص در شکل لبه ها و تورفتگی های و ... عنصر تغییراتی اعمال می شود .
BorderStyle : از این خاصیت برای تنظیم نوع لبه های عنصر استفاده می شود . [لبه دار باشد یا خیر]
CharCase : با تنظیم این خاصیت می توان به کاربر اجازه ورود حروف کوچک [ecLowerCase] ، حروف بزرگ [ecUpperCase] و ترکیبی از حروف بزرگ و کوچک [ecNormal] را بدهید .
Ctl3D : این خاصیت مشخص می کند که آیا عنصر به صورت سه بعدی نمایش داده شود یا خیر .
MaxLength : این خاصیت برای تعیین حداکثر طول متنی که کاربر می تواند وارد نماید به کار می رود .
PasswordChar : از این خاصیت برای رمزدار کردن نمایش کاراکترهای ورودی استفاده می شود . اگر مقدار آن غیر از کاراکتر 0# باشد کاراکترهای وارد شده توسط کاربر پنهان شده و همان کاراکتری را که در این خاصی قرار داده شده نمایش داده می شود .
ReadOnly : این خاصیت برای تعیین اینکه آیا متن موجود در عنصر قابل ویرایش باشد یا خیر استفاده می شود .
TabOrder : این خاصیت تعیین می کند که با چندمین فشردن کلید tab مکان‎ نما به این عنصر انتقال یابد .
Text‌ : مقدار این خاصیت متن داخل عنصر TEdit را مشخص می کند .

رویدادهای شیء TEdit‌ ==>>

OnChange : این رویداد در موقع تغییر متن داخل عنصر فراخوانی می شود .[در موقعی که کاربر سعی در تغییر متن باشد]
OnEnter : در موقعی که فوکوس به عنصر TEdit منتقل و یا عنصر فعال می شود این رویداد فراخوانی می شود .
OnExit : این رویداد در موقعی که مکان‎نما از شیء به شیء دیگر و یا فوکوس از این شیء به شیء دیگر انتقال داده شود فراخوانی می شود .

----------------------------
چند مثال از موارد بالا :

** استفاده از رویداد OnChange‌ شیء TEdit :

procedure TForm1.Edit1Change(Sender: TObject);
begin
Label1.Caption := Edit1.Text ;
Form1.Caption := Edit1.Text ;
end;

== در این مثال با تغییر متن داخل عنصر Edit1 خواص Caption فرم و عنصر Label1 با توجه به متن موجود در عنصر Edit1 تنظیم می شود .

** استفاده از رویداد OnEnter و OnExit :

procedure TForm1.Edit1Enter(Sender: TObject);
begin
ShowMessage('You Enter To [' + Edit1.Name + ']') ;
end;

== این دستور موجب می شود وقتی مکان‎ نما به عنصر منتقل می شود پیغامی مبنی بر اینکه شیء دارای فوکوس شده نمایش داده می شود .

procedure TForm1.Edit1Exit(Sender: TObject);
begin
ShowMessage('You Exit From [' + Edit1.Name + ']') ;
end;

== با این دستور در موقعی که فوکوس از عنصر برداشته می شود پیغامی ظاهر می شود .

**** توضیح تابع ShowMessage :

ShowMessage (Const Msg : String) ;

-- این تابع برای نمایش یک پنجره پیغام به کار می رود . آرگومان Msg که از نوع رشته ای تعریف شده متنی است که باید در پنجره پیغام نمایش داده شود که می تواند یک رشته در داخل یک جفت '' باشد یا متغیرهایی که از نوع String باشند .