Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Сохранение в двумерный массив текста из MaskEdit Суть в том, что нужно сохранять введённое значение в MaskEdit сохранялось в *txt но, без перезаписи, а каждый раз эта информация обновлялась и добавлялась новая запись внесённая в маскэдит. Как... https://www.cyberforum.ru/ delphi-beginners/ thread1177436.html Delphi Разработать программу, которая меняет местами в выбранном слове третью и последнюю буквы
Разработать программу, которая меняет местами в выбранном слове третью и последнюю буквы.
Delphi Разработать программу подсчета общего количества символов в строке, не считая пробелов Разработать программу подсчета общего количества символов в строке не считая пробелов. https://www.cyberforum.ru/ delphi-beginners/ thread1177418.html Delphi Программа для обмена сообщениями по локальной сети Необходимо создать прогрпммы для обмена сообщениями по локальной сети. Не могу понять в чем дело((( при компеляции выдает ошибку(смотрите выделенный фрагмент) - {Если соединение уже установлено, то... https://www.cyberforum.ru/ delphi-beginners/ thread1177352.html
Перетаскивание объектов Delphi
ребята тут лаюа с перетаскиванием. в лабе если букву перетащить в слово то эта буква становится на последее место( например сл_ва, с перетаскиванием выходи слвао), а мне нужно что бы на место _ ...
Delphi Создать файл, содержащий сведения о сдаче студентами сессии https://www.cyberforum.ru/ delphi-beginners/ thread1177297.html
А. Создать файл, содержащий сведения о сдаче студентами сессии. Структура записи: индекс группы, фамилия студента, оценки по пяти экзаменам и пяти зачетам ("з" означает зачет, "н" - незачет). ...
Delphi В чём ошибка? '' is not a valid floating point value https://www.cyberforum.ru/ delphi-beginners/ thread1177293.html
После компиляции выводит ошибку (''' is not a valid floating point value). нужна помощь) unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,...
Использование компьютерных технологий для решения задачи линейного программирования (ЗЛП) Delphi
Нужна программа на Delphi,которая всё это посчитает.Может кто делал такое или что-то подобное Решите ЗЛП графически и с помощью Симплекс-метода: L(X)={x}_{1}-3{x}_{2} \rightarrow max ...
Delphi Вычислить площади 2-х треугольников формулой Герона и определить, какой треугольник имеет большую площадь Два треугольника заданы координатами своих вершин. Вычислить площади треугольников с помощью формулы Герона и определить, какой треугольник имеет большую площадь.Delphi.Пожалуйста с... https://www.cyberforum.ru/ delphi-beginners/ thread1177248.html Delphi Туристический маршрут Сформулировать туристический маршрут,состоящий из пяти пунктов назначения,названия которых выбираются из выпадающего списка.Полный путь маршрута формируется в поле Memo. https://www.cyberforum.ru/ delphi-beginners/ thread1177220.html
Delphi Работа с картинкой
Всем доброго время суток. У меня такой вопрос. Я делаю курсовой работу по теми "графические возможности Делфи". Я создала форму и в ТImage загрузила картинку с разными фигурками. И мне надо сделать...
Delphi Задача с отрезками https://www.cyberforum.ru/ delphi-beginners/ thread1177181.html
На прямой линии расположено N отрезков, которые находятся в интервале от 1 до 500. Необходим выбрать наибольшее количество попарно непересекающихся, Отрезки пересекаются если они имеют хотя бы одну...
587 / 538 / 206
Регистрация: 24.01.2012
Сообщений: 1,330
15.05.2014, 23:46 0

Работа с файлами - Delphi - Ответ 6178802

15.05.2014, 23:46. Показов 440. Ответов 1
Метки (Все метки)

Ответ

Вот такой код найдет в папке с программой все файлы имя которых начинается на file и с расширением txt
Pascal
1
2
3
4
5
6
7
8
9
procedure TForm1.Button2Click(Sender: TObject);
var r:TSearchRec;
begin
   if FindFirst(ExtractFilePath(ParamStr(0))+'file*.txt',faAnyFile,r)=0 then
   Repeat
     //здесь нужно вставить код по обработке файла
   until FindNext(r)<>0;
   FindClose(r);
end;
дальше обработку файлов можно вставить прямо внутрь цикла или просто сохранить найденные имена в стринглист, листбокс, мемо или еще где нибудь, а потом обрабатывать по запросу.

Вернуться к обсуждению:
Работа с файлами Delphi
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.05.2014, 23:46
Готовые ответы и решения:

Работа с файлами , хотелось бы с windows system файлами
всем привет, нужна интересная идея по программированию, работа с файлами , хотелось бы с windows...

Лабораторная работа №5. Работа с файлами и алгоритмы сортировки
1. Написать функцию Load для считывания из текстового файла (например, Workers.txt) информации о...

Работа с файлами(Запись,чтение,работа с данными)
Здравствуйте, никак не могу осилить файлы... Для начала вот само задание: В справочной автовокзала...

Работа с файлами, чтение/работа со строкой
Доброго времени суток. Начал работать с C++ Builder 6. Есть текстовый файл .txt с различными...

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

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

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

Работа с файлами
Добрый вечер! Помогите, есть какая - то лажа: код компилится но консоль виснет и в файл ничего...

работа с файлами
мне надо записать в файл данные, но чтобы не стирались записи, которые уже есть там

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