Asignar el contenido de un datafield de tipo tbitmap a un objeto gráfico Tpath

[david.camaleon]

Mucha gracias por tu respuesta:

No se trata de pasar un Tpah a un bitmap, si no de lo contrario.

Pero te agradezco muchísimo tu interés y la respuesta, que es perfecta para pasar un tpah a un bitmap y guardarlo en un campo de un DataSet.

De hecho estuve buscando esta solución durante algunas horas. si en vez de eso hubiera puesto la consulta aquí en el foro, me habría ahorrado mucho tiempo con tu respuesta.

Empezado por duilioisola

En principio es la inversa de que lo que te han contestado para cargar.

Código Delphi [-]
  img := Tbitmap.Create(Trunc(Firma.Width), Trunc(Firma.Height));
  try
    img.Canvas.BeginScene;
    try
      firma.PaintTo(img.Canvas, firma.LocalRect);
    finally
      img.Canvas.EndScene;
    end;
    m := TmemoryStream.Create;
    try
      Dataset.close;     
      Dataset.open;     
      Dataset.CampoFIRMA.SavetoStream(m);
      img.LoadFromStream(m);
    finally
      FreeAndNil(m);
    end;
  finally
    FreeAndNil(img);
  end;