Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: Bild aus RTF-Text extrahieren

   
    by jziersch, 31. Jul 2020
  Nachdem ich nur die Anzeige in WPTools sowie diverse Wordprozessor Programme kenne, weis ich nicht wie wie das eigentlich aussehen soll. Soll es skaliert sein, oder das kleine logo oben links oder ... ?
  
  Den code zu abspeichern einer validen WMF incl. Header hab ich bereits oben gepostet. WPTools ergänzt ja den header.
• Forum: Sonstige Fragen zu Delphi

  AW: Bild aus RTF-Text extrahieren

   
    by jziersch, 30. Jul 2020
  Dem wmetafile8 typ in RTF fehlt der metafile header. Es wird daher mit SetWinMetaFileBits geladen.
  
  Von WPTools (das Dir ja vorliegt) wird er als typ wpreadPictWMetafile geladen.
  
  Das passiert dann in TWPOCustomImage.LoadMetafileStream
  
  Ändere einfach mal den code
  
  if WMetafileType = 8 then
  lpmfp.mm := 8
• Forum: Sonstige Fragen zu Delphi

  AW: Bild aus RTF-Text extrahieren

   
    by jziersch, 30. Jul 2020
  Hallo Stefan,
  
  ich habe Deine Testdaten mittels folgendem code (und WPTools) extrahiert
  
  procedure TForm6.ExtractButtonClick(Sender: TObject);
  var wp : TWPCustomRTFEdit; // uses WPCtrMemo - WPTools
  i : Integer;
  begin
  wp := TWPCustomRTFEdit.CreateDynamic;
  try