본문 바로가기

Application/Delphi Lecture126

모든 폼에 메세지 보내는 방법 1번째 방법 --------------------------------------------------- const WM_USER_SHOWMSG = WM_USER + 1234; for i := 0 to Application.ComponentCount - 1 do begin if Application.Components[i] is TForm then begin if Application.Components[i].Name = 'Form2' then SendMessage(TForm(Application.Components[i]).Handle, WM_USER_SHOWMSG, 1000, 0 ); end; end; 2번재 방법 -------------------------------------------------.. 2008. 8. 13.
PostMessage 와 SendMessage의 차이점 질문1) 두 함수의 기능 => 메시지는 주로 사용자에 의해 발생되지만 프로그램 내부에서 윈도우간의 통신을 위해 의도적으로 다른 윈도우에게 메시지를 보낼 수도 있다. 이때는 다음 두 함수를 사용한다. BOOL PostMessage( HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam ); LRESULT SendMessage( HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam ); 두 함수의 인수가 완전히 동일하다. 여기서 Post 라는 말은 우리말로 "붙인다"라고 번역하며 Send 라는 말은 "보낸다"라고 번역한다. ★ PostMessage 함수 PostMessage 함수는 Msg 인수로 지정된 메시지를 hWnd 윈도우의 메시지 .. 2008. 8. 13.
파일 용량 알자 var FHandle, intSize : Integer; begin OpenDialog1.Filter:= 'Image files (*.jpg;*.jepg;*.gif)|*.jpg;*.jepg;*.gif'; if OpenDialog1.Execute then begin // 안되면 2번째 인자를 바꿔보면 될듯 // GetFileSize는 Win32API 임 FHandle := FileOpen(OpenDialog1.FileName, fmOpenRead+fmShareDenyNone); intSize := GetFileSize(FHandle, nil); FileClose(FHandle); end; 2008. 8. 13.
리소스 파일 만들기와 사용법 리소스 파일 만들기... 리소스 파일은 바이너리 형태의 데이터로서 RCDATA라 부른다. 리소스 파일은 Res라는 확장자를 가지게 되는데 이 Res 파일을 만들기 위한 과정을 살펴 보자... Res 파일을 만들기 위해서는 Text로 작성된 RC 파일이 있어야 한다. 이 RC 파일은 Res 파일에 포함하고자 하는 데이터 이름과 데이터 식별자, 그리고 데이터로 구성된 Text 파일이다. RC 파일의 예를 보자... - RC 파일의 예 WAVEFILE WAVE c:\WaveSound.wav 이렇게 작성된 것이 RC 파일이다. 여기서 'WAVEFILE'은 리소스를 호출할 때 쓰일 이름이며 'WAVE'는 이 리소스가 WAVE 파일임을 명시하는 것이며 맨 뒷부분은 실제로 리소스에 적재될 파일의 경로와 파일명으로 구.. 2008. 8. 13.