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

Вниз

Как определить запускаемые задачи из C: WINDOWS Tasks ?   Найти похожие ветки 

 
Volf_555   (2006-01-21 22:54) [0]

Как определить какие задачи запускаются из папки C:\WINDOWS\Tasks ?

Пробывал для этого использовать следующий код:
procedure TForm1.GetStartUpTasks;
Var
SearchRec:TSearchRec;
reg:TRegistry;
s1,s2:String;
a,a1:Integer;
begin
If FindFirst(GetEnvironmentVariable("WINDIR")+"\Tasks\*.job", faAnyFile, SearchRec)=0 then
repeat
{Вот здесь мы можем делать с найденным файлом что угодно
SearchRec.name - имя файла
ExpandFileName(SearchRec.name) - имя файла с полным путем}
with ListView1.Items.Add do
 begin
  Caption:=ExtractFileName(SearchRec.Name);
  SubItems.Add(GetEnvironmentVariable("WINDIR")+"\"+SearchRec.Name);
  SubItems.Add(GetEnvironmentVariable("WINDIR")+"\"+SearchRec.Name);
 end;
until FindNext(SearchRec) <> 0;
FindClose(SearchRec);
reg.Free;
end;


При выполнении его программа матюкается :-)


 
Digitman ©   (2006-01-23 10:31) [1]


> программа матюкается


> reg.Free


И правильно делает.
Где создание объекта reg ? И зачем он вообще здесь нужен ?


 
Fay ©   (2006-01-23 10:37) [2]

>s1,s2:String;
> a,a1:Integer;


А это для чего?



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

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

Наверх




Память: 0.47 MB
Время: 0.047 c
3-1135523459
turonix
2005-12-25 18:10
2006.02.19
Проблемы при создании ограничения на поле типа Date в Access


2-1138611240
Pit
2006-01-30 11:54
2006.02.19
Handle модуля процесса


6-1131618116
Святослав
2005-11-10 13:21
2006.02.19
Где можно скачать компонент TSocketServer ?


1-1137606165
Volf_555
2006-01-18 20:42
2006.02.19
Как извлечь иконку из *.exe и добавить в TImageList?


4-1133714790
Volf_555
2005-12-04 19:46
2006.02.19
Как определить количество файлов, помещённых на значок программы?