Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
Michalich
10 / 9 / 0
Регистрация: 31.08.2011
Сообщений: 382
#1

Выводить из StringList в Edit слова по порядку при нажатии на кнопку - Delphi

13.12.2015, 18:14. Просмотров 235. Ответов 6
Метки нет (Все метки)

Загружен текст в stringlist
Вася
Петя
Маша
Саша
Коля
Оля
Нужно при нажатии на button выводить в edit слово,
нажал вывелось Вася,еще раз нажал вывелось Петя и
так по порядку до конца, и отследить при выводе
последнего слова,то что оно последнее. Подскажите.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.12.2015, 18:14
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Выводить из StringList в Edit слова по порядку при нажатии на кнопку (Delphi):

Как при нажатии на кнопку в Edit выделить текст? - Delphi
Я нажимаю на кнопку, в едите генерируется текст, но мне надо, чтобы он в это же время выделялся, как это сделать?

Программа должна при нажатии на кнопку выводить в метку площадь, а орнамент - менять цвет - Delphi
На счёт площади вопросов нет, но как сделать чтобы орнамент цвет менял(там 12 меток). Пробовала присвоить цвет сумме меткок.цвет но...

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

При нажатии на кнопку, должно создаться столько потоков, сколько указанно в Edit - Delphi
Всем привет!) На форме у меня есть один едит и есть одна кнопка. При нажатии на кнопку, должно создаться столько потоков, сколько...

Cделать кнопку на форме, при нажатии на которую на форму будет добавляться компонент Edit - Delphi
Подскажите пожалуйста, можно ли сделать кнопку на форме, при нажатии на которую на форму будет добавляться компонент Edit ?

При нажатии на кнопку в первой половине сроки "перед двоеточием" добавить текст введенный в edit - Delphi
Помоги с кодом: В memo добавляю текст (построчно) : 1111111:1111111 0000000:0000000 Нужно чтобы при нажатии на кнопку в первой...

6
mss
2599 / 2255 / 250
Регистрация: 24.12.2010
Сообщений: 13,725
13.12.2015, 18:17 #2
Edit.Text := StringList[Edit.Tag];
Edit.Tag := (Edit.Tag + 1) mod StringList.Count;
1
Michalich
10 / 9 / 0
Регистрация: 31.08.2011
Сообщений: 382
13.12.2015, 18:21  [ТС] #3
Спасибо,а как понять что последнее слово выводиться?
0
mss
2599 / 2255 / 250
Регистрация: 24.12.2010
Сообщений: 13,725
13.12.2015, 18:24 #4
Перед выводом Тег будет равен кол-ву строк минус 1
0
Michalich
10 / 9 / 0
Регистрация: 31.08.2011
Сообщений: 382
13.12.2015, 18:31  [ТС] #5
Че то не доехал, у меня выводиться тег 0,1,2,3 и.т.д , как узнать сразу сколько строк
0
mss
2599 / 2255 / 250
Регистрация: 24.12.2010
Сообщений: 13,725
13.12.2015, 18:32 #6
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Цитата Сообщение от Michalich Посмотреть сообщение
как узнать сразу сколько строк
StringList.Count
1
Michalich
10 / 9 / 0
Регистрация: 31.08.2011
Сообщений: 382
13.12.2015, 18:37  [ТС] #7
Спасибо!!!!!
0
13.12.2015, 18:37
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.12.2015, 18:37
Привет! Вот еще темы с ответами:

Как сделать, чтобы при первом нажатии на кнопку TButton появлялось одно сообщение, а при втором нажатии - другое? - Delphi
помогите как сделать в чтобы в кнопке button при первом нажатий вылазило сообщение ShowMessage('Вы ввели неверные данные, повторите...

При нажатии на кнопку вывести надпись, при нажатии на другую - сбросить - Delphi
Создайте программу, которая при нажатии на одну кнопку (объект Button) выводит на этикетку (Label) некоторую надпись, а при нажатии на...

Memo в delphi / как сделать так чтобы при нажатии на кнопку memo появляется, при повторном нажатии исчезает - Delphi
как сделать так чтобы при нажатии на кнопку текст с memo появляется, при повторном нажатии исчезает - как сделать так чтобы при нажатии...

Событие при нажатии enter в edit - Delphi
Делаю событие для edit, по нажатию на enter вот так: В OnKeyDown пишу: if Key = VK_RETURN then button3.Click; При нажатии всё...


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

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

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