Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.01.20;
Скачать: [xml.tar.bz2];

Вниз

пара ввопросов по работе с файлами   Найти похожие ветки 

 
Mozart   (2003-12-27 08:44) [0]

1) Как считать имена всех файлы из папки (например с определ. расширеним, или просто все файлы и загнать их имена в массив)?
2)Как отловить сеть и её использование (при игре по TCP/IP)?
3)Также интересует: как запустить тоже самое но без использования *.bat файла: в бат прописана строка
"start file.exe -w -c -title" очень нужно запустить это прям из дельфи.
4)Как проследить сворачивание окна (игрушка, которая в 3 пункте образно обозвана file.exe (известны класс формы, титл)
5)Как в Вин98/2к/ХР запретить на время действия проги открытия новых приложений, кроме разрешённых 2ух-3ёх.
Пока всё, но вопросы будут...


 
MBo   (2003-12-27 08:46) [1]

1. FindFirst (FAQ)
3. ShellExecute или CreateProcess


 
Mozart   (2003-12-27 09:34) [2]

1) Можно функцию, а то пока разберусь что и где в факе....
3) Пробовал Шел, но не догнал как, вообще самому пробовать и догонять очень долго и мучительно, а мне всё срочно нужно, "горят трубы" :) Короче - буду благодарен, если мне обьяснят всё на простеньких примерчиках...


 
MBo   (2003-12-27 09:38) [3]

1 - это функция. В хелпе замечательно описана.
3 - хелп читай, да и в FAQ примеры есть.


 
Palladin   (2003-12-27 11:38) [4]

:) ножкой воду попробовал... бррр холодная... не пойду...


 
Mozart   (2003-12-27 14:34) [5]

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


 
Anatoly Podgoretsky   (2003-12-27 14:48) [6]

http://podgoretsky.com/cgi-bin/dlcounter/npscnt?file=http://podgoretsky.com/ftp/Language/nps/ru.delphi.html&file_id=ru.d elphi


 
AndDem   (2004-01-06 15:24) [7]

Добрый день!
При выполнении следующего кода MessageDlg ни разу не отрабатывает, хотя заведомо известно, что файлов с соответствующим аттрибутом в каталоге WorkPath больше одного:

if (FindFirst(WorkPath + "*.*", faArchive, SearchRec) = 0) then
begin
while (FindNext(SearchRec) <> 0) do
MessageDlg(SearchRec.Name, mtInformation, [mbOk], 0);
FindClose(SearchRec)
end;

Такое ощущение, что после вызова FindFirst переменная SearchRec жестко запоминает имя первого файла, и больше не обращает никакого внимания на маску *.*...
Delphi 3 (build 5.83). Версия старая? Или что-то не так делаю? Во всех рекоммендованных FAQ"ах всё аналогично тому, что я привел...


 
AndDem   (2004-01-06 15:26) [8]

Упс.... Виновал.. Условие в while не то... Ищзвиняюсь за невнимательность... :-))


 
zapped   (2004-01-06 18:14) [9]

2AndDem
чо за дурацкая манера в чужие ветки влезать?

2 автор
4. находишь handle по известным тебе данным и по таймеру проверяешь IsIconic



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

Форум: "Основная";
Текущий архив: 2004.01.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.008 c
6-63277
Deadcat
2003-10-27 06:10
2004.01.20
Сканирование сети


8-63262
WondeRu
2003-09-15 10:08
2004.01.20
Как отключить OpenGL ускорение видеокарты?


1-63066
Petrovich
2004-01-08 16:08
2004.01.20
Как вставить пустую строку в INI-файл?


3-62960
Ermek
2003-12-25 01:36
2004.01.20
IbExpert


11-63054
=Sniper=
2003-05-04 23:40
2004.01.20
Подскажите как правильно создать проект для MCK!!!!????





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский