Einzelnen Beitrag anzeigen

Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.581 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: IBO 5 kein Eurozeichen in TIB_Memo

  Alt 7. Mär 2022, 14:35
Das Problem ist, dass es zwei Wege gibt, einen für einen String aus einem TIB_Edit und einen für eine Stringliste aus einem TIB_Memo.
Der Weg über den String funktioniert, weil das Encoding mit einer eigenen Funktion gemacht wird.
Die Stringliste wiederum wird über TEncoding und SaveToStream gespeichert.

Das lässt sich denke ich recht einfach fixen, indem man die Funktion TIB_ColumnMemo.LoadFromStrings leert und durch die Speicherung als String ersetzt:
Delphi-Quellcode:
procedure TIB_ColumnMemo.LoadFromStrings( const aStrings: TStrings );
begin
  SetAsString(aStrings.Text);
end;
Da es sich um eine virtuelle Methode handelt, kann man die natürlich auch gut zur Laufzeit patchen.
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
  Mit Zitat antworten Zitat