标签：控件 属性 Delphi Sender 学习 选中 按钮 文本 第七天

string类型和动态数组类型都是系统自管理的，不用担心内存泄漏。

系统事件中的参数Sender: TObject，是指触发该事件的控件，但Sender是TObject类型的，在实际使用时需要强制向下转型。

--例如有多个Button，以及一个用于显示Label, 且这些按钮的功能都是一样的，比如说将自己的caption赋给Label，则可以用Sender来实现复用按钮事件
--即用Sender来判断是哪个按钮，再赋值，主要代码如下：
procedure TForm1.btn1Click(Sender: TObject);
begin
  --判断是哪个按钮可用 Sender = btn1(即按钮变量名)
  Label.Caption := TButton(Sender).Caption;  --TButton(Sender)：将Sender强制向下转型为TButton类型
end;
--最后将其它按钮的OnClick事件都设置为btn1Click就行了。

窗口Form中BorderStyle设置为Dialog，则用户不能改变窗口大小

控件及其重要的属性：

1,MainMenu:主菜单控件，不可视，一个窗口只有一个主菜单，但可以有多个弹出菜单（右键触发的PopMenu）。
    Items：保存的菜单项（菜单项的类型是TMenuItem），点击可以设置各种菜单项；
    Image:指定一个绑定的ImageList(在win32下)
    菜单项中的属性：caption：名称(Caption为'-'时，在菜单上显示的就是一条横线)；   
                  Bitmap:图标    
                  shortcut:快捷键（不同于&定义的快捷键，这里的快捷键可以做到在按钮没显示出来是就能按到，而&定义的需要先看到这个按钮，快捷键才有效）
                  选中菜单项，右键选择Create SubMenu可以新建一个子菜单
                  ImageIndex:图标序号，需要先设置Mainmenu中的Image属性
                  Checked：该菜单项是否被点击过，为true时菜单项前会有一个√
                  AutoCheck:为True时自动设置Checked属性
                  Visible:为True时显示控件，为False时不显示控件
2，PopMenu: 弹出菜单控件，不可视，对于大部分控件都有一个PopMenu属性，即在该控件上点击右键会显示选项。里面的属性和主菜单属性的含义一样。
     重要的事件：OnPopUp:当弹出该PopMenu时触发。
     TPopMenu类有一个PopupComponent属性，表示是在哪个控件上触发的Popup事件。
        还有一个方法PopUp(X, Y:Integer);用于设置弹出菜单的位置。例如设置菜单在当前鼠标位置弹出，主要代码如下
      var position: TPoint;
      position := Mouse.CursorPos;
      PopMenu.PopUp(position.X, position.Y);

3，ImageList：图像列表控件，不可视，用于保存多个BMP\PNG\ICO文件供其他组件使用
4，Label控件：标签。用于显示短文本。
    重要属性：Caption：要显示的文本
             Color：背景颜色
             Transparent:为True时将忽略Color属性，使背景透明
             AutoSize:为True时，当文本长度大于Width时会自动增加Label长度
             WordTrap:为True时，当中文文本长度大于Width时会换行，配合height和Width可以实现竖向显示文本
5，Edit控件：编辑框。
  重要属性：Text：编辑框的文本
           SelText:编辑框中被选中的文本
           ReadOnly:只读(大部分编辑控件都有的属性)
           OnChange()：当编辑框中文本发生变化时触发
6， Memo控件：多行的编辑框
  重要属性：Lines：Memo中的一行行文本
            相关方法：1，Lines.Add(String)：添加一行文本；
                     2，Lines.Clear：清空Memo中所有文本；
                     3，Lines.Delete(Col):删除第Col行文本（从0开始）
                     4，Lines.LoadFromFile(FilePath):从文件中获取数据
                     5，Lines.SaveToFile(FilePath):保存到文件中
           scollBars:滚动条，ssVertical：垂直滚动
           SelectAll()；选中memo中所有的文本，但前提是焦点(setFocus)在memo上（点击SpeedButton时焦点不会出现在该按钮上）
           SelText：选中的文本
           将选中文本复制到剪切板:
             Uses Clipbrd;
             Clipboard.AsText := memo.SelText;
           CopyToClipboard:将memo中的文本复制到剪切板
           PasteFromClipboard:将剪切板中的文本粘贴到memo中

7，SpeedButton：可以加图标，点击时焦点不发生改变
8，Button：
    重要属性： ModalResult:showModal的返回值，有mrOK, mrCancel, mrYes, mrNo, mrTryAgain等值
              Default: 键盘输入Enter时默认点击该按钮
              Cancel： 键盘输入Esc时默认点击该按钮
              Click(): 相当于点击了该按钮
9，CheckBox：复选框
    重要属性：  alignment:设置复选框相对于提示文本的位置
               Checked：该复选框是否被选择,只有True或false（一般情况下只有选中和没选中，而当设置AllowGray=True时，状态(state)的变化是没选中(cbUnChecked)——》部分选中(cbGrayed)——》选中(cbChecked)）
               OnClick：当Checked属性发生变化时触发
10，RadioButton:单选框，在一个容器中的所有单选框只有一个可以是选中状态的（通常用一个GroupBox装相关联的单选框）。
11, RadioGroup:单选组，包含多个单选框
      重要属性：Items：选项的文本，一行就是一个选项
               ItemIndex：选中的选项的序号（从0开始），如果组中没有选中的，则为-1
               Columns:组里Items分几列显示
12， ListBox：选项组
      重要属性：Items：选项的文本，一行就是一个选项
               Items.Count:有多少个选项
               Count:有多少个选项
               SelCount:选中的有多少个
               Selected:一个数组，保存的是Items中被选中的情况，选中为True
               ItemIndex: 默认选中的选项的序号（从0开始），如果组中没有选中的，则为-1
               multiSelect:是否允许多选（按Ctrl多选）
               Columns：
               Sorted：是否要按字符串排序Items
               添加和清除数据同Memo控件
               DeleteSelected;删除选中行
 13， ComboBox:下拉列表
      重要属性：Items、ItemIndex
              DropDownCount:下拉时显示多少条选项
              Style:
                   csDropDownList:只能选不能输入
                   csSimple:可以选也可以输入
 14, Dialogs:各种对话框，如打开文件对话框，主要用于获取文件路径，操作文件以后再学。
      Filter：Dialog的过滤器，类似于 *.txt, *.jpg之类的
      OpenDialog：打开文件夹对话框，使用如下：
         if OpenDialog.Execute then
            sFilePath := OpenDialog.FileName;
      SaveDialog:保存数据到文件
        if SaveDialog.Execute then    --如果有选择文件
            memo.Lines.SaveToFile(SaveDialog.FileName);    --将Memo中的文本保存到选中的文件中
      FontDialog：字体样式选择对话框
        if FontDialog。Execute then
            mmo.Font := FontDialog.Font;
      ColorDialog:颜色对话框：Color
      
窗口（Form）在创建完所有控件后会触发OnCreate事件，可以在这个事件里初始化组件。

标签：控件,属性,Delphi,Sender,学习,选中,按钮,文本,第七天
来源： https://www.cnblogs.com/wuchangxing/p/15246459.html

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。