Q&A
- 최용일님 너무 감사합니다. 하나만 더 물어볼께요.
최용일님 감사합니다.
하나만 더 물어볼께요. 아까 그 소스중에 없애라고 하신거 없앴거든요. 그런데
아직도 잔상이 그대로 남아있는데 어떻게 해야 하나요.
이 소스가 틀리나요?
procedure TForm1.FormResize(Sender: TObject);
var
WindowRgn: HRgn;
begin
WindowRgn := 0;
GetWindowRgn(Handle,WindowRgn);
DeleteObject(WindowRgn);
WindowRgn := CreateRectRgn(0,0,116,109);
SetWindowRgn(Handle,WindowRgn,True);
DeleteObject(WindowRgn);
end;
폼 위에 투명 이미지(gif)가 있거든요. 그런데 잔상은 그대로인데 뭐가 잘못된건가요?
하나만 더 물어볼께요. 아까 그 소스중에 없애라고 하신거 없앴거든요. 그런데
아직도 잔상이 그대로 남아있는데 어떻게 해야 하나요.
이 소스가 틀리나요?
procedure TForm1.FormResize(Sender: TObject);
var
WindowRgn: HRgn;
begin
WindowRgn := 0;
GetWindowRgn(Handle,WindowRgn);
DeleteObject(WindowRgn);
WindowRgn := CreateRectRgn(0,0,116,109);
SetWindowRgn(Handle,WindowRgn,True);
DeleteObject(WindowRgn);
end;
폼 위에 투명 이미지(gif)가 있거든요. 그런데 잔상은 그대로인데 뭐가 잘못된건가요?
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 최종륜
- 2000.07.28 08:42
- 0 COMMENTS
- /
- 0 LIKES
-
- 임규완
- •
- 2000.07.28 08:23
- 1 COMMENTS
- /
- 0 LIKES
최용일님 감사합니다. 하나만 더 물어볼께요. 아까 그 소스중에 없애라고 하신거 없앴거든요. 그런데 아직도 잔상이 그대로 남아있는데 어떻게 해야 하나요. 이 소스가 틀리나요? procedure TForm1.FormResize(Sender: TObject); var Wind...-
최용일•2000.07.28 21:20안녕하세요. 최용일입니다. 보내주신 소스느 저에게 없는 컴포넌트를 사용하셔서 제대로 확인은 못했지...
-
- castle road
- •
- 2000.07.28 08:05
- 1 COMMENTS
- /
- 0 LIKES
-
유수•2000.07.28 11:44정상적으로 작동한다면 읽은 파일 또 읽는 경우는 없으니깐여, 괜찮으시다면 문제가 되는 부분의 소스...
-
- 초보 100
- •
- 2000.07.28 08:05
- 3 COMMENTS
- /
- 0 LIKES
-
초보 100•2000.07.29 01:56초보 100 wrote: 많은 도움이 되었구여..... 좋은 하루되시길 바랍니다.
-
4master•2000.07.28 09:29초보 100 wrote: > 사용자들이 윈도우즈를 설치할때 반드시 C:windows에 설치하는게 아니자나여? > 그래...
-
parkisu•2000.07.28 09:384master wrote: > 초보 100 wrote: > > 사용자들이 윈도우즈를 설치할때 반드시 C:windows에 설치하는게 ...
-
- space4
- •
- 2000.07.28 07:08
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•2000.07.28 12:47space4 wrote: > GetMem StrPCopy FindWindow 이것은 또 뭐꼬? > > 에이 짜증나 사표낼까?? ...
-
- space4
- 2000.07.28 07:06
- 0 COMMENTS
- /
- 0 LIKES
-
- space4
- •
- 2000.07.28 07:02
- 1 COMMENTS
- /
- 0 LIKES
-
4master•2000.07.28 09:27space4 wrote: > variant 라는 변수에 대해서 자세히 알고 싶은데.. > 예제와 함께면 더 좋고요... > ...
-
- 빈거울
- •
- 2000.07.28 07:01
- 2 COMMENTS
- /
- 0 LIKES
-
Mr.Q•2000.07.28 10:07빈거울 wrote: > 백스페이스로는 삭제가 안되는 것이 있어 delete키로 백스페이스 기능을 > 구현하려고 ...
-
parkisu•2000.07.28 09:32빈거울 wrote: > 백스페이스로는 삭제가 안되는 것이 있어 delete키로 백스페이스 기능을 > 구현하려고 ...
-
- 장식원
- •
- 2000.07.28 05:41
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2000.07.28 13:06장식원 wrote: > 델파이에서 기본적으로 선언되어 있지 않은 API인가 봅니다.. > 어떻게 해야 사용할 수 ...
-
장식원•2000.07.29 00:40답변해 주셔서 감사합니다. 그런데 초보가 이해하기에는 너무 어려운 소스군요... 제 나름대로 수정하기...
-
- 델피
- 2000.07.28 05:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 김재억
- 2000.07.28 05:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 수연이
- 2000.07.28 05:03
- 0 COMMENTS
- /
- 0 LIKES
-
- 혀기
- •
- 2000.07.28 04:17
- 1 COMMENTS
- /
- 0 LIKES
-
parkisu•2000.07.28 09:34혀기 wrote: > 폼이름 , 유닛이름 등 모두 변경을 하고 나니 > 컴파일 시에 자꾸 에러가 나오네요.. > ...
-
- 최병희
- 2000.07.28 04:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 유인희
- •
- 2000.07.28 04:15
- 1 COMMENTS
- /
- 0 LIKES
-
타락천사•2000.07.28 05:30안녕하세여.. 타락임다..^^ 가령 Query를 쓴다면... Query1.Edit; DBEdit.Text := '이때 입력된다';...
-
- 칠돌이
- 2000.07.28 03:42
- 0 COMMENTS
- /
- 0 LIKES
-
- 김원석
- •
- 2000.07.28 03:19
- 1 COMMENTS
- /
- 0 LIKES
-
yoonty•2000.07.28 03:42김원석 wrote: > > 아래 함수를 이용해서 시간이 되면 컴퓨터가 자동으로 꺼지도록 해 > 보았습니...
-
- 황은주
- •
- 2000.07.28 02:50
- 1 COMMENTS
- /
- 0 LIKES
-
김만성•2000.07.31 19:52하하 ^^ 왜 웃냐고요... 문제가 해결이 되었거든요... 알고보니 어이가 없어서요.. 헤헤 ^^; ...
-
- 김만업
- •
- 2000.07.28 02:07
- 1 COMMENTS
- /
- 0 LIKES
-
BENGI•2001.03.02 05:54김만업 wrote: > translate error, value out of bounds란 에러에 대해서 설명 좀 부탁합니다. > 그리고 ...
-
- jody
- 2000.07.28 01:48
- 0 COMMENTS
- /
- 0 LIKES
보내주신 소스느 저에게 없는 컴포넌트를 사용하셔서 제대로 확인은 못했지만 실행
파일로 구현하실려는 의도를 알 수 있었습니다.
코드중에 Brush.Style := bsClear; <- 이런 부분이 있더군요. 이건 말이 투명이지
별다른 효과는 없습니다. 그냥 윈도밑의 배경을 캔버스에 그려주는것외에는...
여기에 클릭한다고해서 밑에 있는 윈도우가 선택되지는 않습니다. 잔상은 이것때문에
생기는 것이고요. 보니까 이미지가 무척 복잡하더군요. 이미지의 투명한 영역을 잘라
내는 것도 장난이 아니겠구요. 물론 폐곡면을 이용하면 잘라내는 것은 가능하겠지만
구해야하는 좌표가 한두개가 아니라 이건 미친짓이 될테죠.
제 생각엔 MSAgent를 사용하시는것이 좋을듯하네요... 마소 홈페이지에 가시면 SDK가
있읍니다. 이걸 사용해보세요...
아! 자료실에 보시면 투명한효과를 내는 컴포넌트가 있습니다. 이걸 사용하신다면
Brush.Style := bsClear;를 사용할때처럼 잔상은 생기지 않을것 같군요. 물론
Brush.Style := bsClear;처럼 배경의 윈도가 선택되지는 않겟지만...
^^ 항상 즐코하세요.
임규완 wrote:
> 최용일님 감사합니다.
>
> 하나만 더 물어볼께요. 아까 그 소스중에 없애라고 하신거 없앴거든요. 그런데
>
> 아직도 잔상이 그대로 남아있는데 어떻게 해야 하나요.
>
> 이 소스가 틀리나요?
>
> procedure TForm1.FormResize(Sender: TObject);
> var
> WindowRgn: HRgn;
> begin
> WindowRgn := 0;
> GetWindowRgn(Handle,WindowRgn);
> DeleteObject(WindowRgn);
> WindowRgn := CreateRectRgn(0,0,116,109);
> SetWindowRgn(Handle,WindowRgn,True);
> DeleteObject(WindowRgn);
> end;
>
> 폼 위에 투명 이미지(gif)가 있거든요. 그런데 잔상은 그대로인데 뭐가 잘못된건가요?