Q&A
조은 만남
다음은 마우스의 포커스를 체크하여 그림을 올려주는 예입니다.
*-> 소스
private
{ Private declarations }
procedure WndProc(var Message: TMessage); override;
procedure TW001F.WndProc(var Message: TMessage);
begin
if Message.LParam = Longint(SB_Grp1) then
begin
if Message.Msg = CM_MOUSELEAVE then SB_Grp1.Glyph := GRP_Right_F.Glyph
else if Message.Msg = CM_MOUSEENTER then SB_Grp1.Glyph := GRP_Right_T.Glyph;
end;
inherited;
end;
*-> 설명
SB_Grp1,GRP_Right_T, GRP_Right_F : TSpeedButton
폼위에다가 TSpeedButton을 올려놓으면 문제 없이 원하는 그림이 나오는데....
근데, 판넬위에다가 TSpeedButton을 올리면 왜 안되죠 ?
- procedure
조은 만남
다음은 마우스의 포커스를 체크하여 그림을 올려주는 예입니다.
*-> 소스
private
{ Private declarations }
procedure WndProc(var Message: TMessage); override;
procedure TW001F.WndProc(var Message: TMessage);
begin
if Message.LParam = Longint(SB_Grp1) then
begin
if Message.Msg = CM_MOUSELEAVE then SB_Grp1.Glyph := GRP_Right_F.Glyph
else if Message.Msg = CM_MOUSEENTER then SB_Grp1.Glyph := GRP_Right_T.Glyph;
end;
inherited;
end;
*-> 설명
SB_Grp1,GRP_Right_T, GRP_Right_F : TSpeedButton
폼위에다가 TSpeedButton을 올려놓으면 문제 없이 원하는 그림이 나오는데....
근데, 판넬위에다가 TSpeedButton을 올리면 왜 안되죠 ?
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- red
- •
- 2000.09.08 04:48
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.08 04:53안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. 허걱~ 그냥 IDE에서...
-
- bluetin
- 2000.09.08 04:26
- 0 COMMENTS
- /
- 0 LIKES
-
-
이경문•2000.09.08 05:19쩝, 실수령액에 따옴표를 빼 보세요. 조영진 wrote: > select [사번],[성명],[연장수당],[특근수당],[야...
-
-
- red
- •
- 2000.09.08 03:29
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.08 04:53안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. Type의 약자입니다. ...
-
Kurt•2000.09.08 04:27red wrote: > TForm 에서 보면 T는 무엇인지 궁금합니다 좀 갈쳐주세여^^ 클래스 표시 입니다. 클래스...
-
- red
- 2000.09.08 03:25
- 0 COMMENTS
- /
- 0 LIKES
-
- 이희삼
- •
- 2000.09.08 02:59
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.08 04:55안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. 파일의 ReadOnly속성을...
-
이희삼•2000.09.08 06:47최용일 wrote: > 안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. > > ...
-
- 코스모
- •
- 2000.09.08 02:37
- 1 COMMENTS
- /
- 0 LIKES
조은 만남 다음은 마우스의 포커스를 체크하여 그림을 올려주는 예입니다. *-> 소스 private { Private declarations } procedure WndProc(var Message: TMessage); override; procedure TW001F.WndProc(var Message: TMessage); begin if...-
이경문•2000.09.08 03:15선언하신 WndProc는 W001F 라는 객체가 처리하는 함수입니다. 즉, CM_MOUSEENTER, CM_MOUSELEAVE는 W001F ...
-
- 초보
- •
- 2000.09.08 02:35
- 1 COMMENTS
- /
- 0 LIKES
-
코스모•2000.09.08 02:53TRichEdit를 사용하세요. 혹시 꼭 TMemo를 사용하신다면 나두 멀라. 초보 wrote: > 제목에서 말씀 ...
-
- 김태영
- •
- 2000.09.08 02:16
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.08 05:08안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. StringToWideChar함수...
-
- bassmania
- •
- 2000.09.08 03:10
- 1 COMMENTS
- /
- 0 LIKES
-
bassmania•2000.09.08 03:42휴~! 간신히 에라를 바로 잡았습니다. 아직 4GL에 익숙치 못해 여러모로 어려움이 있네요. ㅠ.ㅠ; 그럼..
-
- Yang
- 2000.09.08 01:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 지영일
- •
- 2000.09.08 01:53
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.08 05:16안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. 뭔가를 대단히 잘못 알...
-
지영일•2000.09.09 00:03그렇군요.. 그럼 제가 잘못 알고 있었더거군요.. 최용일님 답변 정말 감사합니다. 저의 무지함으로 용서...
-
- 김옥란
- •
- 2000.09.08 01:52
- 1 COMMENTS
- /
- 0 LIKES
-
이진우•2000.09.10 02:13김옥란 wrote: > DB로는 MS-ACCESS를 사용하고 있구요. > 예를 들어 한 고객레코드를 선택하면 그 고객...
-
- 초보 델피니언!!
- •
- 2000.09.08 01:25
- 3 COMMENTS
- /
- 0 LIKES
-
심동훈•2000.09.08 20:38안녕하세요? 델파이세상(http://www.freechal.com/delphiworld)의 심동훈입니다. 제가 쓰는 방법은 for...
-
사발우성•2000.09.08 02:27sleep 을 사용하면됨당...^^ 헐 이렇게 하고 가니까 넘 썰렁해서리 몇자 더 적어봄당... 일단.. 스플...
-
지영일•2000.09.08 01:47도움이 될지 모르겠습니다. 부족하지만 몇가지 아는데로 적어 놓을께요.. 우선 스플래쉬 폼을 지연시키는...
-
- 써니
- •
- 2000.09.08 00:51
- 2 COMMENTS
- /
- 0 LIKES
-
박용철•2000.09.08 01:16~~~~~~~ --> HasChildren 그럼, 이만. 써니 wrote: > 안녕하세요... ^.^ > 트리뷰에서 현재 선택된 ...
-
Black}{ole•2000.09.08 01:12써니 wrote: > 안녕하세요... ^.^ > 트리뷰에서 현재 선택된 노드가 자식노드를 가지고 있는지 없는지 알...
-
- ljb007
- •
- 2000.09.08 00:14
- 1 COMMENTS
- /
- 0 LIKES
-
김하늘•2000.09.08 00:28CopyFile을 사용해 보세요... ljb007 wrote: > A 디렉토리에서 ==> B 디렉토리로 파일을 Copy하고싶거...
-
-
최용일•2000.09.08 05:29안녕하세요. 델파이세상의 최용일입니다. 이건 DLL과 같이 단독으로 실행할 수 없는 파일을 디버깅하려...
-
-
- 박일용
- •
- 2000.09.07 23:22
- 1 COMMENTS
- /
- 0 LIKES
-
아세만•2000.09.08 00:02박일용 wrote: > 엑셀파일을 DBGrid로 올리려 하는데 잘 안되네요... > DBGrid가 아닌 StringGrid로 올리...
-
- heimdal
- 2000.09.07 22:35
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕왕초보
- •
- 2000.09.07 21:52
- 1 COMMENTS
- /
- 0 LIKES
-
이화•2000.09.07 23:24이러한 방법을 써보시지요 uses jpeg; // 특정 디렉토리에있는 JPEG을 Image콤포넌트를 사용해 보여 ...
즉, CM_MOUSEENTER, CM_MOUSELEAVE는 W001F 객체에 메세지가 가는 것이지
Panel 객체에 메세지가 가는 것이 아닙니다.
아마 마우스의 이동에 따라 이미지를 다르게 보여줄 목적 같은데요.
TSpeedButton을 상속받아서 새로운 컴포넌트를 만들어야 합니다.
가장 무난한 방법은 자료실에 있는 다른 컴포넌트들을 설치해서 사용하시는 것입니다.
코스모 wrote:
>
> 조은 만남
> 다음은 마우스의 포커스를 체크하여 그림을 올려주는 예입니다.
>
> *-> 소스
> private
> { Private declarations }
> procedure WndProc(var Message: TMessage); override;
>
> procedure TW001F.WndProc(var Message: TMessage);
> begin
> if Message.LParam = Longint(SB_Grp1) then
> begin
> if Message.Msg = CM_MOUSELEAVE then SB_Grp1.Glyph := GRP_Right_F.Glyph
> else if Message.Msg = CM_MOUSEENTER then SB_Grp1.Glyph := GRP_Right_T.Glyph;
> end;
> inherited;
> end;
>
>
> *-> 설명
> SB_Grp1,GRP_Right_T, GRP_Right_F : TSpeedButton
> 폼위에다가 TSpeedButton을 올려놓으면 문제 없이 원하는 그림이 나오는데....
> 근데, 판넬위에다가 TSpeedButton을 올리면 왜 안되죠 ?
>
>
>