|
|
Другие темы раздела | |
Delphi Удалить из файла две первые и две последние строки и добавить строки с экрана в начало и конец файла Задание: Создать текстовый файл. Заполнить его произвольным числом строк. Удалить из файла две первые и две последние строки и реализовать функцию добавления строки с экрана в начало и конец файла. Как открывать файл изменять его в memo и сохранять я разобрался procedure Tlab6.Button1Click(Sender: TObject); var f:TextFile; begin if OpenDialog1.Execute then https://www.cyberforum.ru/ delphi-beginners/ thread1171172.html |
Определить количество слов в строке Delphi Как подсчитать сколько раз в строке повторяется слово ? допустим слово апельсин в строке апельсин, мондарин, апельсин,яблоко, груша, апельсин |
Delphi TVLCZip компонент, архивация всех папок в подпапке
https://www.cyberforum.ru/ delphi-beginners/ thread1171153.html Здравствуйте! Нужна ваша помощь, есть код, архивирует файлы теста, так же в папке, в которой он архивирует есть другие папки, нужно сделать так, чтобы в выходном файле была такая структура: каталог: -файлы теста подкаталог -все файлы подкаталог 2 - все файлы, возможно ли это осуществить? код архиватора: |
Delphi Очищение StringGrid-а
https://www.cyberforum.ru/ delphi-beginners/ thread1171097.html Проблема такова что когда нажимаю на кнопку очистить в данном случае это btn4.Цикл должен чистить stringgrid и при повторном пользовании должно быть все хорошо.Но нет,как-то криво получается. К примеру:Первый раз запустил и указал, что будет 3 позиции в массиве,после очистки же получится так, что запись в массиве (если указать например 10 позиций) начнется с 4 позиции, если же указать 3 то... |
Delphi Оставить слово/цифру между тегами Доброго времени суток. Открыл для себя, что при парсинге сайтов быстрее и лучше будет использовать "регулярные выражения", "DOM-модель". Нашел в вики про регулярные, но ничего не понял. Пытался разобраться с DOM-моделью, но... почти не дошло. Как записать в мемо только нужное слово/цифры и т.п.? <td align="right"><strong>4243</strong></td></tr><tr><td>Число провинций (наместников)</td> <td... |
Delphi В массиве из 25 элементов все отрицательные элементы заменить положительными
https://www.cyberforum.ru/ delphi-beginners/ thread1171073.html Напишете программу на языке Pascal, которая в массиве из 25 элементов все отрицательные элементы делает положительными. Массив должен заполняться случайными значениями в интервале от -50 до 50 |
Delphi Код скрывает панели и очищает эдиты вместо закрытия окна сообщения procedure TForm1.BitBtn1Click(Sender: TObject); begin k := MessageDlg('Вернуться?', mtWarning, , 0); if k = mrOk then Edit1.Clear; Edit2.Clear; Form1.Panel1.Visible := False; Form2.Panel1.Visible := False; end; https://www.cyberforum.ru/ delphi-beginners/ thread1171072.html |
При введении значения в Edit1 и Edit5 получить с помощью расчета по формуле значение в Edit2 Delphi Всем привет! Делаю программу расчета редуктора. Возникла проблема.Необходимо при введении Значения в Edit1 и Edit5 получить с помощью расчета по формуле значение в Edit2. Можно кусочек текста реализации сей причуды? Картинка во вложении. |
Delphi Комментарии кода Помогите понять данный код пожалуйста. Закомментируйте то, что возможно. var Rec: TSearchRec; path: string; i: byte; s: string; begin Form1.ComboBox1.Clear; path := ExtractFileDir(Application.ExeName) + '\' + 'file\'; https://www.cyberforum.ru/ delphi-beginners/ thread1171004.html |
Delphi Неправильное отображение программы в панели задач
https://www.cyberforum.ru/ delphi-beginners/ thread1170999.html Программа нормально запускает главную форму, но если навести курсор на значок в панели задач, то там с заголовком "Project 1" будет находиться совершенно другая, не главная форма. Может быть это как-то связано с тем, что на главной форме для той формы, которая отображается прописано AlphaBlend := False; ? В общем можно как-то избавиться от этого неправильного отображения? Спасибо :) |
Проверка буфера обмена Delphi Как проверить, находится ли в буфере файл, например .doc ? |
Delphi Перегрузка (полиморфизм)
https://www.cyberforum.ru/ delphi-beginners/ thread1170947.html Здравствуйте. Мне нужно использовать перегрузку в следущей задаче: Имеется компонент stingrid, в который заносится длина и диаметр трубы (цилиндра) и по этим данным рассчитывается объем, и строка с наибольшим объемом выделяется цветом. Каким образом можно использовать этот метод в данной задаче? Можете подать идею? P.S. Есть только мысль использовать перегрузку в том случае, если вводится... |
0 / 0 / 0
Регистрация: 15.08.2017
Сообщений: 1
|
|
0 | |
Дан текстовый файл, содержащий более трех строк. Удалить из него три последние строки - Delphi - Ответ 615045310.05.2014, 06:41. Показов 2006. Ответов 1
Метки (Все метки)
Дан текстовый файл , содержащий более трех строк. Удалить из него три последние строки.
Вернуться к обсуждению: Дан текстовый файл, содержащий более трех строк. Удалить из него три последние строки Delphi
0
|
10.05.2014, 06:41 | |
Готовые ответы и решения:
1
Дан текстовый файл, содержащий более трех строк. Удалить из него три последние строки Дан текстовый файл, содержащий более трех строк. Удалить из него три последние строки Дан текстовый файл, содержащий более трех строк. Удалить из него три последние строки Дан текстовый файл, содержащий более трех строк. Удалить из него последние три строки |
10.05.2014, 06:41 | |
10.05.2014, 06:41 | |
Помогаю со студенческими работами здесь
0
Дан текстовый файл, содержащий более трех строк Дано число k<10, введенное с клавиатуры и текстовый файл, содержащий более k строк. Удалить из него первые k строк. Результат вывести на экран Дано число k (< 10) и текстовый файл, содержащий более k строк. Создать новый текстовый файл, содержащий k последних строк исходного файла Дано число k и текстовый файл, содержащий более k строк. Создать новый текстовый файл, содержащий k последних строк |
Новые блоги и статьи | |||||
Как подключить JavaScript файл в другом JavaScript файле
InfoMaster 20.01.2025
В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .
|
Как откатить изменения в исходниках, не внесенные в Git
InfoMaster 20.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .
|
В чем разница между px, in, mm, pt, dip, dp, sp
InfoMaster 20.01.2025
В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .
|
Как изменить адрес удалённого репозитория (origin) в Git
InfoMaster 20.01.2025
В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
|
Как переместить последние коммиты в новую ветку (branch) в Git
InfoMaster 20.01.2025
При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .
|
Как вернуть результат из асинхронной функции в JavaScript
InfoMaster 20.01.2025
Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .
|
Какой локальный веб-сервер выбрать
InfoMaster 19.01.2025
В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .
|
Почему планшеты и iPad уже не так популярны, как раньше
InfoMaster 19.01.2025
Эра революционных инноваций
История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .
|
Как самому прошить BIOS ноутбука
InfoMaster 19.01.2025
BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .
|
Какой Linux выбрать для домашнего компьютера
InfoMaster 19.01.2025
Современные реалии выбора операционной системы
В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .
|
Как объединить два словаря одним выражением в Python
InfoMaster 19.01.2025
В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .
|
Как без исключения проверить существование файла в Python
InfoMaster 19.01.2025
При разработке программного обеспечения на Python часто возникает необходимость проверить существование файла перед выполнением операций с ним. Это критически важная задача, которая помогает избежать. . .
|