오라클과 델파이를 연동해서 클라이언트용 애플리케이션을 만들고 있는중입니다.
그런데 오라클의 데이터 타입 long으로 정의된 필드에 아이콘파일을 넣고자 합니다.
델파이에서 blob파일을 다루는 방법을 구체적으로 알고 싶습니다.
Blob파일을 오라클에 밀어 넣는 방법은 알겠는데
Blob파일을 image 콤포넌트에 띄우지를 못하고 있습니다.
따라서 밀어 넣은게 과연 들어갔는지 안들어갔는지 확인도 안되고..
Table에는 SN 이라는 number type 필드와 Image라는 long type 필드 둘입니다.
이 데이터들을 불러와서 이미지콤포넌트에 띄우고
저장하는 구체적인 방법을 알고 싶습니다.
가능하다면.. 짧은 예제를 부탁드릴께요.
> 오라클과 델파이를 연동해서 클라이언트용 애플리케이션을 만들고 있는중입니다.
> 그런데 오라클의 데이터 타입 long으로 정의된 필드에 아이콘파일을 넣고자 합니다.
> 델파이에서 blob파일을 다루는 방법을 구체적으로 알고 싶습니다.
> Blob파일을 오라클에 밀어 넣는 방법은 알겠는데
> Blob파일을 image 콤포넌트에 띄우지를 못하고 있습니다.
> 따라서 밀어 넣은게 과연 들어갔는지 안들어갔는지 확인도 안되고..
> Table에는 SN 이라는 number type 필드와 Image라는 long type 필드 둘입니다.
> 이 데이터들을 불러와서 이미지콤포넌트에 띄우고
> 저장하는 구체적인 방법을 알고 싶습니다.
> 가능하다면.. 짧은 예제를 부탁드릴께요.
>
음냐...long type이란 long raw type을 말씀하시는 거 같군요...
음....오라클에 밀어 넣는 것은 되었다고 하셨는데...
불러 들이는 것을 모르신다고요...
아래에 얘제를 첨부 하겠습니다...참고하세요....
1. TBlobField로 정의된 경우...
procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Picture.Bitmap.Assign(Table1Bitmap);
end;
2. Fields Property를 이용...
procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Picture.Bitmap.Assign(TBLOBField(Table1.Fields[1]));
end;
3. TBlobField로 정의 되어 있고 TBitmap을 이용...
procedure TForm1.Button2Click(Sender: TObject);
var
B: TBitmap;
begin
B := TBitmap.Create;
try
B.Assign(Table1Bitmap);
Image1.Picture.Bitmap.Assign(B);
finally
B.Free;
end;
end;