Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.30;
Скачать: CL | DM;

Вниз

Проблема с регистром букв расширения файла   Найти похожие ветки 

 
Unknown   (2005-01-13 08:47) [0]

Написал программу, которая ищет в указанной папке файлы *.avi и осуществляет с ними некоторые действия. Но она ищет только *.avi, игнорируя при этом *.AVI, *.Avi и т. д. Как это исправить, а то мне не хочется в программе расписывать: если расширение равно *.AVI или если расширение равно *.Avi, то…
Да и ещё – как программно сэмулировать нажатие клавиши Print Screen?


 
Johnmen ©   (2005-01-13 09:19) [1]

Искать *.*, далее LowerCase/UpperCase на avi/AVI


 
Neznaika ©   (2005-01-13 09:31) [2]

ansilowercase?


 
Johnmen ©   (2005-01-13 09:39) [3]

2.
весь экран keybd_event(VK_SNAPSHOT,0,0,0);
тек. окно  keybd_event(VK_SNAPSHOT,1,0,0);


 
Anatoly Podgoretsky ©   (2005-01-13 12:15) [4]

Наверно неверно написал, FindFirst/Next регистро-независим.


 
Unknown   (2005-01-14 13:35) [5]


> Наверно неверно написал, FindFirst/Next регистро-независим.


Я использовал FindFirst/Next. Потом я писал так:

... and (ExtractFileExt (...) = ".avi") then...


 
Fay ©   (2005-01-14 13:38) [6]

and (AnsiUpperCase(ExtractFileExt (...)) = ".AVI")


 
begin...end ©   (2005-01-14 13:48) [7]

> [5] Unknown   (14.01.05 13:35)

... and MatchesMask(..., "*.avi") then ...

P.S. Uses Masks.


 
Юрий Зотов ©   (2005-01-14 13:57) [8]

> Unknown   (14.01.05 13:35) [5]

> Потом я писал так: ... (ExtractFileExt (...) = ".avi") then...

Вот как раз это-то и неверно. А не сам поиск.



Страницы: 1 вся ветка

Текущий архив: 2005.01.30;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.034 c
8-1097176806
Darken
2004-10-07 23:20
2005.01.30
Corel+Delphi


3-1103878442
Xattab
2004-12-24 11:54
2005.01.30
База данных про вычисление квартала, тек месяца


1-1106064885
Рома
2005-01-18 19:14
2005.01.30
Office и Delphi


1-1105966695
Mate_ru
2005-01-17 15:58
2005.01.30
Перенос слов


1-1106209242
Suvit
2005-01-20 11:20
2005.01.30
динамический массив из компонентов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский