Deutsches Lazarusforum

Ich habe mir (leider ganz unprofessionell) einfach in der Synedit-Unit eine Funktion ergänzt, welche die Information zurückliefert (müsste ich also bei der folgenden Lazarus-Version dort wieder anpassen). Die aber nur funktioniert, wenn man im Synedit zuvor Carety auf iLine setzt, bevor ich die Abfr...

Danke für die Antwort.

ColdFoldcation hatte ich schon gesehen, damit kann man aber nur eine Zeile umschalten. Davon ist CodeFoldAction als "deprecated" markiert

Eine Möglichkeit den Foldstatus abzufragen gibt es aber nicht.

1. Ich möchte gerne in einem Kontext-Menü zum Synedit Befehle einbauen wie "Dokumentationen zuklappen" oder "Regionen zuklappen". Ich kann zwar den Text durchlaufen und entsprechenden Text identifizieren, aber mit welcher Funktion klappe ich nun die gewünschte Zeile (bzw. den Zeilenbereich) auf oder...

OK, hier ist der Report: https://bugs.freepascal.org/view.php?id=37007 Mein Problem konnte ich nun lösen, indem ich alle Controls in der bisherigen (externen) Form in ein extra Panel legte. Wenn ich dann für die Form das TTabsheet als Parent setze, setze ich auch für das Panel das TTabsheet als Pare...

Kann ich gerne machen.

Wo reiche ich das ein?

Zur Info: Wenn ich alternativ keine Form für das SynEdit verwende, sondern ein TFrame, dann funktioniert das Hauptmenü! Allerdings müsste ich dann einiges umstricken (bestimmte Events gibt es ja nicht beim TFrame), wenn es eine einfache andere Lösung gäbe, wäre das nice (z.B. kann ich ja Alt+D, etc,...

OK, danke habe ich gemacht.

Compiliere das Programm. Alt+D funktioniert (Hauptmenü geht auf).

Drücke auf Schalter "Create Synedit". Ein Formular mit Synedit wird erzeugt und in Tabsheet1 eingefügt.

Drücke erneut Alt+D: Funktioniert nicht mehr.

Lazarus selber arbeitet da einwandfrei. Ich habe mal weiter getestet, nur wenn Synedit den Fokus hat, funktioniert es nicht (dann ertönt nur ein beepton). Im SynEdit selber kommt auch Alt+D an, wird aber nicht behandelt, daher der Beepton. M.E. müsste Synedit die &Datei-Shortcuts (die heißen irgendw...

Danke, mit SynEdit.Afterloadfromfile (vor Zuweisung des gesicherten Wertes an Synedit.Foldstate) funktioniert es!
Hatte den Hinweis gestern überlesen.

Ja, die "Shortcuts" sind nur durch das "&Datei" (also das &-Zeichen) definiert. Solange ich noch keine andere Datei geladen habe, funktionieren die auch alle. Wenn ich aber eine neue Form erzeuge (darin liegen die Synedits), und in das Pagecontrol einbinde (die einzelnen Seiten sind dann jeweils Par...

Der gespeicherte Text (für 2 Foldings) sieht so aus:

T5iG0#vH T3@g08m

(ein führendes Leerzeichen, ist das richtig?)

Wenn ich ein leeres Formular habe, funktioneren die Shortcuts, Alt+D, etc. um die Hauptmenüs anzeigen zu lassen.

Sobald ich aber ein in einem Tabcontrol neue andere Formen einbette, funktionieren die genannten Shortcuts nicht mehr.

Woran kann das liegen und wie kann ich das beheben?

Deine Vermutung war richtig, Veryfychecksum liefert false zurück.

So sieht der Code bei mir aus (slExpand.text hat den richtigen Inhalt und die passende Text-Datei wurde zuvor in SynEdit geladen): procedure Tchild_Source.SaveFoldings(FileName: string); begin slExpand.clear; slExpand.text := AdvMemo1.FoldState; slExpand.SaveToFile(FileName); end; procedure Tchild_S...

Ja danke, das hatte ich auch schon per Google-Suche gefunden. Der Thread gibt aber leider keine Antwort auf meine Frage, dieser User hatte wohl das Problem, dass Getfoldstate einen leeren Wert zurücklieferte. Das ist bei mir nicht der Fall. Aber die Zuweisung des gespeicherten Foldstates hat halt ke...