才接触Delphi,请问高手,如何实现对任意输入数字的排序.基本算法我知道. 主要是用edit输入数字,怎样赋值给自己定义的数组等.
主要是用edit输入数字,怎样赋值给自己定义的数组
什么意思,你想在那里把输入的数字赋值给数组?
如果只是把字符数组赋值给整形数组,可以参考下面代码
procedure TForm1.Button2Click(Sender: TObject); var a : array[0..10] of integer; s : string; i : integer; begin Edit1.Text := '12345'; s :=edit1.Text; for i := 1 to length(s) do a[i-1] := strtoint(s[i]); ShowMessage(inttostr(a[i-2])); end;
呵呵,谢谢。 那如果是要实现使用edit组件,在运行Delphi时,任意输入的多个整数,怎样将每个输入的数字依次赋值给数组?我主要是想编程实现对自己输入的数字显示每次的排序结果
结果显示在Memo中
|