void SetupListView;

{

  UserFeedbacksLst = mainForm.AddNewProListView(scaledLyt, 'UserFeedbacksLst');

  UserFeedbacksLst.Align = alClient; 

  UserFeedbacksLst.Margins.Top = 15;

  UserFeedbacksLst.Margins.Left = 10;

  UserFeedbacksLst.Margins.Right = 10;

  

  UserFeedbacksLst.clProSettings.ViewType = lvList; 

  UserFeedbacksLst.clProSettings.ColCount = 1;    

  UserFeedbacksLst.clProSettings.ItemHeight = 110; 

  UserFeedbacksLst.clProSettings.ItemSpace = 10; 

  UserFeedbacksLst.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#c8c1c1');

  UserFeedbacksLst.SetclProSettings(UserFeedbacksLst.clProSettings);

}

void SetupListDesigner;

{

  designerPanel = mainForm.AddNewProListViewDesignerPanel(UserFeedbacksLst, 'designerPanel');

  designerPanel.Align = alMostTop;

  designerPanel.Height = 100;

  designerPanel.Width = 150;

  

  designerPanel.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#ffffff');

  designerPanel.clProSettings.BorderColor = clAlphaColor.clHexToColor('#e0e0e0'); 

  designerPanel.clProSettings.BorderWidth = 1;

  designerPanel.clProSettings.IsRound = True;

  designerPanel.clProSettings.RoundHeight = 10;

  designerPanel.clProSettings.RoundWidth = 10;

  designerPanel.SetclProSettings(designerPanel.clProSettings);

  UserFeedbacksLst.SetDesignerPanel(designerPanel);

}