Ы маамммтттттngy s,,,,,,,,,,,C, xf

Type

Trect=record

Case Intelger of

0: (Left, Top, Reght, Buttom: Integer);

1: (TopLeft, ButtomRight: Tpoint);

End;

Procedure AlignControls(AControl: TControl; Var Rect: TRect); Virtual;

Ko’rsatilgan Rect sohasida barcha “docheri” komponentalarni Align xossasiga mos hoda to’g’rilaydiProcedure DisableAlign;

DisableAlign xossasi “docheri” komponentalari ichki oyna elementlarini to’g’rilashni vaqtinchalik so’raydi. Bu usul EnableAlign usuli bilan birga ishlatiladi.

Function ConFocus: Boolean; Dynamic;

Bu usul True qiymat qaytaradi, agar oyna elementi kiritish fokusini olgan bo’lsa.

Procedure ChangeSkale(M,D: Integer); Override;

Bu usul komponentalar va uning “docheri” komponentalari masshtabini o’zgartiradi.

Procedure EnableAlign;Oldindan chaqirilgan EnableAlign usulini (inkor qiladi) qaytaradi va “docheri” komponentalarini to’g’rilash uchun Realing ni chaqiradi.

Savollar :

1. 
   Delphi dasturi haqida tushuncha bering?
   
2. 
   Delphi dasturini imkoniyatlari ?
   
3. 
   Delphi dasturi qanday dastur?
   

Uyga vazifa: O’tilgan mavzuni o’qish