河南机电高等专科学校。
学生实验报告。
实验课程名称 delphi程序设计。
实验项目名称按钮组件的综合应用。
系、部计科系年级软件专业班软件101
学生姓名张春攻学号 101012124
实验时间 2011-10-12
一、实验目的。
1、选择应用程序所需要的按钮组件；
2、对选择的按钮组件进行属性设置；
3、调用按钮组件的方法；
4、编写按钮组件的事件过程；
二、实验内容。
设计简易计算器，程序界面及功能可参照下图完成。
三、实验要求。
1、做好实验预习，掌握，并熟悉本实验中所使用的按钮组件的常用属性、事件和方法；
2、写出实验报告，内容是：
实验目的 。
实验内容（要求写出程序的关键**）。
四、实验过程原始记录(数据、图表、计算等)
unit unit1;
interface
useswindows, messages, sysutils, variants, classes, graphics, controls, forms,dialogs, stdctrls, extctrls, jpeg;
typetform1 = class(tform)
edit1: tedit;
edit2: tedit;
edit3: tedit;
edit4: tedit;
yi: tbutton;
er: tbutton;
san: tbutton;
si: tbutton;
jia: tbutton;
liu: tbutton;
qi: tbutton;
ba: tbutton;
jian: tbutton;
wu: tbutton;
cheng: tbutton;
chu: tbutton;
ll: tbutton;
kong: tbutton;
ling: tbutton;
jiu: tbutton;
kf: tbutton;
pf: tbutton;
deng: tbutton;
dian: tbutton;
timer1: ttimer;
label1: tlabel;
procedure yiclick(sender: tobject);
procedure erclick(sender: tobject);
procedure sanclick(sender: tobject);
procedure siclick(sender: tobject);
procedure wuclick(sender: tobject);
procedure liuclick(sender: tobject);
procedure qiclick(sender: tobject);
procedure baclick(sender: tobject);
procedure jiuclick(sender: tobject);
procedure lingclick(sender: tobject);
procedure llclick(sender: tobject);
procedure chuclick(sender: tobject);
procedure chengclick(sender: tobject);
procedure jianclick(sender: tobject);
procedure jiaclick(sender: tobject);
procedure dianclick(sender: tobject);
procedure kongclick(sender: tobject);
procedure pfclick(sender: tobject);
procedure kfclick(sender: tobject);
procedure dengclick(sender: tobject);
procedure yimouseup(sender: tobject; button: tmousebutton;
shift: tshiftstate; x, y: integer);
procedure timer1timer(sender: tobject);
private
public
end;var
form1: tform1;
m,n,x:integer;
implementation
$r *.dfm}
procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
beginif ''then
else
end;procedure tobject);
begin
2019实验操作考试实验详细程序
实验一 粗盐的提纯操作程序。一。填写考号和姓名。二。填写实验用品 5种以上 三。实验过程 1.先向量筒中倾倒8ml左右的水，再用胶头滴管滴加至10ml刻度处，倒入小烧杯 2.将纸包内的粗盐倒入烧杯的水中，用玻璃棒轻轻搅拌约30秒 3.将滤纸对折两次，一边一层一边三层展开，放在漏斗里用拇指按住，用胶头...
2019实验讲义
实验。一 乙二胺四乙酸铜 edta 配合物的常温合成。实验目的 1 通过乙二胺四乙酸铜配合物的合成和性质表征使学生对配合物研究领域有一个初步印象。2 了解相关的合成技术和方法。实验方法 常温溶液法。实验内容 乙二胺四乙酸铜配合物的制备。试剂 乙二胺四乙酸，两个结晶水的氯化铜，氢氧化钠，甲醇均为分析纯...
2019设计实验
综述近年来有关大肠杆菌 的l 天冬酰胺酶的结构与功。能 纯化工艺以及酶的修饰的研究进展。l2 天冬酰胺酶具有抗肿瘤活性，目前临床上已将其用于儿童急性淋巴细胞白血病的 是 此类白血病的重要的药物。l2天冬酰胺酶 l2asparaginase l2asp ec13151111 又名l 门冬酰胺酶或l 天...