Muchas gracias por el aporte amigos.
Les dejo una forma que llegué con NetEncoding, la cual me resultó bastante facil(por decir porq me costo además que nunca había hecho esto).
También aparece en el código el envío al servidor Node, el cual guarda en la base de datos Mysql en un campo Longblob.
Hasta ahí me funcionó impecable, para decodificar la imagen nuevamente también lo hice con netencoding.
En la decodificación lo que me está faltando es procesar la consulta que hago al servidor, la cual el servidor devuelve la consulta en formato json y el campo de la imagen en formato buffer, como hago para convertir el buffer a base64, estoy viendo para que el servidor lo devuelva, sino lo tengo que procesar en Delphi.
Código Delphi
[-]
procedure TForm1.Button4Click(Sender: TObject);
var
SS: TStringStream;
V, resultado: string;
enco : TNetEncoding;
lparamlist: TStringList;
cadena, res: string;
obj : tjsonobject;
begin
enco := TNetEncoding.Create;
SS := TStringStream.Create('');
image1.Bitmap.LoadFromFile('c:\img\imgextintor\2.jpg');
Image1.Bitmap.SaveToStream(SS);
V := SS.DataString;
resultado := enco.Base64.Encode(V);
memo1.lines.add(resultado);
memo1.Lines.SaveToFile('c:\memo.txt');
lparamlist := TStringList.Create;
lparamlist.Add('idImg=5');
lparamlist.Add('imagen=' + resultado);
res := http.Post('http://localhost:3000/subiFoto', lparamlist);
showmessage(res);
lparamlist.Free;
end;
------------------------------------
decodifico
Código Delphi
[-]
V := enco.Base64.Decode(resultado);
SS := TStringStream.Create(V);
Image2.Bitmap.LoadFromStream(SS);