쩝... 나름대루 있는 지식 다 활용해서 해 봤는데
잘 안돼네요.... 조금만 힌트를 주세여... 어떻게 했냐믄여...
var
ProgramHandle : THandle;
TextBuf: array[0..255] of char;
begin
ProgramHandle := WinExec('c:\windows\notepad.exe', SW_SHOWNORMAL);
GetWindowText(ProgramHandle, TextBuf, 255);
Label1.Caption := StrPas(TextBuf);
end;
이렇게 했거든요.... WinExec로 실행할때 ID(?)를 받아서 했는데...
막상 Label에다 찍어보니깐 아무것도 안찍혀요....
찍을때 StrPas가 맞아요? 음냐.. 워낙 초보라...
캡션네임이 공백으로 나오는데... 잘못 코딩했나요?
에러는 안나오던데.... 쩝... 힌트좀 주셔여~~~~~
읽어주셔서 감사합니다....
|