SoloCodigo

Saludos:

Tengo un metafile en el portapaples y lo estoy tratando de mostrar en un control TImage a traves de la instrucción:

image1.Picture.Metafile.LoadFromClipboardFormat(Aformat,Adata,Apalette);

Según la documentación, esto debería ser suficiente para cargar el gráfico, pero se origina una excepción con el mensaje "Unsupported clipboard format"

El metafile está allí y es correcto (puede cargarse con Word, p. ejemplo) si se verifica el contenido del clipboard con Delphi se encuentran los formatos cf_metafilepict y cf_enhmetafile presentes.

Conseguí una referencia a este problema en la web pero era un foro en un idioma ininteligible para mí (¿turco?)

Agradezco cualquier ayuda que puedan ofrecerme.

Gracias de antemano.

Agradezco tu respuesta pero no veo como utilizar el enfoque de recuperar metaarchivos de bases de datos para resolver mi problema.... Estoy tratando de cargar el metaarchivo presentes en el portapapeles.

Saludos

Pero espera el problema es especificamente en el portapapeles????

Lo anterior lo encontre en la web y fue publicado por otro forista.

con esto puedes adaptarlo a tu problema y solucionarlo. Chausss

Gracias Bartolomeo, este código si permitió cargar el metafile desde el portapapeles y visualizarlo en unTImage


If clipboard.HasFormat(CF_METAFILEPICT) then begin

      Metafile:=TMetaFile.create;
      MetaFile.Assign(clipboard);

      image1.Picture.Metafile := Metafile;

      MetaFile.Free;

 end;