anchor.diff:    MySmallDistX:=PSCDialogUnitsToPixelsX(4);
     MySmallDistY:=PSCDialogUnitsToPixelsY(4);
     MyBigDistX:=PSCDialogUnitsToPixelsX(7);
  -  MyBigDistY:=PSCDialogUnitsToPixelsX(7);
  +  MyBigDistY:=PSCDialogUnitsToPixelsY(7);
   
     ClientHeight := 250;
     ClientWidth := 400;
  
positive.code:     Property BiDiMode;
      Property DragCursor;
      Property DragKind;
      Property ImeMode;
      Property ImeName;
      Property ParentBiDiMode;
      Property Color;
      Property Constraints;
  
negative.code: 
    typinfo,
    sysutils,
    LCLIntf,
    LCLType,
    Forms,
    Controls,
    LMessages,
    Classes,
    DB,
    //DBCommon,
    dialogs,
    graphics,
    Types,
  
    myla_system,
    myla_interfaces,
  