XProfan

Italia

KHR

Ciao,

.
nachdem ich es jetzt ja geschafft habe, das selbst reinzubauen, kann man das auch viellicht als Standard per spätere versionen übernehmen.

Da die Funktion in der Scintilla.DLL schon enthalten ist, ist der Aufwand je eher sehr gering.

Wäre nett.

.

Gruß
Karl-Heinz
WIN XP home/Pro / XPROFAN 11 / P2CPP
ATMEL + BASCOM Fan

22.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

RGH

Karl-heinz Rattay

Hallo Karl-Heinz,
Danke per den Vorschlag.
Ich habe Strg-K zum Löschen der Zeile eingebaut.

Saluto
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

22.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

KHR

Hallo Roland

.
danke

Nimmst Du die Tastenkombi auch die Doku auf?

dann auch bitte STRG-D (Zeile duplizieren) mit aufnehmen, denn das steht bis jetzt noch nicht drin.

Habs per Zufall herausgefunden

.

Gruß
Karl-Heinz
WIN XP home/Pro / XPROFAN 11 / P2CPP
ATMEL + BASCOM Fan

22.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

RGH

Karl-heinz Rattay

Hallo Roland
Nimmst Du die Tastenkombi auch die Doku auf?
dann auch bitte STRG-D (Zeile duplizieren) mit aufnehmen, denn das steht bis jetzt noch nicht drin.
.

Ja, habe ich auch schon eingebaut. Das Strg-D hatte ich schlichtweg vergessen. Sorry.

Saluto
Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

22.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

KHR

Hallo Roland,

.
ich habs geschafft. Einen meiner Wünsche konnte ich mir erfüllen. Ist ein hartes Stück Brot, wenn man da in Dingen rumwühlen muß, von denen man eigentlich keine Ahnung hat.

Das Align funktioniert. Ich habs mir auf ALT-A gelegt
Die Zeile in der der Cursor steht, wird nun auf die Einrückweite der Zeile drüber angepaßt und alles gleich richtig weitergescrollt

Ist ne feine Sache, wenn man seine Quellcodes schön formatiert haben möchte.

Ok - da sind noch ein paar Dinge übrig dran, die mir nicht gefallen.

Zum einen hab ich es nicht geschafft, den Cursor wieder in die Spalte zurückzubringen, in der er war

und zum anderen muß man alle Leerzeilen mitformatieren. Ich habs nicht geschafft, die letzte nicht-leere Zeile oberhalb der Cursorposition sicher zu finden. Genauso habs ichs nicht geschafft, beim weiterscrollen gleich auf die nächste nicht-leere Zeile weiterzuspringen. Da muß dann halt mal ein Spezialist ran, wenn es gewünscht wird. Mir sufficiente es aber erst mla so.

so hab ichs gemacht:

in der XProfEd11c.prf diese beiden Fragmente:

Kompilieren Markieren Separieren

AppendMenu 323, Einrücken angleichen 	Alt-A
AddHotKey  323,65,4   ALT-A

Kompilieren Markieren Separieren

elseif @menuitem(323)  Einrücken angleichen an Zeile darüber

Edit#[AktTab%].LineAlign()

und in der XPrfEditClass.prf diese beiden Fragmente:

Kompilieren Markieren Separieren

 $H XPrfEdit.ph
Class XSciProf =  -dll&,
-Id&,
-SciMessage&,
-SciLoadText&,
+Handle&,
+Exit@,
+XSciProf@,
+SetColors@,
+SetFont@,
+SetTab@,
+Destroy@,
+Show@,
+Hide@,
+Enable@,
+Disable@,
+SciMessage@,
+Load@,
+Save@,
+SetSavePoint@,
+getLineCount@,
+gotoLine@,
+getFirstSelLine@,
+getLastSelLine@,
+getLine@,
+getLine$@,
+getColumn@,
+ClearAll@,
+Cut@,
+Copy@,
+Paste@,
+Clear@,
+CanPaste@,
+Undo@,
+CanUndo@,
+Redo@,
+CanRedo@,
+Changed@,
+SelectAll@,
+Search@,
+SearchNext@,
+Replace@,
+GetWord@,
+SetReadOnly@,
+SetWrapMode@,
+SetLineNumbers@,
+Linedelete@,
+LineAlign@

Kompilieren Markieren Separieren

Proc XSciProf.LineAlign

    Declare xPos&,line&
    line& =.getLine()
    xpos& = .SciMessage(~SCI_GETLINEINDENTATION ,  line&-2)
    .GotoLine(line&)
    .SciMessage(~SCI_LINESCROLL , 0 , 1)
    Return .SciMessage(~SCI_SETLINEINDENTATION , line&-1, pos&)

EndProc