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

Вниз

на странный глюк нарвался   Найти похожие ветки 

 
koha ©   (2007-06-08 15:55) [0]

на странный глюк нарвался:

Type
 PTimeInfo = ^TProcessTimeInfo;
 TProcessTimeInfo = Record
   KernelTime : TDateTime;
   UserTime   : TDateTime;
   ColabsTime : TDateTime;
   IDLTime    : TDateTime;
   FullTime   : TDateTime;
 end;

function GetProcessTimeInfo(PID: integer; Var TR: TimeRec; Var TimeInfo: TProcessTimeInfo): Boolean;
begin
 
 // - вот так компилятр сказал гуд, но работать не стало

 with TimeInfo do begin
   KernelTime := KernelTime;
   UserTime   := UserTime;
   ColabsTime := ColapsTime;
   IDLTime    := IDLTime;
   FullTime   := SystemTimeToDateTime(CurTime)-FileTimeToDateTime(CreatTime);
 end;

 // - вот так компилятр сказал тоже гуд и все заработало

   TimeInfo.KernelTime := KernelTime;
   TimeInfo.UserTime   := UserTime;
   TimeInfo.ColabsTime := ColapsTime;
   TimeInfo.IDLTime    := IDLTime;
   TimeInfo.FullTime   := SystemTimeToDateTime(CurTime)-FileTimeToDateTime(CreatTime);

end;


почему делфи в первом случае невыдал ни кокой ошибки?


 
DVM ©   (2007-06-08 15:58) [1]


> почему делфи в первом случае невыдал ни кокой ошибки?

А как по-твоему компилятор должен был догадаться в первом случае KernelTime это KernelTime или TimeInfo.KernelTime ?


 
koha ©   (2007-06-08 16:03) [2]

Выходит так, если было бы написано  приблизительно так, то ошибки бы не было?

with TimeInfo do begin
  KernelTime := KernelTime2;
  UserTime   := UserTime2;
  ColabsTime := ColapsTime2;
  IDLTime    := IDLTime2;
  FullTime   := SystemTimeToDateTime(CurTime)-FileTimeToDateTime(CreatTime);
end;


 
koha ©   (2007-06-08 16:07) [3]

- да, пока еще распознавание ошибок на абсурдность не придумали ........


 
DVM ©   (2007-06-08 16:31) [4]


> то ошибки бы не было?

да оно и в первом варианте не было, просто логика в первом варианте получилась не такая как надо.


 
Плохиш ©   (2007-06-08 16:37) [5]


> на странный глюк нарвался:

С каких пор документированная работа компилятора стала называться "глюк"?


 
koha ©   (2007-06-08 22:25) [6]


> Плохиш ©   (08.06.07 16:37) [5]
> > на странный глюк нарвался:С каких пор документированная
> работа компилятора стала называться "глюк"?


-  всего скорей я имел ввиду свой глюк а не делфи.



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

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

Наверх




Память: 0.48 MB
Время: 0.138 c
2-1181101318
anna
2007-06-06 07:41
2007.07.01
как решить задачку по массивам


2-1181204834
авыф
2007-06-07 12:27
2007.07.01
поток


2-1180967367
GLXV
2007-06-04 18:29
2007.07.01
DriveList (ListBox) --> на ListView


3-1175663068
greg123
2007-04-04 09:04
2007.07.01
При переливе из gdb-ки в dbf-ку - сообщение "Out of memory"


2-1181312681
ЮРЕЦ
2007-06-08 18:24
2007.07.01
image и paintbox