Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Edmund
0 / 0 / 0
Регистрация: 09.11.2015
1

При нажатии на кнопку добавлять данные в StringGrid каждый раз с новой строки

06.06.2014, 15:00. Просмотров 377. Ответов 0
Метки нет (Все метки)

Доброго дня!
1) Нужно чтобы при нажатии на кнопку данные добавлялись в таблицу каждый раз с новой строки.
Помогите воплотить. Были мысли сделать это с использованием цикла..
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
procedure TForm1.Button2Click(Sender: TObject);
  var
i,n:integer;
begin
Form2.Show;
 
 
begin
Form2.StringGrid1.Cells[1,n]:=Form1.Edit1.Text;
Form2.StringGrid1.Cells[2,n]:=Form1.Edit2.Text;
Form2.StringGrid1.Cells[3,n]:=Form1.Edit8.Text;
Form2.StringGrid1.Cells[4,n]:=Form1.Edit3.Text;
Form2.StringGrid1.Cells[5,n]:=Form1.Edit4.Text;
Form2.StringGrid1.Cells[6,n]:=Form1.Edit5.Text;
Form2.StringGrid1.Cells[7,n]:=Form1.Edit6.Text;
Form2.StringGrid1.Cells[8,n]:=Form1.Edit7.Text;
Form2.StringGrid1.Cells[9,n]:=Form1.Memo1.Text;
 
 end;
  end;
 
procedure TForm2.FormCreate(Sender: TObject);
begin
 with StringGrid1 do
 begin
cells[0,0]:='No';
cells[1,0]:='Èìÿ';
cells[2,0]:='ГќГ«.ïî÷òГ*';
cells[3,0]:='ГЏГ*ðîëü';
cells[4,0]:='Íîì.òåë.';
cells[5,0]:='Ãîðîä';
cells[6,0]:='ГЉГ*òåãîðèÿ';
cells[7,0]:='Г–ГҐГ*Г*';
cells[8,0]:='Г’ГҐГ¬Г*';
cells[9,0]:='ГЋГЇГЁГ±Г*Г*ГЁГҐ';
end;
end;
2) В Edit1,Edit2,.... прописаны слова.
Нужно чтобы при нажатии на Edit1 стирался текст

При нажатии на кнопку добавлять данные в StringGrid каждый раз с новой строки


Добавлено через 7 минут
пункт 1 актуален,
2) решилось в events onclick - Edit1.Clear;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.06.2014, 15:00
Ответы с готовыми решениями:

Как при нажатии на кнопку добавлять каждый раз новые строчки в StringGrid
Всем привет) у меня такая проблема, не знаю как сделать, чтобы добавлялись...

При нажатии на кнопку добавлять по одной строке из файла в поле Memo
как при нажатии на одну и ту же кнопку добавлять по одной строке в поле memo...

При нажатии на кнопку закрашивать ячейку StringGrid
можно сделать так, что бы при нажатии на кнопку (button) закрашивался ячейка...

StringGrid: сменить цвет ячейки при нажатии на кнопку
Есть stringgrid и кнопка. При нажатии на кнопку происходит поиск одинаковых...

StringGrid, продолжение поиска при повторном нажатии на кнопку
Проблема такая, вот мой поиск. Как сделать так что бы при нажатие еще раз на...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
06.06.2014, 15:00

При нажатии на кнопку, из edit-ов должна переноситься информация в столбцы StringGrid
procedure TForm1.Button1Click(Sender: TObject); begin StringGrid1.RowCount :=...

Не хочу чтобы форма вылетала каждый раз при нажатии=)
Application.Initialize; form2:=tform2.create(application); ...

Как сделать так, чтобы при нажатии на кнопку в StringGrid создавалась еще 1 строка снизу
Есть StringGrid и с 1 строкой, вводятся данные в стандартные компоненты и после...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru