Главная страница
    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.01 c
7-63430
--olg-
2003-11-06 11:15
2004.01.20
WinSpool.OpenPrinter


6-63284
Novenkij
2003-11-18 01:31
2004.01.20
Пересылка файлов


3-62983
Silver_
2003-12-23 19:16
2004.01.20
Как через SQL сбацать такое


1-63156
DDA
2004-01-10 17:01
2004.01.20
ComboBox - Border=Single


8-63257
Anton2000
2003-09-17 17:31
2004.01.20
TrackBar в проигрывателе музыки





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