下面是简化的代码,KZUpload是dll中函数,他会传出lpbuffer一个照片指针,fileReturned是大小,
然后我用writefile导出图片
但现在要将图片以90度立起来导出,这个要怎么办呢?谢谢了。 fileReturned := KZUpload(lpBuffer); //dll中的函数KZUpload filePath := 'e:\11.jpg';
hFile := CreateFile(PChar(filePath),
GENERIC_READ or GENERIC_WRITE,
0,
Nil,
CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL ,
0);
if (hFile = INVALID_HANDLE_VALUE) then
begin
MessageBox(GetActiveWindow(),'创建文件失败!',Nil,MB_OK or MB_ICONERROR);
CloseHandle(hFile);
Exit;
end; Res := WriteFile(hFile, lpBuffer^, fileReturned, &FileSaveReturned, nil);
然后我用writefile导出图片
但现在要将图片以90度立起来导出,这个要怎么办呢?谢谢了。 fileReturned := KZUpload(lpBuffer); //dll中的函数KZUpload filePath := 'e:\11.jpg';
hFile := CreateFile(PChar(filePath),
GENERIC_READ or GENERIC_WRITE,
0,
Nil,
CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL ,
0);
if (hFile = INVALID_HANDLE_VALUE) then
begin
MessageBox(GetActiveWindow(),'创建文件失败!',Nil,MB_OK or MB_ICONERROR);
CloseHandle(hFile);
Exit;
end; Res := WriteFile(hFile, lpBuffer^, fileReturned, &FileSaveReturned, nil);
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货