마이다스를 통하여 스트림을 전송하고자 합니다.

그래서 stream형을 variant형으로 변환을 하는 함수를

아래 35872번 글에서 찾았는데.. 이 variant를 다시 stream형으로

변환하는 방법을 모르겠네요.



아래는 stream -> variant 변환 함수입니다.

답변좀 부탁드립니다



function StreamToVariant(Stream: TStream): OleVariant;

var

p: Pointer;

begin

Result := VarArrayCreate([0, Stream.Size - 1], varByte);

p := VarArrayLock(Result);

try

Stream.Position := 0; //start from beginning of stream

Stream.Read(p^, Stream.Size);

finally

VarArrayUnlock(Result);

end;

end;



2번째 질문입니다 --;



혹시 비트맵 파일을 string형으로 변환하는 방법은 없나요.

물론 다시 string형을 비트맵으로 변환하는 방법두요...

이게 가능하다면 variant형으로 변환할 필요도 없어질텐데..



부탁드립니다.