|
|
| Другие темы раздела | |
| Delphi Поток с заранее заданной переменной Как создать поток, при запуске которого у переменной уже будет задано какое-либо значение? https://www.cyberforum.ru/ delphi-beginners/ thread1231526.html |
Где можно скачать самую последную версию Delphi для Виндовс 8 (ноутбук Сони вайо ) Delphi Нигде не могу найти ! |
| Delphi Подсчитать количество букв "а" в заданном тексте Добрый день. Я знаю подобные задания очень часто встречались, но я всё равно не могу вьехать в принцып подсчитывания количества символов. Суть задания: Вводиться строка, необходимо подсчитать сколько раз встречаеться буква "а". Я пробовал решить данную задачу, вот код: procedure TForm1.Button1Click(Sender: TObject); var sum:string; i,n,k:integer; https://www.cyberforum.ru/ delphi-beginners/ thread1231454.html | Delphi Вывести текст в нужном формате в MS Word Необходимо вывести в следующем формате Ф.И.О. тестируемого: Петров Петр Петрович wdRng.Start := wdRng.End; //Сброс параметров параграфа. wdRng.ParagraphFormat.Reset; //Сброс параметров шрифта. wdRng.Font.Reset; //Добавляем два перевода строки. wdRng.InsertAfter(#13#10); wdRng.ParagraphFormat.Alignment := wdAlignParagraphLeft; https://www.cyberforum.ru/ delphi-beginners/ thread1231386.html |
|
Delphi Вывести результат работы функции GetWindowTitle Здравствуйте. Скажите пожалуйста,как правильно обработать вот эту функцию function GetWindowTitle(Wnd: Windows.HWND): string; var Title: array of Char; begin Windows.GetWindowText(Wnd, Title, Length(Title)); Result := Title; end; |
Delphi Двумерный массив. Заменить все 0 на 5
https://www.cyberforum.ru/ delphi-beginners/ thread1231321.html Всем привет. Суть задачи: двумерный массив. Заменить все 0 на 5. Я вот написал код: Как сделать назад выведение на стринггрид, что бы все 0 были заменены на 5 procedure TForm1.Button1Click(Sender: TObject); a :array of integer; i,j:integer; zum,k:integer; |
| Delphi Нажатие кнопок в фоновом режиме Shift Ctrl и стрелка вниз День добрый. Необходимо сделать нажатие кнопок в фоновом режиме Shift Ctrl и стрелка вниз. Буду признателен, если выложите уже готовую программу, не важно на чем написана. P.S. Программа необходима для имитации нажатия горячих кнопок. https://www.cyberforum.ru/ delphi-beginners/ thread1231282.html |
Delphi Вычислять значение многочлена 1. Вычислять значение многочлена вида Q(P(x)); коэффициенты многочленов P и Q и значение x – вещественные числа 2. В заданной числовой вещественной матрице размерности N*N L-ый столбец увеличить на величину, равную среднему арифметическому максимального и минимального элементов исходной матрицы. Вычислить значения следующих выражений: 1) C = AT * B^2 - (A^2 * BT - E) / min | Aij | 2) D =... |
| Delphi Нужно записать строки из TStringList в ListBox У меня на форме есть ListBox и IdHttp. Надо чтобы при создании формы в него записывались строки из файла на сервере которые я получаю в переменную sound типа TStrngList; var sound: TStringList; begin sound:= TStringList.Create; sound.Add( IdHttp1.Get('http://???.com/sounds.txt') ); ListBox1.Items:=sound; end; https://www.cyberforum.ru/ delphi-beginners/ thread1231248.html | Delphi Добавление кнопок в заголовок формы Как добавить свою кнопку на панель рядом с кнопкой закрыть https://www.cyberforum.ru/ delphi-beginners/ thread1231154.html |
|
Управление сторонним приложением (нажатие клавиш) Delphi Переворошил кучу примеров. все запускаются но толку 0. Собственно нужно чтоб программа которая висит в трее с некоторой периодичностью нажимала на кнопки, и эти кнопки(код) передавались в Активное окно ну или хоть заданное изначально. а теперь пару вопросов. FindWindow ищет только по заголовку? пробовал вставить Хандл вида 0x000000000018086E так не захотел найти этим куском коды я... |
Delphi Перемещение объектов по форме мышью Как можно сделать перемещение объектов на различные места на форме? Т.е, зажимаешь лкм на кнопку и перетаскиваешь ее на нужное место https://www.cyberforum.ru/ delphi-beginners/ thread1231132.html |
|
4 / 2 / 0
Регистрация: 23.02.2014
Сообщений: 133
|
|
| 0 | |
Добавление строк в TStringList и нахождение количества одинаковых строк - Delphi - Ответ 644852121.07.2014, 19:17. Показов 3167. Ответов 6
Метки (Все метки)
1) Добавить несколько строк с текстом 2) Определить кол-во одинак.строк (при чем для каждой разный подсчет: т.е, есть такой текст: а а д д д г У нас получается а-2, д-3, г-1 2) Удалить дубликаты, оставить только по 1 уникальному тексту Вернуться к обсуждению: Добавление строк в TStringList и нахождение количества одинаковых строк Delphi
0
|
|
| 21.07.2014, 19:17 | |
|
Готовые ответы и решения:
6
Нахождение одинаковых строк
Массив из строк. 1) Подсчитать количество одинаковых строк. 2) Реверс строк Функции работы со строками символов: определение размера строки, копирование строк, добавление строк, сравнение строк |
| 21.07.2014, 19:17 | |
| 21.07.2014, 19:17 | |
|
Помогаю со студенческими работами здесь
0
Подсчёт количества одинаковых строк в файлах папки Обработка массивов: нахождение всех пар одинаковых строк Нахождение количества строк, совпадающих с последней Нахождение количества строк двухмерной матрицы |