Text in BBedit einfügen... - ...aber als letzte Zeile!

[sideshow]

Morgen Forum,

habe ein kleines Problem, komm aber einfach nicht auf die Lösung:

will einen Text (der sich aus Variablen im Script zusammensetzt) in ein BBedit - Textdokument schreiben. Das funktioniert auch, aber ich will, das wenn schon was in diesem Dokument steht, er den Text als letzte Zeile einfügt.

Vielen Dank im Voraus für eure Hilfe! CU
_________________
Meine Wenigkeit im Internet: http://www.sideshow-systems.de

[Snow]

Hallo sideshow,

das ist ja echt kompliziert geworden, seit der "insert text"-Befehl nicht mehr existiert.

Folgendes Skript tut aber das Erwartete:

set TestText to "Das ist nur ein Test."

tell application "BBEdit 6.0"

set vorhandener_Text to text 1 of window 1
-- wenn schon Text vorhanden ist, wird
-- dem neuen Text eine Zeilenschaltung vorangestellt.
if vorhandener_Text is not "" then
set TestText to return & TestText
end if

tell window 1
set ZeilenZahl to count lines
-- der Cursor wird ans Textende verschoben
select insertion point after line ZeilenZahl
-- der neue Text wird eingesetzt
set selection to TestText
-- damit nichts selektiert ist und der Cursor wieder
-- am Ende des Textes steht:
set ZeilenZahl to count lines
select insertion point after line ZeilenZahl
end tell

end tell
_________________
Peter
-
Fischer-Bayern.de|Shadetreemicro.com

[Snow]

Hier kommt schon die nächste Version:

set TestText to "Das ist nur ein Test."

tell application "BBEdit 6.0"

set vorhandener_Text to text of window 1
-- wenn schon Text vorhanden ist, wird
-- dem neuen Text eine Zeilenschaltung vorangestellt.
if vorhandener_Text is not "" then
set TestText to return & TestText
end if

tell window 1
-- der Cursor wird ans Textende verschoben
select insertion point after last line
-- der neue Text wird eingesetzt
set selection to TestText
-- damit nichts selektiert ist und der Cursor wieder
-- am Ende des Textes steht:
select insertion point after last line
end tell

end tell

Das Zählen der Zeilen ist jetzt also entfallen. Schneller geht es mit "last line".
Man könnte jetzt noch Versuche anstellen, wie es mit "last character" funktioniert, aber ich denke, das dürfte dann langsamer sein.
Vielleicht teste ich das mal an einem großen Text aus.
_________________
Peter
-
Fischer-Bayern.de|Shadetreemicro.com

[sideshow]

Super Snow, Danke dir!!!!

Genau das hab ich gebraucht. Funzt super!!!!

CU
_________________
Meine Wenigkeit im Internet: http://www.sideshow-systems.de