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

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

06.06.2014, 15:00. Просмотров 368. Ответов 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 каждый раз с новой строки (Delphi):

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

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

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

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

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

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

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

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

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

Как сделать, чтобы при нажатии на кнопку Messagebox открывался только один раз?
Как сделать что-бы когда при нажатии на кнопку Messagebox открывался только...

Таблица DrawGrid. При нажатии на кнопку закрашиваются всё чётные строки и нечётные строки
Подскажите пожалуйста. Трудновато сделать задачу. Буду благодарен за ответы....


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

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

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