FreePascal.ru

вот что я наделал посмотрите скажите как сделать так чтобы он не выводил повторяющиеся символы по нескольку раз а 1 раз пример

w-2,t-2....и т.д.


TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);
procedure Edit2Change ...

Большое спасибо за помощь далле пробую сам написать что-либо, а что из этого получится выложу сюда для просмотра вами

Padre_Mortiu
то есть найти на какой позиции стоит та или иная буква?

хорошо сейчас выложу

Добавлено спустя 1 минуту 6 секунд:
Re: Помогите плиз до понедельника 29 декабря надо написать
VirtUX да согласен задача не сложная но я только учусь програмированию

Добавлено спустя 4 минуты 9 секунд:
Re: Помогите плиз до понедельника 29 декабря надо написать
var ...

Помогите плиз до понедельника 29 декабря надо написать прогу.

Вообщем смысл этой программы в том чтобы состоит из 2 текствоых edit 'ов и одной кнопки

В одном текстовом поле написано:

weter weter ti mogu4

При нажатии на кнопку программа должна подсчитать сколько в этой строчке букв:

w-2,e-4,t ...