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

← →
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]

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

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

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

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

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

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

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