Q&A

  • JPEGerror #50
안녕하세여..



음.. 서버에서 jpeg파일 하나를 전송해주면 그 파일을 받아서 image컴포넌트 써가지구



뿌려주는 프로그램을 만들어보구있는데여.. 자꾸 이런 에러가 뜹니다..



그림은 나오질 않구여.. 데이터를 받아오긴 하는거 같은데여. 음.. 안돼네여..



코딩은 이렇게 해봤습니다...



procedure TMyThread.view;

begin

ImageData := TJPEGImage.Create;





Stream.Seek(0, soFromBeginning);



ImageData.LoadFromStream(Stream);



Form1.Image1.Picture.Assign(ImageData);

Form1.Image1.Refresh;



Stream.Free;

ImageData.Free;

end;



procedure TMyThread.Execute;

begin

Stream := TMemoryStream.Create;

if Form1.IdTCPClient1.Connected then

begin

Form1.IdTCPClient1.ReadStream(Stream, 3072);

Synchronize(view);

end;

end;



음..어디가 어떻게 잘못된건지 헤매구 있어요.. 부탁드립니다. 그럼..이만..

0  COMMENTS