10-16-2019, 01:37 PM
Hi,
Intraweb XIV iwfileuploader demo has the next code.
It seems 'GetUploadedFileMimeType' is contained inm IWFileCheck.pas not present in the folder.
What is the equivalent to 'GetUploadedFileMimeType' in IW 15?
Regards, Luiz
Intraweb XIV iwfileuploader demo has the next code.
It seems 'GetUploadedFileMimeType' is contained inm IWFileCheck.pas not present in the folder.
What is the equivalent to 'GetUploadedFileMimeType' in IW 15?
Regards, Luiz
Code:
procedure TIWForm7.IWFileUploader5AsyncUploadCompleted(Sender: TObject;
var DestPath, FileName: string; var SaveFile, Overwrite: Boolean);
var
CurDir: string;
MimeType: string;
begin
// get the app path
CurDir := TIWAppInfo.GetAppPath;
MimeType := GetUploadedFileMimeType;
// save in the same application directory, with the same name of the original file. Overwrite if it already exists.
IWFileUploader5.SaveToFile(FileName, CurDir + FileName, True);
// Inform IWFileUploader that we are taking care of file saving ourselves
SaveFile := False;
end;