도스창 핸들 구하기...

DOSHandle := ShellExecute(Handle,'open','COMMAND.COM','','',SW_SHOWNORMAL);



도스창에 콤보박스(cmbDOSCommand) 의 내용을 보내기...

procedure TForm1.cmbDOSCommandKeyPress(Sender: TObject; var Key: Char);

var

CmdLine: shortstring;

begin

if key = #13 then begin

CmdLine := cmbDOSCommand.Text + #10 + #13;

Clipboard.Clear;

Clipboard.SetTextBuf(@CmdLine);

SendMessage(DOSHandle,WM_USER+$1C,$4F7E0000,0);

SendMessage(DOSHandle,WM_USER+$1A,$4F7E0000,0);

end;

end;



위 처럼 했는데... 도스창이 아무런 변화가 없군요.. 문제가 뭐죠?



위에서 구한 도스창 핸들이나 FindWindow() 함수로 구한 윈도우 핸들이

마이크로 소프트의 SPY++ 과 볼랜드의 WinSight32 에서 구한 핸들과

틀릴 경우가 있던데 왜그런가요?