Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Шифр Виженера: программа неправильно расшифровывает строку при чтении из файла https://www.cyberforum.ru/ delphi-beginners/ thread2171595.html
Есть программа которая шифрует/дешифрует по методу Виженера. В чем может быть проблема, если я ввожу один текст то расшифровывает нормально, а когда загружен из фала неправильно(может неправильно считывает строки).Заранее спасибо
Delphi Как правильно перерисовать компонент?
создал компонент кнопка - (в учебных целях) и вот такая конетель: если я над классом ТВИНКОНТРОЛ проведу мышкой компонент перерисуется ну поскольку я обрабатываю события procedure MEnter(var Mes: TMessage); message CM_MOUSEENTER; procedure MLeave(var Mes: TMessage); message CM_MOUSELEAVE; procedure MClick(var Mes: TMessage); message WM_LBUTTONDOWN; procedure...
Delphi Вывести информацию о процессе Нужно вывести на Memo 1 находящийся в edit1 процесс Например сколько мб , где расположен и т.д Весь интернет перерыл не нашел! https://www.cyberforum.ru/ delphi-beginners/ thread2171472.html Delphi Ошибка в программе $C0000005 Всех приветствую. Прошу помочь. Написал программу. Запустил. Выполнил условие, дошло до этого момента: tmr.Interval := 4000; и программа вылетает с ошибкой (скриншот). https://www.cyberforum.ru/ delphi-beginners/ thread2171316.html
Создание компонента в делфи Delphi
не могу найти где почитать, интересует такой момент. когда перетаскиваешь компонент на форму он должен отрисоватся в момент проектирования а как это сделать и где почитать может у кого есть вырезка?
Delphi Написать программу, позволяющую найти все источники заданного орграфа https://www.cyberforum.ru/ delphi-beginners/ thread2171221.html
"Источником" орграфа называют вершину, от которой достижимы все другие вершины. Разработать алгоритм и написать программу позволяющую найти все источники заданного орграфа. Решить на форме. Ужасная задача, всей группой не могли решить её
Delphi Добавить изображение на итем listview через imagelist в ручную если добавляю картинку в imagelist и ставлю в итеме нужный индекс, то картинка появляется в итеме listview . Программно такое сделать не получается, что делать не знаю ImageList1.FileLoad(rtBitmap, "путь", clAqua); ListView1.AddItem("имя",nil); ListView1.Items.ImageIndex:=i; https://www.cyberforum.ru/ delphi-beginners/ thread2171220.html Delphi Парсинг Double из JSON, xSuperObject
Начал пансить JSON примерно такого содержания (юзаю xSuperObject): { ... "key1": 0.00000012, ... }
Delphi Как подключить 7z.dll (библиотека 7zip) к своей программе https://www.cyberforum.ru/ delphi-beginners/ thread2171049.html
Как связать 7z.dll и программу делфи чтобы можно было добавлять в архив выбирать тип сжатия, метод итд И как архив files.7zip вложить в exe через ресурсы потом можно было распаковывать
Delphi Изменение программы "выбор фигуры" Есть программа, позволяющая выбрать из списка ListBox название геометрической фигуры(эллипс, ромб, прямоугольник) и рисовать выбранную фигуру в компоненте Image. Расположения фигуры в компоненте (I четверть,II четверть,III четверть,IV четверть) и цвет окраски (синий,красный,желтый) выбирается из компонентов RadipGroup. Так вот нужно убрать эллипс и ромб и вместо них добавить окружность,... https://www.cyberforum.ru/ delphi-beginners/ thread2171046.html
Delphi Закрытие формы
При нажатии на кнопку нужно сделать так, чтобы ЭТА форма (Form0) закрывалась и открывалась другая (Form1). В данном случае получается лишь только открыть след.форму(Form1), а эта (Form0) не закрывается... Ставил Form0.Close, а толку 0... Не понимаю, как правильно сделать-то... :wall::help:
Delphi Дописать 2 функции Добрый вечер, подскажите, пожалуйста, как в программу правильно вписать еще две любые функции функции program Project1; {$APPTYPE CONSOLE} uses SysUtils; const n=4; var k:arrayof integer; fin,fout:file of integer; var i:integer; https://www.cyberforum.ru/ delphi-beginners/ thread2170944.html
Модератор
9459 / 6212 / 2420
Регистрация: 21.01.2014
Сообщений: 26,489
Записей в блоге: 3
10.01.2018, 07:18 0

Изменить программу "Добавление префикса к каждому слову в файле" - Delphi - Ответ 12017041

10.01.2018, 07:18. Показов 1261. Ответов 7
Метки (Все метки)

Лучший ответ Сообщение было отмечено Splatt как решение

Решение

Цитата Сообщение от Splatt Посмотреть сообщение
прошу помочь, если не мне, то одногрупнику
А одногруппник сам стесняется зайти и спросить?

Не по теме:

Блин блинский, я бы тоже курнул того же, что и автор этого "стыренного кода"



Добавлено через 2 минуты
Splatt, а версию Дельфи чего постеснялись указать?

Добавлено через 47 секунд
А, ладно, на скрине увидел...

Добавлено через 1 час 2 минуты
В простейшем случае все решается проходом по строкам файла; для каждой строки выполнить команду:
Delphi
1
s := StringReplace(s, ' ', ' ак', [rfReplaceAll]);
но данном случае не будет учитываться то, что слово может начинаться с некоторого символа, отличного от буквы (кавычки, 'одинарные', "двойные", <угловые>, открывающие скобки всех мастей...), а так же то, что знак препинания может быть в середине строки как отдельное слово (тире, например). Надо это учитывать или нет - пес его знает, ТС об этом не сказал, его одногруппник тоже стесняется...
Поэтому Splatt, пример текстового файла приведите, с которым Вы собираетесь оперировать, чтобы потом, в ответ на предоставленный код, не получить бездоказательное "Не работает!".

Вернуться к обсуждению:
Изменить программу "Добавление префикса к каждому слову в файле" Delphi
1
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.01.2018, 07:18
Готовые ответы и решения:

Добавление подстроки к каждому слову строки
Имеется задание: Ввести с клавиатуры строку. Добавить к каждому слову подстроку &quot;бай&quot;. Пример -&gt;...

Поток string (получить доступ к каждому слову строки и к каждому символу каждого слова для сортировки)
#include&lt;iostream&gt; #include&lt;fstream&gt; #include&lt;string&gt; using namespace std; int main() { ...

Добавление префикса
Помогите пожалуйста, есть кнопки для занятия разных очередей, при нажатии на кнопку добавляются...

Добавление префикса и окончания
Привет! Есть слово (напр., мудрый), нужно чтобы к этому слову добавлялись спереди и сзади любое...

7
10.01.2018, 07:18
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.01.2018, 07:18
Помогаю со студенческими работами здесь

Добавить номер к каждому слову в предложении
Дан текст предложения с точкой. Сформировать новую строку на основе исходной, в которой после...

К каждому слову добавить невидимое окончание
Всем доброго времени суток! Необходимо к каждому слову в тексте (word) добавить оканчание...

Присвоить свой стиль каждому слову
Возможно ли с помощью css сделать следующее. (CMS DLE) При добавлении новости, в поле пишу слово...

Добавление префикса ключам массива
Вопрос похожий на https://www.cyberforum.ru/php/thread327247.html Но тут суть в том что...

Алгоритм для добавления символа к каждому слову
Имеется большое число(32 000) написанных в столбец слов в текстовом файле (txt) Пример one two ...

Обрабатывать нажатие отдельно по каждому слову в TextBox
Всем здравия, форумчане! Нужен совет: как можно обрабатывать нажатие отдельно по каждому слову в...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru