Q&A
- 이미지 불러 오기에서..
안녕 하세요...
제가 이미지를 불러 오려고 열심히 노력해 봤는데...
이상하게 bmp 는 불러 오는데 jpg 는 못 불러 오더라구요...ㅠ.ㅠ
jpg가 용량이 적게 먹여서 사용하려고 했는데...
음.. 방법이 없을까요..
제가 쓴 소스 입니다... 이렇게 하면 jpg못 불러 오나요??
aImage:=fImagePath5+edtF01.Text+'.jpg';
if aImage<>'' then begin
FileExt := AnsiUpperCase(ExtractFileExt(aImage));
if (FileExt = '.JPG') then begin
Try
Image1.Picture.LoadFromFile(aImage);
except
Image1.Picture.Bitmap:=nil;
exit;
end;
end;
end else Image1.Picture.Bitmap:=nil;
저기서 fImagePath5 는 이미지 폴더를 가리키구요...
edtF01.Text 는 키입니다.. 키하고 이미지 화일하고 이름을 같이 했어요...
함 봐주시고 속 시원한 답변 바랍니다...^^
제가 이미지를 불러 오려고 열심히 노력해 봤는데...
이상하게 bmp 는 불러 오는데 jpg 는 못 불러 오더라구요...ㅠ.ㅠ
jpg가 용량이 적게 먹여서 사용하려고 했는데...
음.. 방법이 없을까요..
제가 쓴 소스 입니다... 이렇게 하면 jpg못 불러 오나요??
aImage:=fImagePath5+edtF01.Text+'.jpg';
if aImage<>'' then begin
FileExt := AnsiUpperCase(ExtractFileExt(aImage));
if (FileExt = '.JPG') then begin
Try
Image1.Picture.LoadFromFile(aImage);
except
Image1.Picture.Bitmap:=nil;
exit;
end;
end;
end else Image1.Picture.Bitmap:=nil;
저기서 fImagePath5 는 이미지 폴더를 가리키구요...
edtF01.Text 는 키입니다.. 키하고 이미지 화일하고 이름을 같이 했어요...
함 봐주시고 속 시원한 답변 바랍니다...^^
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 정필목
- 2002.02.27 20:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 박상용
- •
- 2002.02.27 19:06
- 3 COMMENTS
- /
- 0 LIKES
-
gudwhrla•2002.02.27 19:28QuickRep의 NeedData를 이용하세요 procedure TForm2.QuickRep1NeedData(Sender: TObject; var MoreData...
-
박상용•2002.02.27 20:07제가 NeedData를 잘몰라서 그러는데 간단한 예제를 들어주시면 안될까요? 아직 델파이에는 문외한이라서...
-
gudwhrla•2002.02.27 20:34var <QuickRep의 DetailBand1의 QRLabel1에 1부터 10 까지 찍는예제> 아래예제를 응용...
-
- 초보
- •
- 2002.02.27 17:46
- 1 COMMENTS
- /
- 0 LIKES
-
gudwhrla•2002.02.27 21:28//더 좋은 방법이 있겠지만 편법으로 처리해봤습니다. var Form1: TForm1; &n...
-
- husky_kim
- 2002.02.27 08:20
- 0 COMMENTS
- /
- 0 LIKES
-
- 명지니
- •
- 2002.02.27 06:54
- 1 COMMENTS
- /
- 0 LIKES
-
사이비•2002.02.27 15:05예전의 퀵리포터라문 퀵리포터 버젼업하덩가 패치하덩가여..
-
- hwan
- •
- 2002.02.27 05:49
- 1 COMMENTS
- /
- 0 LIKES
-
데빠이•2002.02.27 10:57db.KeepConnection := True; 를 써보심이...이게 없네요... 그럼, 즐코딩하세여~~~
-
- 이상현
- •
- 2002.02.27 04:09
- 1 COMMENTS
- /
- 0 LIKES
-
사이비•2002.02.27 15:03혹시 델버젼이랑 콤포버젼이랑 체크 해봐또요?
-
- 권봉진
- •
- 2002.02.27 04:04
- 1 COMMENTS
- /
- 0 LIKES
-
teamx•2002.03.08 05:51소켓 10049 에러는 문서에... The remote address is not a valid address (such as ADDR_ANY). 라고...
-
- 이진기
- •
- 2002.02.27 03:55
- 2 COMMENTS
- /
- 0 LIKES
-
장태원•2002.02.27 04:19? 무슨말씀인지...ㅡㅡ; + 키 누르면 append입니다...
-
미소나눔•2002.02.27 04:34DB 네비게이트에 OnClick 이벤트 알래와 같이 간단히 코딩하면 됩니다. 참고로 네비게이션의 + 은 i...
-
- 안대승
- 2002.02.27 03:23
- 0 COMMENTS
- /
- 0 LIKES
-
- C#MAN
- •
- 2002.02.27 02:47
- 3 COMMENTS
- /
- 0 LIKES
-
장태원•2002.02.27 04:16var TV1,TV2: TTreeview; procedure TVclick(sender : TObject); begin TV2.Items.Item[ ...
-
C#MAN•2002.02.27 17:27답변 감사합니다만 Invaild index 라는 오류 발생하는데요? 다시 한번 봐주시면 감사.. ㅠ.ㅠ; ...
-
gudwhrla•2002.02.27 19:19procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode); begin TreeView2.I...
-
- 김대성
- •
- 2002.02.27 02:38
- 2 COMMENTS
- /
- 0 LIKES
-
이성찬•2002.02.27 03:27function xi(data:string):integer; // string 을 integer로 변환후 변환값 리턴 begin res...
-
미소나눔•2002.02.27 03:23function xi(data:string):integer; function xs(data:integer):string; implementation function x...
-
- 박준영
- •
- 2002.02.27 02:25
- 1 COMMENTS
- /
- 0 LIKES
안녕 하세요... 제가 이미지를 불러 오려고 열심히 노력해 봤는데... 이상하게 bmp 는 불러 오는데 jpg 는 못 불러 오더라구요...ㅠ.ㅠ jpg가 용량이 적게 먹여서 사용하려고 했는데... 음.. 방법이 없을까요.. 제가 쓴 소스 입니다... 이...-
데빠이•2002.02.27 11:14이렇게 해보심 어떠하실런지... 추가 설명을 드린다면 FileExists(filename) 는 화일이 없으면 false 값을...
-
- 쨩
- •
- 2002.02.27 02:24
- 1 COMMENTS
- /
- 0 LIKES
-
박상윤•2002.02.27 18:48twain 드라이버 사용하시고 계신가요.. 사용하고 계시다면..이를 이용 가져오시면 됩니다. TJPEGOimage ,...
-
- 김관수
- •
- 2002.02.27 02:12
- 1 COMMENTS
- /
- 0 LIKES
-
이성찬•2002.02.27 02:49파일서버에 소스를 올려놓고 공유하면서 프로젝트를 하고 계신거 같네요. 저같은 경우, 예전에 TeamSource...
-
- 김진석
- 2002.02.27 01:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 차성섭
- •
- 2002.02.27 01:57
- 1 COMMENTS
- /
- 0 LIKES
-
이성찬•2002.02.27 02:44아마도 프로젝트 경로를 전체 복사하셔서 편집하시는거 같은데 맞나요? 그렇다면 각 폼들의 경로가 예전 ...
-
- 배경
- •
- 2002.02.27 01:53
- 1 COMMENTS
- /
- 0 LIKES
-
이성찬•2002.02.27 02:4115라인 case 문에서 'else case when ~ then" 부분을 'when ~ then' 으로 바꾸시고 else 는 끝에 하나...
-
- 신용탁
- •
- 2002.02.27 01:24
- 2 COMMENTS
- /
- 0 LIKES
-
gudwhrla•2002.02.27 02:48uses registry; 추가 참고> if Reg.ValueExists('문자열값이름') then //문자열존재여부...
-
장지용•2002.02.27 02:29Reg : TRegistry; // 선언 Reg := TRegistry.Create; // 생성 Reg.RootKey := HKEY_LOCAL_MACHINE;...
-
- 외로운초보
- •
- 2002.02.27 00:54
- 1 COMMENTS
- /
- 0 LIKES
-
김영석•2002.02.28 08:04에러 메세지만으로는 서버에 접속할수 없는 에러인데요.. 먼저 서버랑 접속하는 Client network utility...
추가 설명을 드린다면 FileExists(filename) 는 화일이 없으면 false 값을 돌려준답니다...
if FileExists(fImagePath5 + edtF01.Text + '.jpg') then
Image1.Picture.LoadFromFile(fImagePath5 + edtF01.Text + '.jpg')
else
Showmessage('화일이 없어요!!!');
그럼, 즐코딩 하세여~~~