Delphi7 ListView SubItem 을 Combobox를 이용하여 수정하기. ListView를 클릭하여 SubItem을 ComboBox를 통해 수정하는 동작을 구현 했습니다. ListView 의 속성은 ReadOnly - > True RowSelect -> True ViewStyle -> vsReport 으로 주었습니다. idx : integer; implementation {$R *.dfm} procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem; Selected: Boolean); var r : TRect; begin if Selected = True then begin idx := Item.Index; try GetWindowRect(Item.Handle,r); ComboBox1.Text := Item.S.. 2020. 8. 6. 프로세스가 실행 중인지 확인하기. 다른 프로세스의 실행 상태를 확인해야 할 경우가 있습니다. 간혹 IPC 를 사용하거나 자신의 프로젝트가 아닌 다른 프로세스의 상태를 확인 할 경우가 있습니다. (저는 종종 있었네요 .) 그 경우 프로세스의 실행 상태를 확인할 때 사용하는 방법입니다. Function CheckProcess(ProcessID : DWORD):Boolean; var processhandle : DWORD; begin result := False; processshandle := OpenProcess(MAXIMUM_ALLOWED),False,ProcessID); if Processhandle = 0 then result := False else begin if WaitForSingleObject(ProcessHandle,0) .. 2020. 7. 9. 내 프로세스가 실행된 경로 구하기 코딩을 하다보면 특정 설정 또는 로그를 남기기 위해 파일을 저장하거나, 파일을 불러오는 경우가 많은데 이를 빌드해둔 내 프로젝트내의 같은 경로에 있는 파일을 이용하고 경우가 있습니다. 그럴경우 간단하게 ExtractfilePath(Application.ExeName) 을 통해 확인 할 수 있습니다. 하지만 모듈이 다르거나, dll 을 로드하여 사용 하는 경우 상속된 프로세스의 경로가 나오기때문에 원하는 내 프로젝트 경로가 아닌 상속된 프로세스의 경로를 얻어 오는 경우가 있습니다. 그럴때 제가 사용 하는방법입니다. ExtractFilePath(GetModuleName( hInstance) ); ExtractFilePath의 경우 파일의 전체 경로 (ex. C:\test.exe) 가 아닌 경로만을 얻어 올 .. 2020. 7. 9. #push 02. [Wargame.kr] flee button 문제. #push 02. [Wargame.kr] flee button 문제. 웹 관련 문제입니다. 정식으로 웹 해킹에 관련된 공부를 한 적은 없습니다. 이것저것 코딩하면서 웹 파싱 관련된 작업을 수행하면서 터득한 짧은 지식으로 통한 문제 풀이를 시작합니다. Wargame.kr 사이트내에 [flee button] 문제 풀이입니다. 일단 문제 먼저 보겠습니다. 문제입니다. 버튼을 클릭하라고 합니다. 시작을 눌려 페이지를 가보니 위 와 같이 마우스 포인터를 기준으로 일정 거리가 떨어진 곳에 버튼이 생성됩니다.마우스 포인터를 기준으로 같이 움직이기 때문에자바스크립트가 동작하고 있으면 해당 버튼의 움직임을 막을 순 없습니다 . 자바스크립트는 html 에 그대로 묻어나옵니다. 일단 페이지 소스 부터 확인해봅시다. %인코딩.. 2020. 7. 3. 이전 1 2 다음
