Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.063 Beiträge
 
Delphi 10 Seattle Enterprise
 
#2

AW: Fastreport eine Textdatei laden

  Alt 4. Mär 2014, 19:58
Sorry, habe die Lösung gefunden.

Den Text einfach vorher in ein TStringList laden dann gehts.

Delphi-Quellcode:
{--------------------------------------------------------------------}
{}procedure TfrmReport.SetTextFileInMemoView(ObjectName,Datei:String);
{--------------------------------------------------------------------}
var st:TStringList;
begin
  with TfrxMemoView(frxreport1.findobject( ObjectName )) do
  begin
    if FileExists(Datei) then
    begin
      Visible := true;
      st:=TStringList.Create;
      st.LoadFromFile(Datei);
      Memo.clear;
      Memo.Assign(st);
      st.Free;
    end;{if}
  end;{with}
end;{SetTextFileInMemoView}
Gruß Kostas
  Mit Zitat antworten Zitat