Страница 1 из 1

Поле Edit

Добавлено: 18 дек 2008, 13:59
Anton_XXX
Привет всем!
Как сохранить значение вводимое в одно поле Edit в массив?

например:
я ввожу в поле Edit значение:=100
после чего нажимаю кнопку "добавить" это значение.
потом опять ввожу в поле Edit другое значение:=400;
"добавить" это значение.

врезультате должно получиться так:

n[1]:=100;
n[2]:=400;
.
.
.
n:=StrToInt(edit1.Text);

подскажите плыззз!

Re: Поле Edit

Добавлено: 18 дек 2008, 22:21
Esgal
[syntax=delphi]
var
Form1: TForm1;
i:word=0;
n:array [word] of word;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
n:=StrToInt(Edit1.Text);
inc(i);
Edit1.Clear;
end;
[/syntax]