[Ausgabefenster] Wie Breite des Fenster anpassen? Und:Scrollbalken möglich?

[Bozol]

Hi, wie schon in diesem Thread angedeutet habe ich mir ein kleines Script zusammen gezimmert welches es mir ermöglicht ein Textfile zu durchsuchen.

set theResult to choose from list {"ListeA", "ListeB", "ListeC"}
if theResult contains "ListeA" then
	set theFile to "/Users/fred/Documents/Liste ListeA.txt"
else if theResult contains "ListeB" then
	set theFile to "/Users/fred/Documents/Liste ListeB.txt"
else if theResult contains "ListeC" then
	set theFile to "/Users/fred/Documents/Liste ListeC.txt"
end if


set searchResult to text returned of (display dialog "Suchbegriff eingeben:" default answer "" buttons {"Suchen", "Abbruch"} default button "Suchen")
set displayResult to (do shell script "grep -i " & (quoted form of searchResult) & " " & (quoted form of theFile) & " || exit 0")
if displayResult = "" then
	display dialog "Nothing found."
else
	display dialog displayResult
end if

Das klappt so weit so gut und hat nur zwei kleine Schönheitsfehler: Das Ausgabefenster ist zu schmal weshalb manche Titel einen Zeilenumbruch erleiden, und wenn mans übertreibt ist die Anzahl der angezeigten Daten grösser als das Ausgabefenster. Leider hat das Ausgabefenster keinen Scrollbalken um nach "unten" zu kommen.

Kann man diese kleinen Schönheitsfehler relativ einfach abstellen? Und wie könnte ich mehrere Suchbegriffe angeben?

Ich bin für jeden Tipp dankbar.

Dankeschön fürs lesen,

Fred

 

[varuna]

Hallo,

du könntest die Ergebnisse mit "choose from list" anzeigen lassen.
Dieses Pop-Up passt sich der Breite an und ist bei Bedarf scroll-fähig.

Mehrere Suchbegriffe wären möglich. Man müsste nur festlegen, wie sie getrennt werden. Im nachfolgenden Beispiel mit Komma (und ohne Leerzeichen danach):

set theResult to choose from list {"ListeA", "ListeB", "ListeC"}
if theResult contains "ListeA" then
	set theFile to "/Users/fred/Documents/Liste ListeA.txt"
else if theResult contains "ListeB" then
	set theFile to "/Users/fred/Documents/Liste ListeB.txt"
else if theResult contains "ListeC" then
	set theFile to "/Users/fred/Documents/Liste ListeC.txt"
end if


set searchResult to text returned of (display dialog "Suchbegriff eingeben:" default answer "" buttons {"Suchen", "Abbruch"} default button "Suchen")

set AppleScript's text item delimiters to ","
set searchStrings to text items of searchResult
set AppleScript's text item delimiters to {""}
searchStrings

repeat with i in searchStrings
	set displayResult to every paragraph of (do shell script "grep -i " & quoted form of i & " " & quoted form of theFile & " || exit 0")
	try
		choose from list displayResult with prompt "Ergebniss:" with empty selection allowed
	on error
		display dialog ("For \"" & i as text) & "\" nothing found"
	end try
end repeat

Gruß

 

[Bozol]

Dankeschön, nun läuft alles so wie gewünscht. Vielen Dank dafür.