본문 바로가기

coding

Delphi/꿀팁 Form에서 Key Event가 안먹힐 때 procedure TFrom.FormCreate(Sender: TObject);beginKeyPreview := True;end;폼 Create 부분에 KeyPreview를 True로 해주면 됩니다.
Delphi/꿀팁 파일명으로 프로세스 종료하기 uses TlHelp32; function TaskKill(sFileName: string): Boolean;const PROCESS_TERMINATE = $0001;var bLoop: Boolean; sTmpFileName: string; SnapshotHandle: THandle; ProcessEntry32: TProcessEntry32;begin Result := False; SnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0); ProcessEntry32.dwSize := SizeOf(ProcessEntry32); bLoop := Process32First(SnapshotHandle, ProcessEntry32); while bLoo..
Delphi/꿀팁 TcxGrid에서 다중 선택된 Row값들을 가져오기 var I : Integer; begin with .Controller do begin for I := 0 to SelectedRowCount - 1 do begin SelectedRows[I].Values[.Index]; end; end;

티스토리툴바