안녕하세요?
먼저 질문에 답변이 없어서 다시 질문 드립니다.
아래 코드에서 ALT+F값이 안먹는데 수정부탁 드립니다.
ALT+F 대신 F10을 보내도 되는데 아래 161대신 VK_F10을 해도 안됨.
f나 x는 에디터의 커서 위치에 찍힘.
ALT+F대신에 ALT키 값을 보내고 다음에 f를 보내도 되겠는데 ALT는 어떻게 보내야 하는지요?
procedure TForm1.Button2Click(Sender: TObject);
var
h: hwnd;
IE: variant;
begin
IE := CreateOLEObject('InternetExplorer.Application');
IE.Navigate('View-Source:http://www.delmadang.com');
while IE.Busy do sleep(0);
h := FindWindow('notepad',nil);
h := FindWindowEx(h,0,'edit',nil);
PostMessage(h, WM_KEYDOWN, 161, 0); //ALT+F의 scan값 <-- 이부분이 안됨
// PostMessage(h, WM_KEYDOWN, 70, 0); //f
PostMessage(h, WM_KEYDOWN, 88, 0); //x
end;
<!--CodeS-->
h := FindWindow('notepad',nil);
PostMessage(h, WM_CLOSE, 0, 0);
<!--CodeE-->
그럼..
h:=