📄 cd2_2u.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "cd2_2u.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tfmain *fmain;
int sal[5]={50000,45000,47000,52000,46000};
//窗体区域变量,在这里定义变量是为了让其他事件函数也可用
//---------------------------------------------------------------------------
__fastcall Tfmain::Tfmain(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall Tfmain::endClick(TObject *Sender)//BCB的窗体事件,注意事件
{ //endClick是否与程序相符
Close(); //Close函数用来关闭程序
}
//---------------------------------------------------------------------------
void __fastcall Tfmain::cheClick(TObject *Sender)
{
int no; //设置代表员工编号的整型变量no
no=StrToInt(inp->Text); /*将inp这个Edit对象的Text显示值由字符串
型转换为整数型,并将值存入no变量中*/
if(no<6 && no>0) //(if)如果no(<)小于6(&&)并且(>)大于0时执行下面语句
{ //语句以分号 ; 为段落,若段落只有一个,可以不用大括号 {}
out->Caption=sal[no-1]; //将out这个Label对象Caption属性(=)设定为sal[no-1]
} //注意数组索引值是从0开始(程序就是沟通人机的语言)
else //if不符合条件,(else)则执行下列语句
out->Caption="请输入0~5"; //将out的标题(=)设置为("xxx") xxx 字符串
} //(=)是设定的意思,等于的表示法为(==)
//---------------------------------------------------------------------------
void __fastcall Tfmain::modClick(TObject *Sender)
{
int no; //定义变量str为(String)字符串类型
String str;
no=StrToInt(inp->Text); //将InputBox中获取的内容存入str字符串中
str=InputBox("工资输入", //当按下编辑按钮时会弹出此窗口 语法为InputBox(“标题”,“输入提示”,“默认值”)
"请输入 "+ IntToStr(no)+ " 号员工工资 ","50000"); /*将Str字符串(StrToInt)转换为整型,
并赋给sal数组存储,索引值为no-1*/
sal[no-1]=StrToInt(str); //将out的Caption值设为我们输入的值
out->Caption=sal[no-1];
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -