|
@@ -67,7 +67,7 @@ begin
|
|
OutPipe:=ToutputPipeStream.Create (OutHandle);
|
|
OutPipe:=ToutputPipeStream.Create (OutHandle);
|
|
end
|
|
end
|
|
Else
|
|
Else
|
|
- Raise EPipeCreation.CreateFmt (EPipeMsg,[getlasterror])
|
|
|
|
|
|
+ Raise EPipeCreation.Create (EPipeMsg)
|
|
end;
|
|
end;
|
|
|
|
|
|
Function TPipeStream.Seek (Offset : Longint;Origin : Word) : longint;
|
|
Function TPipeStream.Seek (Offset : Longint;Origin : Word) : longint;
|