Array base64 codieren

[Klaus01]

Hallo,

ein Array in ein Stream zu kopieren sollte
sich mit TMemoryStream.WriteBuffer bewerkstelligen lassen.

Zitat von DelphiHilfe:

procedure WriteBuffer(const Buffer; Count: Longint);

Description

Use WriteBuffer to save data to a stream. WriteBuffer and ReadBuffer are used in cases where the number of bytes is known and required, for example when reading in structures. Use WriteBuffer for standard file I/O streaming.

WriteBuffer is used internally for writing to a stream and copying from a stream. It is used by other objects, such as strings and lists, for writing strings stored in a buffer.

WriteBuffer calls Write to handle the actual writing. If the stream fails to write all the requested bytes, an EWriteError exception is raised.

MemStream.WriteBuffer(Array[0],High(Array)) Grüße
Klaus