Code: Select all
on selectionChanged
--answer the selectedtext of field "ServerList"
--answer the hilitedLine of field "ServerList"
set itemdel to "/"
put the last item of the folder into tFolderName
put the selectedtext of me into tText
set itemdel to cr
put item 1 of tText into tText
put tText into field "AddMe"
put tText & "/" & tFolderName into field "SelectedServer"
end selectionChanged
on mouseup
wait 15 milliseconds
// mouseclick goes true if user makes second click
if the mouseClick then
set the locktext of me to "false"
set the listbehavior of me to "false"
Beep
end if
end mouseup
on mouseLeave
set the locktext of me to "true"
set the listbehavior of me to "true"
end mouseLeave
Code: Select all
on mouseUp
delete Line (the hilitedLine of field "ServerList") of field "ServerList"
end mouseUp
I know this because in order to discover that no line number is returned I added a line of code to answer the value :
Code: Select all
on mouseUp
-- Delete the selected line
answer the hilitedLine of field "ServerList"
delete Line (the hilitedLine of field "ServerList") of field "ServerList"
end mouseUp
I also note that if I try to add blank lines above text lines using the inspector in the IDE the IDE pauses then removes them.
So what obvious thing am I missing ?
I have created a stack that shows the issue.
best wishes
Simon