Question

delphi 编辑框取数的问题

edit框中有这样一排数字 39;29;56;45;13, ----现在需要取其中的每个数字然后比较大小，我犯难的在于如何以分号为标志进行取数？

Answer 1

Procedure TForm1.BitBtn1Click(Sender: TObject);
Var
alist: TStringList;
I: Integer;
Begin
alist := TStringList.Create;
Try
alist.Delimiter := ';';
alist.DelimitedText := self.Edit1.Text;

for i:=0 To alist.Count -1 Do
Begin
showmessage(alist[I]);
End;

Finally
alist.Clear;
alist.Free;
End;
End;
判断大小凳敏仿拿早用math单元的函数枣纤

追问

初学delphi，看着有点不懂，网上翻看了下关于tstringlist的用法大致看懂点，还有点小问题：
1，‘self.edit1.text’ 为什么前面要加self，不能直接是edit1.TEXT吗？
2，alist.count 属性是不是记录了 以‘；’为分隔符的数字的量总和？
3，代码中的 ‘try’ 和‘finally’ 有什么作用（英语意思我懂）。

追答

1：可以直接写，我是为了偷懒，利用delphi的代码提示功能。
2：是的。tstringlist的功能很强大的，自己慢慢研究。
3：这个是基本语法，自己看下相关资料。