Привет всем!
Как сохранить значение вводимое в одно поле Edit в массив?
например:
я ввожу в поле Edit значение:=100
после чего нажимаю кнопку "добавить" это значение.
потом опять ввожу в поле Edit другое значение:=400;
"добавить" это значение.
врезультате должно получиться так:
n[1]:=100;
n[2]:=400;
.
.
.
n:=StrToInt(edit1.Text);
подскажите плыззз!
Поле Edit
Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду
[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]
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]
Luke! Use the Force! Use the Force... oh, Luke! Stop using the Force, use your head!