[GRASS-dev] EPSG list search

GRASS GIS GRASS GIS developer
1

Hi,

how hard would it be to add a "search" function to the GUI startup epsg
code browser?

It would be nice to have a line at the bottom of the window:

Search: [_______________________] [Go] Forwards Backwards

I would suggest hardcoding it case-insensitive.

I don't know enough tcl to do this, but here's the recipe in the
cookbook:

http://www.dci.clrc.ac.uk/Publications/Cookbook/msg.html
  add command -label Forward -com {FindWord -forwards $seltxt}
  add command -label Backward -com {FindWord -backwards $seltxt}

and there's some sample code from "tcltextedit" in lib/findreplace.tcl.
(proc FindIt {}, "tkTextSetCursor"?)
hmph: http://www.dbforums.com/showthread.php?t=691545
       http://wiki.tcl.tk/3082

license is in lib/edit.tcl.
  http://tcltextedit.sourceforge.net

this would make that EPSG box much more useful. (currently it's not very)

thanks,
Hamish

2

I would love to add this, but haven't been able to take the time to figure
out how to do it. I'll definitely look at this 'cookbook' recipe. Thanks.

Michael
__________________________________________
Michael Barton, Professor of Anthropology
School of Human Evolution & Social Change
Center for Social Dynamics & Complexity
Arizona State University

phone: 480-965-6213
fax: 480-965-7671
www: http://www.public.asu.edu/~cmbarton

From: Hamish <hamish_nospam@yahoo.com>
Date: Sun, 29 Oct 2006 18:38:14 +1300
To: grass5 <grass-dev@grass.itc.it>
Subject: [GRASS-dev] EPSG list search

Hi,

how hard would it be to add a "search" function to the GUI startup epsg
code browser?

It would be nice to have a line at the bottom of the window:

Search: [_______________________] [Go] Forwards Backwards

I would suggest hardcoding it case-insensitive.

I don't know enough tcl to do this, but here's the recipe in the
cookbook:

http://www.dci.clrc.ac.uk/Publications/Cookbook/msg.html
  add command -label Forward -com {FindWord -forwards $seltxt}
  add command -label Backward -com {FindWord -backwards $seltxt}

and there's some sample code from "tcltextedit" in lib/findreplace.tcl.
(proc FindIt {}, "tkTextSetCursor"?)
hmph: IT Management Recent News | ITPro Today
       Move cursor by display line in a text widget

license is in lib/edit.tcl.
  http://tcltextedit.sourceforge.net

this would make that EPSG box much more useful. (currently it's not very)

thanks,
Hamish