Custom Cursors

[Klaus Major]

Bonjour François,

ca va bien?

> Hi!
> Is it possible by a command to insert a line just before or after a 
> selected
> line in a List Field?

Yes, at no extra cost :-)

obejcts used in this example:

fld "list", which will have line selected
(NO multiple hilites, please ;-)

fld "to add", which holds the string to add :-)
can also be a variable, of course...

btn "insert", whith one of these scripts:

1. to add a line before the selected line:

on mouseup
   put the hilitedlines of fld "list" into hl
   if hl = empty then exit mouseup
   put fld "to add" & CR before line hl of fld "list"
end mouseUp

2. to add a line after the selected line:

on mouseup
   put the hilitedlines of fld "list" into hl
   if hl = empty then exit mouseup
   put CR & fld "to add" after line hl of fld "list"
end mouseUp

Tested and works ;-)

You might want to use the alt-key to combine
these scripts a la:

if the altkey is down then
   ## before...
  else
  ## after...
end if

You get the picture... :-)

> Thank you for your answer

A votre service, monsieur...

> Friendly
> François

Au revoir

Klaus Major
klaus at major-k.de