dn := FileCreate(DestName);
for i := 0 to (288*384) - 1 do
FileWrite(dn, pchar(DestBuffer)[i], Sizeof(pchar(DestBuffer)[i]));
FileClose(dn);
이와 같이 DestBuffer에 있는 내용을 for문을 써 강제적으로 destname파일을 만들어 줍니다.
잘 만들어지긴 하는데 속도가 너무 느리네요...
아무래도 하드디스크 액세스하는 시간이 오래 걸리는것 같은데요...ㅡㅡ^
메모리에 있는 내용은 288*384 사이즈의 raw이미지입니다.
현재 메모리에는 이미지가 있으니까.
메모리에서 바로 불러 올수 있는 방법이 있을거 같은데요..
고수님들의 조언부탁드립니다.
i,j:Integer;
bmp:Tbitmap;
SRC:PBYTE;
bmp:=TBImap.Create;
bmp.width:=288;
bmp.height:=384;
bmp.pixelformat:=pf8bit;
for j:=0 to 384-1 do //세로
begin
SRC:=bmp.scanline[j];
for i:=0 to 288-1 do //가로
begin
SRC:=Buffer
inc(SRC);
inc(Buffer);
end;
end;
image1.Picture.bitmap.assign(bmp);
image1.Refresh;
bmp.Free;
이정도면 될것 같군요