Simple: Convert Text to Instream

(0) Share

Report

Posted on by Telcrome

Is there a simple and nice way to convert a Text variable to an Instream?

I just want to enable the user to download a file, whose content I already store using a Text var.

My dirty way works as following, but the Record TempBlob is marked for removal:

var
    fileName: Text;
    fileContent: Text;
    istream: InStream;
    oStream: OutStream;
    tempBlob: Record TempBlob temporary;
begin
    // Here some code to fill fileContent and fileName
    tempBlob.WriteAsText(fileContent, TextEncoding::UTF8);
    tempBlob.Blob.CreateInStream(istream, TextEncoding::UTF8);
    DownloadFromStream(istream, 'Export', '', 'All Files (*.*)|*.*', file_name);
end;

All responses (2)

Answers (1)

Verified answer

Binesh 7,885 on at

Like (1)

Report
RE: Simple: Convert Text to Instream

Hello,

Go for Mohana Yadav suggestions you will get some idea.

Or else by little bit changes on your code will work as shown below.

procedure DownloadTextToStream() var fileName: Text; fileContent: Text; istream: InStream; oStream: OutStream; tempBlob: Codeunit "Temp Blob"; begin // Here some code to fill fileContent and fileName Clear(tempBlob); tempBlob.CreateOutStream(oStream, TEXTENCODING::UTF8); oStream.WriteText(fileContent); tempBlob.CreateInStream(istream); DownloadFromStream(istream, 'Export', '', 'All Files (*.*)|*.*', fileName); end;
Suggested answer

Mohana Yadav 59,139 Super User 2024 Season 2 on at

Like (1)

Report

RE: Simple: Convert Text to Instream

Please try function FromBase64 in codeunit 4110 "Base64 Convert"