자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi TEdit를 반투명하게 입력을 받고싶습니다
2019.12.01 12:15
본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------
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가 전혀 안보이더구여
방법이없을까요?
라벨처럼 투명하지만 글자를 입력할수잇는 방법이 잇을까요???
댓글 0
Delphi TEdit를 반투명하게 입력을 받고싶습니다
2019.12.01 12:15
본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------
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가 전혀 안보이더구여
방법이없을까요?
라벨처럼 투명하지만 글자를 입력할수잇는 방법이 잇을까요???