在form1上建立的对象有：Label1~Label2、Edit1（输入数）、Edit2（输出序列）、Button1（确定）等。 Button1按钮的处理程序如下： procedure TForm1.Button1Click(Sender: TObject); var i, j: Integer; begin Edit2.Text := ..; j := StrToInt(Edit1.Text); for i := 1 to j do Edit2.Text := Edit2.Text + IntToStr(i); end; 当用户输入一个1位正整数数值8，然后按“确定”按钮，在“输出系列”显示结果为 。 A、01234567 B、12345678 C、88888888 D、87654321
