Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.077 Beiträge
 
Delphi XE2 Professional
 
#1

RRichEdit LoadFromFile

  Alt 25. Jan 2020, 01:14
Ich habe in einem Formular ein RichEdit.
Wenn ich das Programm starte und mit nachstehender Prozedur eine etwa 1 MB große.rtf Datei lade
1) dauert das unverhältnismäßig lange (etwa 20 s).
2) der Text wird unformatiert angezeigt (Bild1).

Wenn ich dann den Text lösche und noch einmal lade
1) geht das blitzschnell
2) der Text wird korrekt angezeigt (Bild2).
Frage:
Was muss ich tun, damit das auch beim ersten Mal korrekt funktioniert.

Delphi-Quellcode:
procedure TMain.LoadText(Sender: TObject);
begin
   if OpenDialog.Execute then
      reText.Lines.LoadFromFile(OpenDialog.FileName);
end;
Miniaturansicht angehängter Grafiken
bild1.jpg   bild2.jpg  
Angehängte Dateien
Dateityp: zip RichEditMarkText.zip (778,3 KB, 13x aufgerufen)
Dateityp: zip Project1.zip (830,1 KB, 12x aufgerufen)
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....

Geändert von Amateurprofi (25. Jan 2020 um 07:11 Uhr)
  Mit Zitat antworten Zitat