Permalink
Browse files

A couple more Utf8 changes

  • Loading branch information...
1 parent 81419d1 commit fbf5c71be4e38dd8febcf56748b3f3d48ecb2c2b @gerald-lindsly committed Jan 4, 2013
Showing with 3 additions and 3 deletions.
  1. +3 −3 GridFS.pas
View
6 GridFS.pas
@@ -340,7 +340,7 @@ implementation
function TGridFS.find(remoteName : string) : TGridfile;
begin
- Result := find(BSON(['filename', remoteName]));
+ Result := find(BSON(['filename', System.UTF8Encode(remoteName)]));
end;
constructor TGridfile.Create(gridfs : TGridFS);
@@ -360,7 +360,7 @@ implementation
function TGridfile.getFilename() : string;
begin
- Result := string(gridfile_get_filename(handle));
+ Result := string(System.UTF8ToWideString(gridfile_get_filename(handle)));
end;
function TGridfile.getChunkSize() : Integer;
@@ -375,7 +375,7 @@ implementation
function TGridfile.getContentType() : string;
begin
- Result := string(gridfile_get_contenttype(handle));
+ Result := string(System.UTF8ToWideString(gridfile_get_contenttype(handle)));
end;
function TGridfile.getUploadDate() : TDateTime;

0 comments on commit fbf5c71

Please sign in to comment.