delphi - delphi mongo-delphi-driver.GridFS.pas を使用して MongoDB からファイルをダウンロードするにはどうすればよいですか?

Question

MongoDB と Delphi を試しています ( mongo-delphi-driver )

一番下のコードを使用してファイルをアップロードすることはできましたが、MongoDB からファイル システムにファイルをダウンロードするのに苦労しています。

誰かが私に表示できるコード スニペットを既に持っていますか?

よろしくお願いします

uses
  ...
  MongoDB, MongoBson, GridFS;

...

procedure UploadFile();
const
  LOCAL_FILE_NAME = 'C:\local_file_name'; 
  REMOTE_FILE_NAME = 'remote_file_name';
var
  GridFSStoreFileSuccess: Boolean;
  myGridFS: TGridFS;
begin
  myGridFS := TGridFS.Create(mongo, db);
  try
    GridFSStoreFileSuccess := myGridFS.storeFile(LOCAL_FILE_NAME, REMOTE_FILE_NAME);
    if GridFSStoreFileSuccess then
      ShowMessage('File upload was successful!')
    else
      ShowMessage('File upload was *NOT* successful!');
  finally
    myGridFS.Free;
  end;
end;