Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Мультиграф. Две системы двухсторонних дорог Здравствуйте товарищи! Имеется вот такая задача: Заданы две системы двухсторонних дорог с одним и тем же множеством городов (железные и шоссейные дороги). Найти минимальный по длине путь из города А в горо В (который может проходить как по железным, так и по шоссейным дорогам) и места пересадок с одного вида транспорта на другой на этом пути. Сделать ее нужно в граф.режиме. У меня вроде... https://www.cyberforum.ru/ delphi-beginners/ thread1571144.html Delphi Повтор операции
Как сделать повтор операции ? Допустим вывод в label. Берем число повторений из spinedit. Допустим если число 2, то он два раза повторяет label='ккк', и после двух раз он написал label='rrr'
Delphi Как изменить размер шапки формы? На форме, где надпись Caption. Как задать размер полоски на которой надпись caption. https://www.cyberforum.ru/ delphi-beginners/ thread1571098.html Delphi Вроде как парсинг текста, разделение по строкам Здравствуйте уважаемые бывалые и не только. Нужна помощь. Сам понять толком и не смог принцип того как сделать то что я хочу. Хочу же я собственно вот что: Дано: Текст вида "Параметр1, Параметр2, Параметр2.1<:>" где "ПараметрХ" - значение передающееся в другую часть программы (каждый параметр в своё и их определённое число), "," - делит параметры, "<:>" - конец строки. Пробовал... https://www.cyberforum.ru/ delphi-beginners/ thread1571038.html
Delphi Вывод изображения и маштабирование его
Составил программу вывода изображения на экран маштабирование его и поиск следующего в указанном каталоге. При запуске отладчик показывает ошибку на функции ScaleImage Файл в приложении. Подскажите в чем проблема
Delphi Как исправить ошибки? https://www.cyberforum.ru/ delphi-beginners/ thread1570971.html
Задача звучит так Дана строка, состоящая из групп нулей и единиц. Найти и вывести на экран группы с четным количеством символов. Как исправить эти ошибки? unit Unit1; interface
Delphi Как исправить ошибку с русским текстом https://www.cyberforum.ru/ delphi-beginners/ thread1570951.html
Если ввожу логин английскими то все работает нормально, а если ввожу логин русскими, то происходит какой то глюк с прочтением русского текста. Причем, если ввожу пароль рускими буквами, то такого не происходит. Заметил, что при вводе логина русскими буквами в начале выполнения программы-сохраняются левые символы, а при проверке на правильность ввода читаются корректно. Подскажите пжлст в чем...
Delphi Проверка всех Checkbox
На форме 5 чекбоксов. При нажатии на кнопку должна быть проверка, если ни на один Checkbox не нажали, то показывается сообщение. Как это сделать?
Delphi Создать ведомость для вычисления налога по заданным правилам https://www.cyberforum.ru/ delphi-beginners/ thread1570897.html
Нужно использовать линейный массив при решении, желательно с подсказками и пояснениями, заранее Вам благодарен. Дана ведомость начисления зарплаты для N рабочих некоторого предприятия (порядковый номер рабочего и начисленная сумма). Создать ведомость для вычисления налога по следующему правилу: если размер начисленной суммы меньше 500 тыс. руб., то налог составляет 9% от начисленной суммы;...
Delphi Как работать напрямую с короткими путями файлов? https://www.cyberforum.ru/ delphi-beginners/ thread1570863.html
function GetShortName( sLongName : string ) : string; var sShortName : string; nShortNameLen : integer; begin SetLength( sShortName, MAX_PATH ); nShortNameLen :=
Найти все целые числа из промежутка от а до b, в которых количество делителей равна k Delphi
Найти все целые числа из промежутка от а до b, в которых количество делителей равна k.
Delphi Передача оператора в функцию https://www.cyberforum.ru/ delphi-beginners/ thread1570695.html
В общем по заданию требуется суммы (видимо имеются ввиду суммы рядов) считать именно с помощью функции. Вполне представляю как сделать это с помощью трех разных функций или как в одну передать "свитч" и в самой функции прописать 3 разных операции, которые будут выбираться в зависимости от этого "свитча". Но это все как то... "черезжопу". Возможно ли каким то образом передавать весь общий член...
1077 / 488 / 316
Регистрация: 05.04.2013
Сообщений: 2,141
05.11.2015, 12:07 0

Простой файловый менеджер с фильтром - Delphi - Ответ 8295107

05.11.2015, 12:07. Показов 1613. Ответов 1
Метки (Все метки)

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

Решение

Ищем все подходящие под Unit1.d* файлы в текущем каталоге
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  searchResult : TSearchRec;
 
begin
  // Пытаемся найти правильные файлы, соответствующие Unit1.d* в текущем каталоге
  if FindFirst('Unit1.d*', faAnyFile, searchResult) = 0 then
  begin
    repeat
      ShowMessage('Имя файла = '+searchResult.Name);
      ShowMessage('Размер файла = '+IntToStr(searchResult.Size));
    until FindNext(searchResult) <> 0;
 
    // Должен освободить ресурсы, используемые этими успешными, поисками
    FindClose(searchResult);
  end;
end;
Имя файла = Unit1.dcu
Размер файла = 4382
Имя файла = Uni1.dfm
Размер файла = 524
Имя файла = Uni1.ddp
Размер файла = 51


Вернуться к обсуждению:
Простой файловый менеджер с фильтром Delphi
0
Заказать работу у эксперта

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

Простой файловый менеджер
Нужно сделать не очень накрученную файловую систему. Скрин приложил, как у меня это выглядит. ...

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

Файловый менеджер с БД
Здраствуйте! Вопрос к тем, кто смог бы Аргументированно объяснить свою точку зрения по поводу...

Простейший Файловый менеджер
В одной книге написано как сделать простейший файлменеджер. Я написал все как в книге и прога...

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

ListView и Файловый менеджер..
Пишу файловый менеджер, на основе - ListView. ...

Файловый менеджер на Delphi 7
Здравствуйте. Нужна помощь. Делаю файловый менеджер на Delphi 7 для дипломного проекта, но...

Файловый менеджер.Компонент LastView
Здраствуйте.Вот решила написать файловый менеджер на Delphi.Как можно вывести список деректорий и...

Файловый менеджер, копирование папки
Здравствуйте, имеется вот такой исходник файлового менеджера, все в принципе функционирует, не...

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

Файловый менеджер
Здравствуйте делаю файловый менеджер есть пару вопрос. 1) Как можно решить проблему с кодировкой,...

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