comp.lang.idl-pvwave archive
Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado

Home » Public Forums » archive » my favourite dot command
Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend 
Return to the default flat view Create a new topic Submit Reply
Re: my favourite dot command [message #63490 is a reply to message #63374] Fri, 07 November 2008 11:10 Go to previous messageGo to previous message
Vince Hradil is currently offline  Vince Hradil
Messages: 574
Registered: December 1999
Senior Member
On Nov 7, 12:56 pm, Vince Hradil <vincehra...@gmail.com> wrote:
> On Nov 7, 12:43 pm, David Fanning <n...@dfanning.com> wrote:
>
>
>
>> gsever writes:
>>> I am on RHEL v5.2, and with the latest IDL Workbench update v7.0.3. It
>>> is working here :)
>
>>> Check the screenshot:
>
>>> http://img384.imageshack.us/my.php?image=3Dsearchra1.png
>
>>> Search window is opened by clicking the flashlight symbol.
>
>> Ah, I missed the flashlight. :-)
>
>> Yes, I guess it works, but it didn't find all those
>> Execute's Vince is talking about. :-(
>
>> Cheers,
>
>> David
>
>> --
>> David Fanning, Ph.D.
>> Coyote's Guide to IDL Programming (www.dfanning.com)
>> Sepore ma de ni thui. ("Perhaps thou speakest truth.")
>
> Do I have some outdated code on my machine?  Never!...

display.pro, line 7:

Pro Display_Event, event
;
; Very simple event handler. Get array, execute the "command".
;
Widget_Control, event.top, Get_UValue=array
Widget_Control, event.id, Get_UValue=command
result = Execute(command)
END ;---------------------------------------------------------


fsc_psconfig__define.pro, line 468 and line 471:

values = self.fontnameID->GetValues()
selection = self.fontnameID->GetSelection()
index = Where(StrUpCase(values) EQ StrUpCase(selection))
FOR j=1,7 DO BEGIN
cmd = "self." + values[j] + " = 0"
ok = Execute(cmd)
IF NOT ok THEN ok = Dialog_Message("Problem executing statment:
" + cmd)
ENDFOR
IF index[0] NE 0 THEN ok = Execute("self." + values[index[0]] + " =
1")
self.fontnameSet = values[index[0]]

ps_form.pro, line 339 (plus 4 more):

FOR j=0,N_Elements(names)-1 DO BEGIN
IF names(j) NE 'YOFF' THEN BEGIN
str = names(j) + '= defaults.' + names(j)
dummy = Execute(str)
ENDIF
ENDFOR

xwindow.pro, line 637 (plus 7 more):

'Create PostScript File': BEGIN
keywords = info.ps
thisDevice = !D.NAME
TVLCT, r, g, b, /GET
SET_PLOT, 'PS'
!P.Background = info.background
TVLCT, info.r, info.g, info.b, info.bottom
DEVICE, _EXTRA=keywords
ok = EXECUTE(plotObj.thisCommand)
[Message index]
 
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Read Message
Previous Topic: Anyone attending SEG 2008 in Vegas?
Next Topic: How to add a header/info file for a matrix to become a FITS file?

-=] Back to Top [=-
[ Syndicate this forum (XML) ] [ RSS ] [ PDF ]

Current Time: Wed Oct 08 18:21:04 PDT 2025

Total time taken to generate the page: 0.00513 seconds