Q&A
- imageList에 있는 이미지 image에 삽입하기
이미지 리스트(TImageList)에 그림을 넣어두고
버튼을 클릭시 이미지리스트에 있는 그림들중 하나를
이미지(TImage)에 넣고 싶은데 잘모르겠어요.
아시는 고수님들 저에게 답변좀 부탁합니다..
그럼 좋은 하루 되세요..
버튼을 클릭시 이미지리스트에 있는 그림들중 하나를
이미지(TImage)에 넣고 싶은데 잘모르겠어요.
아시는 고수님들 저에게 답변좀 부탁합니다..
그럼 좋은 하루 되세요..
2
COMMENTS
-
-
저도 Imagelist는 안써봐서 어떻게 쓰는지는 잘 모르는데 이렇게 하니까 되네요.
iCount를 전역으로 선언하고 ImageList의 GetBitmap 프로시져를 이용했습니다.
procedure TForm1.Button1Click(Sender: TObject);
var
Bitmap : TBitmap;
begin
Bitmap := TBitmap.Create;
ImageList.GetBitmap((iCount mod ImageList.Count),Bitmap);
Image1.Picture.Assign(Bitmap);
Bitmap.Free;
iCount := iCount + 1;
end;
(NOTICE) You must be logged in to comment on this post.
-
- 임지수
- •
- 2002.07.19 20:01
- 3 COMMENTS
- /
- 0 LIKES
-
배경•2002.07.19 20:37저 가 확인 해 봤는 네 잘 되는군요 이상하네요 혹 델파이 6을 업그레이드 안하셨는지 ? 그리고 ...
-
이추형•2002.07.19 20:19혹시 FormCreate 이벤트에서 작업을 하신다면 각각의 components 생성에 문제가 생깁니다. FormActivate...
-
임지수•2002.07.19 20:32님.. procedure TFrm_buyer.edit_enabled(x:boolean); begin Btn_insert.Enabled := x; Btn_edit.Ena...
-
- 이기정
- 2002.07.19 19:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 민병범
- 2002.07.19 19:17
- 0 COMMENTS
- /
- 0 LIKES
-
- 델파이사랑
- •
- 2002.07.19 18:49
- 1 COMMENTS
- /
- 0 LIKES
-
한원희•2002.07.19 19:32모달 다이얼로그라고 하셨으니까, 버튼의 ModalResult 값을 세팅하셨겠군요. 예를 들어, 확인 버튼에는 mr...
-
- 박명성
- •
- 2002.07.19 18:08
- 1 COMMENTS
- /
- 0 LIKES
-
김도형•2002.07.19 18:24//찾기 procedure TFrm_Main.Dlg_FindFind(Sender: TObject); var FoundAt: LongInt; &nbs...
-
- 함희주
- 2002.07.19 14:41
- 0 COMMENTS
- /
- 0 LIKES
-
- 김동광
- 2002.07.19 07:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 박종삼
- •
- 2002.07.19 06:04
- 1 COMMENTS
- /
- 0 LIKES
-
이현철•2002.07.20 19:57흠.. 저도 안해봤던 부분이라.. 어떻게 말씀드려야 할지 모르겠네요... 그렇다고 그 상황을 제가 직접 만...
-
- 성대현
- •
- 2002.07.19 05:54
- 2 COMMENTS
- /
- 0 LIKES
이미지 리스트(TImageList)에 그림을 넣어두고 버튼을 클릭시 이미지리스트에 있는 그림들중 하나를 이미지(TImage)에 넣고 싶은데 잘모르겠어요. 아시는 고수님들 저에게 답변좀 부탁합니다.. 그럼 좋은 하루 되세요..-
한원희•2002.07.19 19:06ImageList 의 이미지를 캔버스에 그려주는 메소드가 있습니다. Draw 라는 메소드인데... 이를 이용해 보세...
-
서기원•2002.07.19 06:35저도 Imagelist는 안써봐서 어떻게 쓰는지는 잘 모르는데 이렇게 하니까 되네요. iCount를 전역으로 선...
-
- 짱아
- •
- 2002.07.19 04:20
- 1 COMMENTS
- /
- 0 LIKES
-
한원희•2002.07.19 18:56연산상으로는 따로 잘못된 부분은 없는 것 같습니다. 0이 넘어가는 경우는, ComboBox2.text 에서 가져온 ...
-
- 박영수
- •
- 2002.07.19 04:02
- 1 COMMENTS
- /
- 0 LIKES
-
이추형•2002.07.19 20:22건수가 얼마되지 않는다면 출력용 dataset을 하나더 가져가는건 어떨까요?
-
- 송재훈
- •
- 2002.07.19 03:43
- 1 COMMENTS
- /
- 0 LIKES
-
한원희•2002.07.19 19:14글쎄요. 참 논란의 소지가 있는 질문이네염 ^^ 한 가지 확실한 것은 비베는 베이직 언어를 사용하고, 델...
-
- 델파이사랑
- •
- 2002.07.19 03:12
- 4 COMMENTS
- /
- 0 LIKES
-
최석기•2002.07.19 19:47TForm안에 선언한 함수의 선언은 TForm의 Public 멤버 함수로 사용되어진다는 의미에 선언이기 때문에 함수...
-
신연근•2002.07.19 05:59자세한건 저도 초보이기 때문에 잘 모르겠지만 선언부(public)에 써준 function을 삭제하시던가 아니면...
-
박영수•2002.07.19 04:08function TForm1.MyProc(FirstInt: Integer; SecondInt: Integer): Integer; var ...
-
hidel•2002.07.19 04:05{$R *.dfm} function TForm1.MyProc(FirstInt: Integer; SecondInt: Integer): Integer; 로 ..해보세요...
-
- 넘버3
- 2002.07.19 03:11
- 0 COMMENTS
- /
- 0 LIKES
-
- 이현철
- 2002.07.19 02:56
- 0 COMMENTS
- /
- 0 LIKES
-
- 사발우성
- 2002.07.19 02:49
- 0 COMMENTS
- /
- 0 LIKES
-
- 석
- •
- 2002.07.19 02:28
- 4 COMMENTS
- /
- 0 LIKES
-
석•2002.07.20 02:57
-
최용일•2002.07.19 03:16안녕하세요. 최용일입니다. 그냥 빈문자열주시면 됩니다... Registry.ReadString(''); ^^ 항상 즐...
-
이병협•2002.07.19 03:16Registry.ReadString(''); 하시면 됩니다.
-
이현철•2002.07.19 02:50아래의 예제는 제가 예전에 작성했던 코드인데.. HKEY_LOCAL_MACHINE 밑에 softwaremicrosoftwindowscur...
-
- 뿡뿡이
- •
- 2002.07.19 01:46
- 2 COMMENTS
- /
- 0 LIKES
-
withcount•2002.07.19 03:21형호님이 미리 답변하셨네요..^^ 델코 초보강좌란에 "Interbase Q&A 모음" 이 있는데 읽어보시면 도움...
-
임형호•2002.07.19 02:17interbase 초기설정하는것은 요즘 나오는 델파이 책을 보면... 나와있는것들이 많이있습니다. 질문하신 내...
-
- 나상진
- •
- 2002.07.19 01:29
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2002.07.19 01:32안녕하세요. 최용일입니다. uses절에 CommCtrl유닛을 추가하세요... ^^ 항상 즐코하세요...
-
이현철•2002.07.19 01:31이 컴포한번 써보세용.. 프로그래스바고 머고.. 다 상태바에 올릴수 있습니다..
-
- 박주민
- 2002.07.19 01:17
- 0 COMMENTS
- /
- 0 LIKES
Draw 라는 메소드인데... 이를 이용해 보세요..
또는 GetBitmap 메소드를 통해서 비트맵을 얻어서 TImage에 할당 하는 방법도
있을 수 있겠군요.
아래는 Draw 메소드로 TImage에 그려주는 사용 예입니다. ^^
procedure TForm1.Button1Click(Sender:TObject);
begin
with Image1.Canvas do
begin
ImageList1.Draw(Image1.Canvas, Rect.Left, Rect.Top, StrToInt(Edit1.Text));
end;
end;
Edit1.Text는 이미지 리스트의 내의 이미지 번호가 되겠죠...