Memo.CaretPos Limit Erweitern

[ter]

Frage:
Mein Memo zeigt die richtige CaretPos.X nur bis zu einer Spalte von 1024 richtig an.
Dann erzwingt das Memo (mit WordWrap:=False einen Zeilenumbruch.
Ab dann gibt die CaretPos.X und .Y nur noch falsche Werte an. Was dazu fuehrt, wenn weitere sehr lange Zeilen (laenger als 1024 Zeichen) folgen sogar negative Werte fuer CaretPos.Y wie e.g. -65.305.

Wie kann ich den erzwungenen Zeilenbruch des Memo verhindern ?
Leider lade ich Texte mit Zeilenlaengen bis 4096 Zeichen ueber Memo1.LoadFromFile() ins Memo.
Soll ich die Datei lieber zeilenweise lesen und laengere Zeilen (> 1024) selbst umbrechen ?

Gruss Terence.

[Delphi.Narium]

SynEdit kommt bei mir bis 65536 Zeichen pro Zeile zurecht.

CaretPos.X wird bis zu dieser Zeilenlänge korrekt dargestellt.

[ter]

Zitat von Delphi.Narium:

SynEdit kommt bei mir bis 65536 Zeichen pro Zeile zurecht.

CaretPos.X wird bis zu dieser Zeilenlänge korrekt dargestellt.

Wow! Das muss zwar nicht sein, schadet aber bestimmt nichts.
Zu dem Thema Fremdcomponenten moechte ich aber mir die Freiheit erlauben, meine bescheidene Meinung aeussern zu duerfen. Und ich sag es gleich erstmal vorneweg, damit sich keiner an den Fuessen gestossen fuehlt.

Alle componenten, die zu Delphi dazu gehoeren, sind seit vielen vielen Jahren dabei und staendig im Test auf ihre richtige Function. Als ich 1993 mit Delphi 1.0 anfing war es noch sehr wenig, aber ich bin der Meinung, wenn man mit einer Mutter componenten nicht klarkommt, hat es keinen Sinn, sich anstattdessen mit 3rd party componenten zu beschaeftigen. Inwieweit die wirklich alle auch functionieren oder ihre Macken haben, bleibt meist im Dunkeln. Auch ihre Weiterentwicklung unter neuen operating systems ist nicht garantiert. Wie auch, es handelt sich meist nur um einen Specialisten, der die geschaffen hat. Das dazu.

Nun zu meiner vorlaeufigen Bewaeltigung des Problems:

Mit der Verwendung von Memo1.LoadFromFile() wird zwar die komplette Textdatei (> 64kB) geladen, aber der ermittelte Positionswert in Memo1.CaretPos.X bzw. .Y wird dann falsch, wenn die Gesamtlaenge des geladenen Textes groesser als 64kB wird und der Cursor diesen Wert ueberschreitet.

Ich habe jetzt die Moeglichkeiten,
a) diese Grenze zu akzeptieren und auf einen richtigen CaretPos-Wert zu verzichten oder
b) die Grenze im Memo zu begrenzen mit Memo1.MaxLength:=65535; Was dumm erscheint, denn viele meiner Textdateien sind weitaus groesser als 64kB oder
c) eine ListBox zu verwenden, was wieder den Nachteil hat, dass ich den Text nicht richtig bearbeiten kann, wie man das in einer Memo kann. Oder
d) eine PaintBox verwenden, um die Zeichen ueber ein Canvas auszugeben. Da wird es mit dem Bearbeiten des Textes noch uebler als in einer ListBox. Oder
e) immer nur bis zu 64kB am Stueck ins Memo laden und beim Scrollen nachzuladen. Ich habe dann so viele Pages wie 64kB in die Textdatei passen. Das wuerde ein Durchsuchen nach bestimmten Textvorkommen und dessen Bearbeitung mich nicht ueberfordern und waere machbar.

Nur so nebenbei: WordWrap zu aendern machte auch keinen Unterschied, weil es sich meist um Zahlenkolonen handelt, die keinen space character enthalten.
Werde mich mal mit SelStart beschaeftigen und auch dazu einiges auf delphipraxis gefunden.
Das war es erst einmal von meiner Seite.
Im Anhang die Moeglichkeit ueber Umgehung von LoadFromFile() eine Textdatei in ein Memo zu laden.
( Anbei die Function Load_TextFile_Into_Memo.zip )

Viele Gruesse
Terence

[Delphi.Narium]

Laut Profil nutzt Du Delphi 6.

Damals gab's noch so 'ne 64 KB-Grenze. Ob die bei aktuellen Versionen von Delphi auch noch existiert?

In Delphi 7 kann ich das Problem jedoch nachvollziehen.

Apropos: Fremdkomponenten

Ohne die würd' ich Delphi in die Tonne kloppen.

Es ist ja gerade das Schöne an Delphi, dass man soviel selbst machen kann. Vorhandene Komponenten erweitern, fremde hinzufügen, eigene erstellen ...

Die mit Delphi gelieferten Komponenten sind (im Ursprung) eigentlich nur dazu da gewesen, um nicht alles selbst machen zu müssen und nicht: Das ist das Nonplusultra. Weiterentwicklung sinn- und zwecklos.

Nutze diverse Fremdkomponenten schon seit vielen (ca. 24) Jahren und die gibt es immernoch und sie werden immernoch weiterentwickelt.

Müsste ich mich bei allen Editoren und ähnlichem mit TMemo zufriedengeben, statt die SynEdits zu nutzen, wäre mancheins meiner Programme mehr als nur spartanisch.

Und wofür gibt es wohl all die Fremdkomponentenhersteller, die sogar Support für ihre Komponenten bieten ...?

Die Leben davon, obwohl sie eigentlich vollkommen überflüssig sind?

Abgesehen von der Unmenge frei verfügbarere Komponenten, die man auch nach eigenem Gutdünken weiterentwickeln kann ...

Nehmen wir mal https://torry.net/, alles was es dort gibt ist überflüssig?
Oder alles das, was man so auf https://github.com/ findet? Auch überflüssig?

Aber egal, jeder wie er will

[ter]

Zitat von Delphi.Narium:

Laut Profil nutzt Du Delphi 6.

Damals gab's noch so 'ne 64 KB-Grenze. Ob die bei aktuellen Versionen von Delphi auch noch existiert?

In Delphi 7 kann ich das Problem jedoch nachvollziehen.

Apropos: Fremdkomponenten

Ohne die würd' ich Delphi in die Tonne kloppen.
...
Aber egal, jeder wie er will

Da hast Du voellig recht. Das sollte jeder selbst entscheiden.

Uebrigens habe ich das Problem mit der CaretPos jetzt
geloest. Mit nur 3 Zeilen im Quellcode. (siehe Anhang)

Wenn ich beim kleinsten Problem es sofort mit Fremdcomponenten versuchen wuerde ...

Viele Gruesse
Terence