Написать программу. Delphi

allg · 26.12.2011, 09:54

Здравствуйте.
Необходимо решить задачку на делфи:
Из test1 считать строку s1.
Из test2 считать строку s2 (длина строки s2 не больше длины строки s1)
Определить, сколько раз строка s2 встречается в строке s1.
Результат вывести в test3.
Товарищи, кому не сложно, напишите пожалуйста.

MrSTEP · 26.12.2011, 14:47

Сами-то пробовали хоть что-нибудь сделать? Если да, в чем проблема? Если нет, то почему?

Vladimir_S · 26.12.2011, 15:11

Кстати, паскалевскую часть можно взять отсюда: Помогите с объяснением задач

allg · 26.12.2011, 17:16

Цитата:

Сообщение от MrSTEP

Сами-то пробовали хоть что-нибудь сделать? Если да, в чем проблема? Если нет, то почему?

Я бы с удовольствием. Поставили перед фактом, дали задания, на след.день сдать. Ну а в программировании соответственно я на "алё".

allg · 26.12.2011, 17:20

И ошибочка: вместо test1 - edit1, test2 - edit2, test3 - edit3
Я так понимаю свои сообщения редактировать нельзя?

MrSTEP · 26.12.2011, 18:08

Сообщения редактировать можно, но только 10 минут.
Ну давайте по порядку: открываете Делфи, на форму кидаете три Edit'a и кнопку Button, и сохраняйте проект.

allg · 24.01.2012, 17:19

MrSTEP, вы всё еще готовы помочь?
То что сказали, выполнил.

MrSTEP · 24.01.2012, 18:00

Цитата:

Сообщение от allg

Поставили перед фактом, дали задания, на след.день сдать.

Следующий день прошел уже почти месяц назад

Далее в код нажатия кнопки (событие OnClick) пишите операцию, которая бы взяла в переменную S значение из Эдита. В эдите текст хранится в соответствующем поле. Обращение к полю компонента выполняется так: <имя компонента>.<имя поля>. То есть, Edit.Text;

allg · 24.01.2012, 18:26

Ничего не понял. У меня сейчас на кнопке в юните написано следующее:

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
end;
procedure TForm1.Edit1Change(Sender: TObject);
begin
end;
procedure TForm1.Edit2Change(Sender: TObject);
begin
end;
procedure TForm1.Edit3Change(Sender: TObject);
begin
end;
end.

Цитата:

Сообщение от MrSTEP

Следующий день прошел уже почти месяц назад

Ну так, теперь не факт что примут у меня эти же самые задания.

allg · 24.01.2012, 18:34

Нужно на кнопке в OnClick выбрать Edit1?

Я просто реально не понимаю.

26.12.2011, 09:54	#1 (permalink)
allg Новичок Регистрация: 26.12.2011 Сообщений: 8 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Написать программу. Delphi Здравствуйте. Необходимо решить задачку на делфи: Из test1 считать строку s1. Из test2 считать строку s2 (длина строки s2 не больше длины строки s1) Определить, сколько раз строка s2 встречается в строке s1. Результат вывести в test3. Товарищи, кому не сложно, напишите пожалуйста.

26.12.2011, 09:54
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	В данных топиках должна быть интересующая вас информация Помогите написать программу Помогите написать программу на СИ

26.12.2011, 14:47	#2 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	Сами-то пробовали хоть что-нибудь сделать? Если да, в чем проблема? Если нет, то почему?

26.12.2011, 15:11	#3 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	Кстати, паскалевскую часть можно взять отсюда: Помогите с объяснением задач

26.12.2011, 17:20	#5 (permalink)
allg Новичок Регистрация: 26.12.2011 Сообщений: 8 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	И ошибочка: вместо test1 - edit1, test2 - edit2, test3 - edit3 Я так понимаю свои сообщения редактировать нельзя?

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

26.12.2011, 18:08	#6 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	Сообщения редактировать можно, но только 10 минут. Ну давайте по порядку: открываете Делфи, на форму кидаете три Edit'a и кнопку Button, и сохраняйте проект.

24.01.2012, 17:19	#7 (permalink)
allg Новичок Регистрация: 26.12.2011 Сообщений: 8 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	MrSTEP, вы всё еще готовы помочь? То что сказали, выполнил.

24.01.2012, 18:34	#10 (permalink)
allg Новичок Регистрация: 26.12.2011 Сообщений: 8 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Нужно на кнопке в OnClick выбрать Edit1? Я просто реально не понимаю.