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

Вниз

NetApi - Delphi кто виноват?   Найти похожие ветки 

 
AME   (2001-12-20 15:57) [0]

Здравствуйте все!Ошибка то есть,то её нет.
(Мёд очень странный предмет):)
Так же показывает не все задачи.
(проверял Windows NT командой:AT в DOS promt)
Что не правильно?

procedure Net_ScheduleJobEnum();
type ATARR=array of At_Enum;
PATARR=^ATARR;
var
res,nrRead,posRead,resumHandle,cnt:DWORD;
ai:PATARR;
Buff:ATARR;
begin
SetLength(Buff,64);
ai:=nil;
new(ai);
try
try
resumHandle:=0;
res:= NetScheduleJobEnum(nil,ai,SizeOf(At_Enum),nrRead,posRead,@resumHandle);
if not res = NERR_Success then begin
ShowMessage("NERR_Success");
exit;
end;
Buff:=ai^;
if posRead=0 then exit;
for cnt:=0 to nrRead-1 do begin
ShowMessage(Buff[cnt].Command);
end;

except
on E:Exception do
MessageDlg(E.Message,mtWarning,[mbOK],0);
end;
finally
NetApiBufferFree(@Buff);
//NetApiBufferFree(ai);
end;
end;


 
AME   (2001-12-21 10:55) [1]

А ну вас! Сам сделал.



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

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

Наверх




Память: 0.46 MB
Время: 0.012 c
1-66540
maks_f
2002-02-04 11:24
2002.02.21
Пароль на изменение в листе Excel


7-66697
l@z@
2001-11-04 15:12
2002.02.21
Помогите! Необходимо, чтобы каждую секунду в лебел прибавлялось 5


14-66666
MJH
2002-01-02 11:07
2002.02.21
чё все в ауте уже? то в новогоднюю ночь пишут, то вечером 2го никого нет....


3-66498
Eugen1001
2002-01-29 18:47
2002.02.21
Не вызывается Exception


3-66464
Olfi
2002-01-27 13:16
2002.02.21
Пароли в БД