delphi计算器设计代码

var Form1: TForm1; Temp1 : string; //存放数值一和结果 Clkd : boolean = false; //等