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

datasnap을 사용하여

 1. server

    . ms-sql 테이블에 binary 필드를 가진 테이블 정의

    . client 요청 시, binary 필드 검색하여 리턴

 2. desktop 기반의 client

    . server에 db 데이터 요청

    . ui에 binary 데이터 표시(이미지)

 3. android 기반의 client

    . 기능은 2번과 동일

를 샘플로 작성했습니다.


1번과 2번 간에는 binary 데이터를 stream 형식으로 잘 받아서 UI에 이미지를 보여줍니다.

1번과 3번 간에는 binary 데이터를 stream 형식으로 잘 받는 것으로 보이는데,

  - UI에 이미지를 보여주는 과정에서 에러가 발생합니다.

    . 에러가 발생하는 구간의 callstack은 첨부파일과 같습니다.

    . 에러 메시지: "Range check error."


참고로 UI에서 보여주는 binary 데이터에 대한 처리 코드는 아래와 같습니다.

동일한 방식을 desktop 기반에 적용하면 잘 동작합니다. 

procedure TForm3.StringGrid1Click(Sender: TObject);

var

    ResultStream: TStream;

    ServiceProxy: TServerMethods1Client;

    bitmap : TFixedBitmapItem;

    buffer : TBytes;

    Item : TBitmapOfItem;

    MemStream: TMemoryStream;

begin

    //Edit1.Text: = IntToStr (ClientDataSet1.FieldByName ('film_id'). AsInteger);

    ServiceProxy := TServerMethods1Client.Create (SQLConnection1.DBXConnection);

    try

        ResultStream := ServiceProxy.GetPictureById(1);

        if ResultStream <> nil then

        begin

            MemStream := TMemoryStream.Create;

            MemStream.CopyFrom( ResultStream, ResultStream.Size ); ==> 에러 생기는 코드

            Item := TBitmapOfItem.CreateFromStream( MemStream );

            Image1.MultiResBitmap.Bitmaps[0] := Item;

        end;

    finally

        ServiceProxy.Free;

    end;

end;

뭐가 문제일까요?

모바일 기반의 Firemonkey에서만 문제가 생기네요.


번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17308
공지 유용한 관련 사이트 관리자2 2014.03.20 56188
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99617
339 ListView 질문드립니다. [2] file 육식육식 2020.04.08 862
338 열거형 이름 가져오기 [1] woofer 2020.04.08 344
337 delphi7 win10(64Bit) const 선언값 초기화 오류 둔촌동개발자 2020.04.08 191
336 SOAP/WSDL 질문드립니다. file 마이다스준 2020.04.09 275
335 라디오 버튼값을 유지 할 수 있는 방법. 빅토스 2020.04.09 254
334 RAD 서버 파일 업로드/ 다운로드 관련 [1] arabianwine 2020.04.10 227
333 (공유) 웹페이지에서 실행파일(*.exe) 다운로드 시 경고가 발생합니다. 험프리 2020.04.10 1584
332 VCL어플리케이션 개발 중 GridPanel 질문드립니다! [2] file 육식육식 2020.04.10 523
331 [질문]win7 에서 win10업그레이드 화면 딜레이현상 [1] 지호 2020.04.16 320
330 DBGrid에 CheckBox넣는 방법좀 공유부탁드립니다. [1] 볏짚 2020.04.16 258
329 IDETheme.ActnCtrls 에러 [1] file Riley 2020.04.17 126
328 TRichEditClipboardRibbonToolBar 추가시 Delphi 자동 종료 [1] Riley 2020.04.17 114
327 RAD Server에서 TFDConnection 트랜잭션 미작동 질문 [4] clogic 2020.04.20 206
326 설치 관련 문의.... [4] 삼이 2020.04.21 359
325 1대 서버에 RAD 서버 패키지 2개 구동하려고 합니다. 가능한 시스템 구성인가요? file 파다닥 2020.04.21 127
324 안드로이드 모바일과 PC USB로 통신 [1] 권동한 2020.04.22 497
323 델파이로 개발된 GUI프로그램 관련 질문이 있습니다.. [1] 재춘이 2020.04.23 265
322 [FireDAC][Phys][Ora]Ora-12154:TNS:지정된 접속 식별자를 분석할 수 없음. [1] sch.delphi 2020.04.27 1659
321 Master / Detail 관계에서 DisableControls 사용시 문제 가나다 2020.04.27 188
320 Datasnap 서버 세션 관리 [1] 맛재현 2020.04.27 251