on keyDown me
if currentField <> void then
if the key = "c" and the commandDown then
copySelected()
dontpassevent
alert "copy"
else
pass
end if
end if
end
on copySelected me
if startChar < endChar then
theSelection = currentField.char[startChar..endChar]
else
theSelection = currentField.char[endChar..startChar]
end if
thetext = theSelection
baCopyText(thetext)
end
Contact
MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA