win32 console

[fufel]

Запущена консольная аппликация и в консоль выводятся данные. Как перехватит эти данные? Надо сделать так чтобы данные отображались в консоле и в старонней программе.

Кстати, в консольных приложениях имеется "Edit"->"Mark" и "Edit"->"Copy". Может их как то можно использовать?

[Rock-n-Rolla]

я поискал за тебя. не благодари

[fufel]

Сообщение от Rock-n-Rolla

я поискал за тебя. не благодари

Откада вы такие умники берётесь?

Задача решина. Вот промер решение.

if AttachConsole(PID) then
begin
conHandle := GetStdHandle(STD_OUTPUT_HANDLE);
GetConsoleScreenBufferInfo(conHandl e, BufInfo);
GetMem(p, BufInfo.dwMaximumWindowSize.X+1);
try
for i := 0 to BufInfo.dwSize.Y - 1 do
begin
Crd.X := 0;
Crd.Y := i;
ReadConsoleOutputCharacter(conHandl e, p, BufInfo.dwMaximumWindowSize.X, Crd, read);
s:= Trim(Copy(StrPas(p), 1,80));
if s <> '' then Mas[Masi]:=s;
end;
finally
FreeMem(p, BufInfo.dwMaximumWindowSize.X+1);
end;
FreeConsole;
end;

[Rock-n-Rolla]

Сообщение от fufel

Откада вы такие умники берётесь?

Чтобы вас понимали, надо нормально выражать свои мысли и хоть немного подучить русский язык