Q&A
- 마우스 아래에 어떤 컴포넌트가 존재 하는지...
제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클릭 했을때 해당 컴포넌트에 대한 정보를 보여주려 합니다.
마우스 아래 어떤 컴포넌트가 존재 하는지 그리고 그 컴포넌트에 대한 힌트라든가 뭐 이런 값들을 가져 올 수 있는 방법 좀 부탁 합니다.
ps: 동적으로 생성된 이미지 컴포넌트는 정해져 있는것이 아니고 컴포넌트수 는 계속 바뀌게 되어 있습니다.
감사합니다...
마우스 아래 어떤 컴포넌트가 존재 하는지 그리고 그 컴포넌트에 대한 힌트라든가 뭐 이런 값들을 가져 올 수 있는 방법 좀 부탁 합니다.
ps: 동적으로 생성된 이미지 컴포넌트는 정해져 있는것이 아니고 컴포넌트수 는 계속 바뀌게 되어 있습니다.
감사합니다...
3
COMMENTS
-
-
구창민 wrote:
> jinney wrote:
> > 제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클릭 했을때 해당 컴포넌트에 대한 정보를 보여주려 합니다.
> >
> > 마우스 아래 어떤 컴포넌트가 존재 하는지 그리고 그 컴포넌트에 대한 힌트라든가 뭐 이런 값들을 가져 올 수 있는 방법 좀 부탁 합니다.
> >
> > ps: 동적으로 생성된 이미지 컴포넌트는 정해져 있는것이 아니고 컴포넌트수 는 계속 바뀌게 되어 있습니다.
> >
> > 감사합니다...
>
>
> 아래 함수를 이용해 보세요~
>
> 그럼~ 항상 즐거운 프로그래밍 하시길~~
>
> function GetParentWindowNameAt(X, Y : integer) : string;
> var
> P : TPoint;
> W : TWinControl;
> begin
> P.X := X;
> P.Y := Y;
>
> W := FindVCLWindow( P );
> if( nil <> W )then
> begin
> Result := W.Name;
> end else
> begin
> Result := '';
> end;
> end;
>
> 예)
>
> procedure TForm1.Timer1Timer(Sender: TObject);
> var
> Mpt: TPoint;
> begin
> GetCursorPos(Mpt);
> Caption := GetParentWindowNameAt(Mpt.x, Mpt.Y );
> end;
-
구창민 wrote:
> jinney wrote:
> > 제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클릭 했을때 해당 컴포넌트에 대한 정보를 보여주려 합니다.
> >
> > 마우스 아래 어떤 컴포넌트가 존재 하는지 그리고 그 컴포넌트에 대한 힌트라든가 뭐 이런 값들을 가져 올 수 있는 방법 좀 부탁 합니다.
> >
> > ps: 동적으로 생성된 이미지 컴포넌트는 정해져 있는것이 아니고 컴포넌트수 는 계속 바뀌게 되어 있습니다.
> >
> > 감사합니다...
>
>
> 아래 함수를 이용해 보세요~
>
> 그럼~ 항상 즐거운 프로그래밍 하시길~~
>
> function GetParentWindowNameAt(X, Y : integer) : string;
> var
> P : TPoint;
> W : TWinControl;
> begin
> P.X := X;
> P.Y := Y;
>
> W := FindVCLWindow( P );
> if( nil <> W )then
> begin
> Result := W.Name;
> end else
> begin
> Result := '';
> end;
> end;
>
> 예)
>
> procedure TForm1.Timer1Timer(Sender: TObject);
> var
> Mpt: TPoint;
> begin
> GetCursorPos(Mpt);
> Caption := GetParentWindowNameAt(Mpt.x, Mpt.Y );
> end;
(NOTICE) You must be logged in to comment on this post.
-
- 델초보...ㅡㅡ;;
- 2001.09.22 02:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 이성용
- •
- 2001.09.22 02:31
- 4 COMMENTS
- /
- 0 LIKES
-
Ziker•2001.09.22 02:34안녕하세요 델파이 bpl 버그 인거 같은데.. 소스 저장하시고 델파이를 종료 했다가 다시 프로젝트를 ...
-
이성용•2001.09.22 03:04답변 감사합니다만... 버그라서 그런지... 프로젝트 다시 열어도 마찬가지입니다. 개발자가 여러명 있는...
-
떠버기•2001.09.22 06:18자세한 내용은 잘 모르겠는데요. 델파이를 깨끗이 지우고, 다시 델파이를 깔아도 좋은 방법이 될것 같네...
-
버섯돌이•2001.09.22 04:20이성용 wrote: > 답변 감사합니다만... > 버그라서 그런지... 프로젝트 다시 열어도 마찬가지입니다. > ...
-
- jinney
- •
- 2001.09.22 02:18
- 3 COMMENTS
- /
- 0 LIKES
제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클릭 했을때 해당 컴포넌트에 대한 정보를 보여주려 합니다. 마우스 아래 어떤 컴포넌트가 존재 하는지 그리고 그 컴포넌트에 대한 힌트라든가 뭐 이런 값들을 가져 올 수...-
구창민•2001.09.22 04:12jinney wrote: > 제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클릭 했을때 해당 컴포...
-
jinney•2001.09.22 20:07구창민 wrote: > jinney wrote: > > 제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클...
-
jinney•2001.09.22 19:17구창민 wrote: > jinney wrote: > > 제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클...
-
- 와우
- •
- 2001.09.22 01:53
- 1 COMMENTS
- /
- 0 LIKES
-
해결맨•2001.09.24 19:50procedure TForm1.Button2Click(Sender: TObject); var jpeg1 : TjpegImage; jpeg2 : TjpegImage; ...
-
- 최부열
- 2001.09.22 01:47
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초
- •
- 2001.09.22 01:48
- 1 COMMENTS
- /
- 0 LIKES
-
Ziker•2001.09.22 02:32안녕하세요 Pos('''',ABC.Values[29]) > 0) 이 부분이 잘못 된거 같은데요.. 우선 공백은 '''' 가 ...
-
-
Ziker•2001.09.22 02:19안녕하세요 소켓이 서버에서 하나를 보냈다고 해서 클라이언트에 하나가 도착 하는게 아닙니다. 님...
-
-
- aparadin
- •
- 2001.09.22 01:07
- 1 COMMENTS
- /
- 0 LIKES
-
Ziker•2001.09.22 02:25안녕하세요. 두가지 경우가 있겠습니다. 실제로 바이러스 때문에 Chart1 관련 dll등이 손상을 입었을경...
-
- kirisame
- 2001.09.22 00:34
- 0 COMMENTS
- /
- 0 LIKES
-
- vilot
- •
- 2001.09.22 00:23
- 6 COMMENTS
- /
- 0 LIKES
-
권경숙•2001.09.22 00:33
-
vilot•2001.09.22 02:07
-
권경숙•2001.09.22 02:20
-
vilot•2001.09.22 02:25
-
권경숙•2001.09.22 03:58
-
명탁•2001.09.22 09:48
-
- NOJ
- •
- 2001.09.21 23:56
- 2 COMMENTS
- /
- 0 LIKES
-
구창민•2001.09.22 04:18NOJ wrote: > 파일형태는 100byte가 한줄로 되어있는데 > 간혹 100byte가 조금 안되는 데이타가 한줄로 ...
-
Ziker•2001.09.22 02:39안녕하세요 TMemoryStream으로 읽어들인다음 잘라서 사용 해 보시기 바랍니다. TMemoryStream에대한 ...
-
- 권경숙
- 2001.09.21 23:42
- 0 COMMENTS
- /
- 0 LIKES
-
- 초짜
- 2001.09.21 23:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 김명찬
- 2001.09.21 23:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 처음
- 2001.09.21 23:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 바보감자
- 2001.09.21 22:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 전진배
- 2001.09.21 22:23
- 0 COMMENTS
- /
- 0 LIKES
-
- goodman
- •
- 2001.09.21 21:45
- 4 COMMENTS
- /
- 0 LIKES
-
stoney•2001.09.22 03:33어떤 일을 하시는지는 모르지만 알리어스를 잡고 쓰는거보다 그냥 절대 경로를 사용해서 쓰시면 어떨까요??...
-
초보•2001.09.21 23:09goodman wrote: > 항상 성실한 답변에 감사합니다. > > 하나의 폼안에서 각각 다른 디렉토리에 있는 DB...
-
goodman•2001.09.22 04:24초보 wrote: > goodman wrote: > > 항상 성실한 답변에 감사합니다. > > > > 하나의 폼안에서 각각 다...
-
goodman•2001.09.22 04:24초보 wrote: > goodman wrote: > > 항상 성실한 답변에 감사합니다. > > > > 하나의 폼안에서 각각 다...
-
- 못말리는초보
- 2001.09.21 20:53
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 2001.09.21 20:09
- 0 COMMENTS
- /
- 0 LIKES
> 제가 동적으로 이미지 컴포넌트를 몇개 생성했는데 이 컴포넌트를 클릭 했을때 해당 컴포넌트에 대한 정보를 보여주려 합니다.
>
> 마우스 아래 어떤 컴포넌트가 존재 하는지 그리고 그 컴포넌트에 대한 힌트라든가 뭐 이런 값들을 가져 올 수 있는 방법 좀 부탁 합니다.
>
> ps: 동적으로 생성된 이미지 컴포넌트는 정해져 있는것이 아니고 컴포넌트수 는 계속 바뀌게 되어 있습니다.
>
> 감사합니다...
아래 함수를 이용해 보세요~
그럼~ 항상 즐거운 프로그래밍 하시길~~
function GetParentWindowNameAt(X, Y : integer) : string;
var
P : TPoint;
W : TWinControl;
begin
P.X := X;
P.Y := Y;
W := FindVCLWindow( P );
if( nil <> W )then
begin
Result := W.Name;
end else
begin
Result := '';
end;
end;
예)
procedure TForm1.Timer1Timer(Sender: TObject);
var
Mpt: TPoint;
begin
GetCursorPos(Mpt);
Caption := GetParentWindowNameAt(Mpt.x, Mpt.Y );
end;