Q&A
판넬위에 TImage와 TShape 컴포넌트로서 새로운 시계 컴포넌트를 만들려구 합니다...^^
Shape는 시계의 동그란 부분을 만들고,
Image에서 시계바늘을 만들어 볼려구합니다.
그래서 생성자에서
constructor TWatch.Create( AOwner: TComponent );
begin
inherited Create( AOwner );
Caption := '';
width := 100;
height := 100;
BevelOuter := bvNone;
// 시계의 Back Ground 는 Shape로....
FWatchBack := TShape.Create( Self );
FWatchBack.Parent := self;
FWatchBack.Align := alClient;
FWatchBack.Shape := stCircle;
FWatchBack.Show;
// 시계의 바늘은 Image 로......
FWatchShow := TImage.Create( Self );
FWatchShow.Parent := self;
FWatchShow.Align := alClient; <- 이게 이상해욤.
FWatchShow.Transparent := true;
end;
이렇게 했는데욤
막상 컴파일해서 만들어보믄 시계 크기가 100,100 디폴트 크기면 딱 맞는데,
디자인 time에서 사이즈를 바꾸믄 Shape는 alClient로 지정되니까
정상적으로 크기가 변하는데,
Image 컴포넌트 이 눔은 꿈쩍두 않합니다.
한대 패주구 싶을 정도로.....T.T
어캐 조져야 시원하게 분풀이를 할수 있을까욤...^^;;;
부탁드립니다.
- 고수만... 컴포넌트 제작시 문제점...T.T
판넬위에 TImage와 TShape 컴포넌트로서 새로운 시계 컴포넌트를 만들려구 합니다...^^
Shape는 시계의 동그란 부분을 만들고,
Image에서 시계바늘을 만들어 볼려구합니다.
그래서 생성자에서
constructor TWatch.Create( AOwner: TComponent );
begin
inherited Create( AOwner );
Caption := '';
width := 100;
height := 100;
BevelOuter := bvNone;
// 시계의 Back Ground 는 Shape로....
FWatchBack := TShape.Create( Self );
FWatchBack.Parent := self;
FWatchBack.Align := alClient;
FWatchBack.Shape := stCircle;
FWatchBack.Show;
// 시계의 바늘은 Image 로......
FWatchShow := TImage.Create( Self );
FWatchShow.Parent := self;
FWatchShow.Align := alClient; <- 이게 이상해욤.
FWatchShow.Transparent := true;
end;
이렇게 했는데욤
막상 컴파일해서 만들어보믄 시계 크기가 100,100 디폴트 크기면 딱 맞는데,
디자인 time에서 사이즈를 바꾸믄 Shape는 alClient로 지정되니까
정상적으로 크기가 변하는데,
Image 컴포넌트 이 눔은 꿈쩍두 않합니다.
한대 패주구 싶을 정도로.....T.T
어캐 조져야 시원하게 분풀이를 할수 있을까욤...^^;;;
부탁드립니다.
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 만성
- •
- 2001.10.16 20:23
- 1 COMMENTS
- /
- 0 LIKES
-
델초야~•2001.10.16 20:57만성 wrote: > a,b:integer; > c:Real; > d:string; > > a:=15; > b:=910; > > > 계산기로 a/b...
-
- 문상진
- 2001.10.16 20:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보임당
- •
- 2001.10.16 20:10
- 1 COMMENTS
- /
- 0 LIKES
-
irookie•2001.10.17 00:18답1) splash form을 원하는것 같군요... 검색을 해 보세염. splash or 로긴폼 or login등등등으로....
-
- 늘항상
- •
- 2001.10.16 19:36
- 3 COMMENTS
- /
- 0 LIKES
-
델초야~•2001.10.16 19:57늘항상 wrote: > > 티차트를 사용하여 통계 수치를 디스플레이 하려 합니다. > > 이때, 생성되는 각 ...
-
오고야•2001.10.17 02:57답변 감사드립니다. 음...그런데, 제가 원하는 건... 하나의 시리즈에서 디스플레이 되는 막대그래...
-
델초야~•2001.10.17 03:31정리해볼께여. 그러니깐 님은 각 막대의 속성중 보더속성을 각가 다르게 하시겠단 얘기져? 뭐 하나는 ...
-
- 최유순
- •
- 2001.10.16 19:28
- 1 COMMENTS
- /
- 0 LIKES
-
나그네•2001.10.16 19:52> "Cannot perform this operation on an open dataset" 이 메뙤지는 이미 오픈된 데이타셋을 다시 오픈하...
-
-
- 처용의후예
- 2001.10.16 19:16
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초야~
- •
- 2001.10.16 18:51
- 3 COMMENTS
- /
- 0 LIKES
-
동급최강바보•2001.10.17 03:02TThread객체의 생성자를 보시면 __fastcall TThread(bool CreateSuspended);요
-
델초야~•2001.10.17 03:35동급최강바보 wrote: > TThread객체의 생성자를 보시면 > __fastcall TThread(bool CreateSuspended);요
-
나그네•2001.10.17 18:02스레드의 Create 가 재정의 되었기 때문이지요. 그렇기 때문에 다시 호출해주지 않으면 스레드가 실행되지...
-
- 델초야~
- 2001.10.16 18:27
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕초보
- 2001.10.16 13:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 동급최강바보
- •
- 2001.10.16 12:03
- 1 COMMENTS
- /
- 0 LIKES
-
나그네•2001.10.16 17:11procedure Copy(var m:TMyrecord; p:PChar) begin Move(p^, m, SizeOf(m)); end; 당근 레코드형내...
-
- 나두초보
- •
- 2001.10.16 11:16
- 2 COMMENTS
- /
- 0 LIKES
-
델초야~•2001.10.16 18:44저두 초보지만 제가 어제 델파이 예제를 하나 봤거든여. 거기서 님이 질문하신 거에 대한 참고를 할 수 있...
-
동급최강바보•2001.10.16 12:06TThread를 상속받아서 Thread를 사용하시길 바랍니다. 굳이 API를 쓰지않아도 TThread를 사용한다면 굳이 ...
-
- 초보
- •
- 2001.10.16 07:36
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2001.10.20 05:44초보 wrote: > 호를 그리려고 합니다. > 전에 홍성락님이 알려주셨는데 머리가 나쁜 탓에 아직 해결을 ...
-
- 은하수
- •
- 2001.10.16 07:33
- 1 COMMENTS
- /
- 0 LIKES
-
정성훈•2001.10.17 03:02은하수 wrote: > 너무 초보적인 질문이라는 생각이 들지만...... > 정말 죄송합니다.... > 요게 왜 이렇...
-
- 찌르
- •
- 2001.10.16 06:40
- 2 COMMENTS
- /
- 0 LIKES
-
skpark•2001.10.16 07:49$0D0A에서 $0A만 너어주세요 찌르 wrote: > 안녕하세요 > 마음은 급한데 잘 안되네요. ^^ > > [질...
-
찌르•2001.10.18 05:56감사합니다.^^
-
- green15
- •
- 2001.10.16 05:52
- 1 COMMENTS
- /
- 0 LIKES
-
나그네•2001.10.16 19:58green15 wrote: > dbgrid에 코딩으로 데이타값을 넣는 방법이 있습니까? 넵! 그리고 스트링그리드의 ...
-
- 피터팬
- •
- 2001.10.16 05:37
- 1 COMMENTS
- /
- 0 LIKES
-
박상윤•2001.10.17 06:35AVIFile Reference This section describes the functions, structures, and macros for applications usi...
-
- Faster
- •
- 2001.10.16 05:31
- 1 COMMENTS
- /
- 0 LIKES
판넬위에 TImage와 TShape 컴포넌트로서 새로운 시계 컴포넌트를 만들려구 합니다...^^ Shape는 시계의 동그란 부분을 만들고, Image에서 시계바늘을 만들어 볼려구합니다. 그래서 생성자에서 constructor TWatch.Create( AOwner: TCompon...-
한형길•2001.10.16 06:33이미지 콤포넌트는 그림크기에 따라 크기가 고정되는 경우가 있죠. 그래서 몇가지 속성을 조절을 해줘야 ...
-
- hpyoon
- 2001.10.16 04:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 유종근
- 2001.10.16 04:14
- 0 COMMENTS
- /
- 0 LIKES
그래서 몇가지 속성을 조절을 해줘야 함다.
크기에 따라서 이미지를 줄이고 늘려서 표시해 주는 속성이 있는데 기억이 잘안나네.
그리고 AutoSize 속성을 False 로 해주고 alClient 보다는 크기가 변할때
직접 높이와 폭을 조절해 주시면 될거 같군요. Panel 의 OnResize 이벤트에서 직접
맞춰준다거나 그러면 되겠죠.
그리고 솔직히 이미지 콤포넌트와 콤포넌트로 하는것보다는 이미지콤포넌트에 그림을
넣고 그 그림을 StretchBlt 함수로 직접 늘이거나 줄여서 그림을 표시해 주고
하면서 그 바탕그림위에 시계를 그리고 그럼 더 좋은 것이 될거같군요.
Faster wrote:
>
> 판넬위에 TImage와 TShape 컴포넌트로서 새로운 시계 컴포넌트를 만들려구 합니다...^^
> Shape는 시계의 동그란 부분을 만들고,
> Image에서 시계바늘을 만들어 볼려구합니다.
>
> 그래서 생성자에서
>
> constructor TWatch.Create( AOwner: TComponent );
> begin
> inherited Create( AOwner );
> Caption := '';
> width := 100;
> height := 100;
> BevelOuter := bvNone;
>
> // 시계의 Back Ground 는 Shape로....
> FWatchBack := TShape.Create( Self );
> FWatchBack.Parent := self;
> FWatchBack.Align := alClient;
> FWatchBack.Shape := stCircle;
> FWatchBack.Show;
>
> // 시계의 바늘은 Image 로......
> FWatchShow := TImage.Create( Self );
> FWatchShow.Parent := self;
> FWatchShow.Align := alClient; <- 이게 이상해욤.
> FWatchShow.Transparent := true;
> end;
>
> 이렇게 했는데욤
>
> 막상 컴파일해서 만들어보믄 시계 크기가 100,100 디폴트 크기면 딱 맞는데,
> 디자인 time에서 사이즈를 바꾸믄 Shape는 alClient로 지정되니까
> 정상적으로 크기가 변하는데,
>
> Image 컴포넌트 이 눔은 꿈쩍두 않합니다.
> 한대 패주구 싶을 정도로.....T.T
>
> 어캐 조져야 시원하게 분풀이를 할수 있을까욤...^^;;;
>
> 부탁드립니다.
>