자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Delphi TEdit를 반투명하게 입력을 받고싶습니다

2019.12.01 12:15

헨씀히포 조회 수:158

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------

Delphi XE8 PC용으로 사용하고 잇습니다

Timge 컴포넌트 위에 TEdit를 배치해서 입력을 받고싶습니다

 

그런데 TEdit컴포넌트를 반투명으로 만들어서 뒤에 이미지를 TEDIT컴포넌트 뒤로 이미지가 보이게 하고 싶습니다

 

 

그런데 지금은 TEDIT 영역은 흰색으로 덮여서 이미지가 안보이이더라구요

 

 

var  I : Integer;
     FullRgn, ClientRgn, ControlRgn : THandle;
     Margin, MarginX, MarginY, X, Y : Integer;
begin
     Margin := (Edit1.Width - Edit1.ClientWidth) div 2;
     FullRgn := CreateRectRgn(0, 0, Edit1.Width, Edit1.Height);
     MarginX := Margin;
     MarginY := Edit1.Height - Edit1.ClientHeight - Margin;
     ClientRgn := CreateRectRgn(MarginX, MarginY, MarginX + Edit1.ClientWidth,
                                                  MarginY + Edit1.ClientHeight);
     CombineRgn(FullRgn, FullRgn, FullRgn, RGN_DIFF);
    

   SetWindowRgn(Edit1.Handle, FullRgn, True);

 

 

위와 같이 하니까 TEDIT가 전혀 안보이더구여

 

방법이없을까요?

 

라벨처럼 투명하지만 글자를 입력할수잇는 방법이 잇을까요???

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17207
공지 유용한 관련 사이트 관리자2 2014.03.20 56082
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99520
499 10.3.3 64-Bit deploy시 에러 [4] air 2019.11.28 212
498 [에러] ISO C++17 does not allow 'register' storage class specifier [2] file lamp 2019.11.29 1072
497 데이터스냅 사용자 인증 devdev 2019.11.29 117
496 ClientDataSet 이 연결오류 [1] file 우기여니아빠 2019.11.29 257
495 TJSONArray Data Clear 문의 [1] 늦바람 2019.11.29 402
» TEdit를 반투명하게 입력을 받고싶습니다 헨씀히포 2019.12.01 158
493 datasnap 이용하여 sqlconnection 이용하여 데이타를 모방일에서 가져오는데. 종결자 2019.12.01 111
492 델파이소스 빌더 변환 문의 [1] 누리 2019.12.04 111
491 컴파일에러 [1] 한시민 2019.12.04 123
490 ADOQuery의 SQL 에 Select * from Table where 조건 을 만족하는 데이터를 읽어 오는 방법 문의 드립니다. 한태수 2019.12.05 111
489 [10.3.3 브리핑] 안드로이드 앱 번들과 iOS 유니버셜 앱의 차이점은? file 험프리 2019.12.05 207
488 [10.3.3 브리핑] 안드로이드 64비트 장비에서 실행이 안되요. 험프리 2019.12.05 150
487 [10.3.3 브리핑] 출시 후 로드맵이 변경되었나요? 험프리 2019.12.05 116
486 [10.3.3 브리핑] 파이어몽키 성능향상으로 어떤 것이 있었나요? 험프리 2019.12.05 154
485 [10.3.3 브리핑] 엔터프라이즈 커넥터가 1년 라이선스인데 어떻게 갱신하는가? 험프리 2019.12.05 136
484 [10.3.3 브리핑] 업데이트에서 버그가 개선되었는지 확인하는 방법은? 험프리 2019.12.05 140
483 [10.3.3 브리핑] RAD서버의 부하 분산 등은 어떻게 되나요? 험프리 2019.12.05 131
482 RADSTUDIO 10(Seattle) 의 dbGo 팔레트에서 ADOStoredProc 관련 소스코드를 찾습니다. 한태수 2019.12.05 106
481 PageControl 컴포넌트에서...? [2] 헨씀히포 2019.12.06 343
480 Microsoft teams 메신저로 메세지(채팅)보내는거 경험 있으시분 있나요? max 2019.12.06 213
쓰기
태그