|
@@ -19,7 +19,9 @@
|
|
|
|
|
|
function do_isdevice(handle:longint):boolean;
|
|
function do_isdevice(handle:longint):boolean;
|
|
begin
|
|
begin
|
|
- do_isdevice:=false;
|
|
|
|
|
|
+ do_isdevice:= (handle=StdInputHandle) or
|
|
|
|
+ (handle=StdOutputHandle) or
|
|
|
|
+ (handle=StdErrorHandle);
|
|
end;
|
|
end;
|
|
|
|
|
|
{ close a file from the handle value }
|
|
{ close a file from the handle value }
|