• TTabControl、TMemo组件(制作一个简单的多文本编辑框)


    TTabControl包含一列字符串标签的tabs

    每个标签控制一个对象

    首先创建一个TForm;接下来添加TTabControl组件和一个文件对话框TOpenDialog(用于添加文件),然后在TTabControl里面添加TMemo(多行文本编辑框),最后在Form上添加一个Button,在Button事件里面添加如下函数

    //在创建窗口的时候设置编辑框的滚动条
    void __fastcall TForm2::FormCreate(TObject *Sender)
    {
        //Memo1->ScrollBars = ssHorizontal;
        Memo1->ScrollBars = ssBoth;
    }
    void
    __fastcall TForm2::Button1Click(TObject *Sender) { OpenDialog1->Options << ofAllowMultiSelect << ofFileMustExist << ofHideReadOnly; if(OpenDialog1->Execute()) { int index = TabControl1->Tabs->Add(OpenDialog1->FileName); Memo1->Lines->LoadFromFile(TabControl1->Tabs->Strings[index]); TabControl1Change(Sender); } }
    // 通过点击上面的tabs进行
    void __fastcall TForm2::TabControl1Change(TObject *Sender)
    {
        Memo1->Lines->LoadFromFile(TabControl1->Tabs->Strings[TabControl1->TabIndex]);
    }

  • 相关阅读:
    数据类型基础
    变量的三个特征
    常量
    变量
    django基础 -- 2. django初识
    django基础 -- 1. 前奏 web框架的本质
    前端 --- 7 Bootstrop框架
    前端 --- 6 jQuery 初始
    前端 --- 5 BOM 和 DOM
    前端 --- 4 js
  • 原文地址:https://www.cnblogs.com/mypsq/p/5079235.html
Copyright © 2020-2023  润新知