在控制台程序中如何得到程序的句柄

Question

ＲＴ

Answer 1

我觉得你的目的不外乎就下面的情况。如何判定控制台/DOS程序何时结束？
http://community.csdn.net/Expert/FAQ/FAQ_Index.asp?id=104460
调用一个DOS程序后如何获得此程序的返回信息
http://community.csdn.net/Expert/FAQ/FAQ_Index.asp?id=82562

Answer 2

GetStdHandle(STD_OUTPUT_HANDLE);
GetStdHandle(STD_INPUT_HANDLE);

Answer 3

应该行吧。
是第一个函数。
GetStdHandle(STD_OUTPUT_HANDLE);//返回的就是控制台句柄呀。

Answer 4

你可以试试，两个函数返回的是两个常数，好像是7和3。
这和我用SPY++查看的句柄不一样啊！

Answer 5

啊。给个历程给你研究一下。 
向屏幕输出文件。 
program ShowStream;
{$APPTYPE CONSOLE}
uses
  Windows,
  SysUtils,
  Classes;
var
  sIn: TFileStream;
  sOut: THandleStream;
begin
  sIn := TFileStream.Create('d:\aaa.txt', fmOpenRead);
  try
    sOut := THandleStream.Create(GetStdHandle(STD_OUTPUT_HANDLE));
    try
      sOut.CopyFrom(sIn, sIn.Size);
    finally
      sOut.Free;
    end;
  finally
    sIn.Free;
  end;
end.