| View previous topic :: View next topic |
| Author |
Message |
bbelcher Contributor

Joined: 30 Jul 2002 Posts: 172
|
Posted: Tue Jul 30, 2002 5:17 pm Post subject: Compare Lists |
|
|
| Im looking for a way to take WINLIST(I) results from a initial run and compare them with a WINLIST(I) from a second run and return only the differences if any. Im making a screen saver for NT/2000 but I havent found a way to disable the WINKEY + R ,+S etc. Without disabling it in the registry. I believe the above mention way should work. If there is a difference then it would close the window not belonging to the initial WINLIST run. Any Ideas. |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
Posted: Tue Jul 30, 2002 5:39 pm Post subject: |
|
|
This should work for your first problem...
You should think of something to remove the empty lines yourself...
| Code: |
DIALOG CREATE,Winlist,-1,0,580,197
DIALOG ADD,LIST,LIST1,8,0,176,144
DIALOG ADD,LIST,LIST2,8,192,176,144
DIALOG ADD,BUTTON,BUTTON1,168,24,144,24,Second check
DIALOG ADD,LIST,LIST3,8,384,176,144
DIALOG SHOW
list winlist,list1
:evloop
wait event
goto @event()
:Button1button
list clear,list2
list winlist,list2
%%list1item = 0
repeat
if @not(@match(list2,@item(list1,%%listitem)))
list add,list3,@item(list1,%%listitem)
end
%%listitem = @succ(%%listitem)
until @greater(%%listitem,@count(list1))
goto evloop
:Close
exit
|
Btw. if you prefer non-visible lists replace list1, list2 & list3 by 1, 2 & 3 |
|
| Back to top |
|
 |
Mac Professional Member

Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
|
| Back to top |
|
 |
Mac Professional Member

Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
Posted: Tue Jul 30, 2002 5:41 pm Post subject: |
|
|
Oops... Sorry skit. You beat me to the post...
I've had problems with @match() in loops though...
Cheers, Mac  _________________ VDSug.dll does file IO, check/disable menu items,
non-VDS dlls, draw functions and more...
Free download (30k dll size) at:
http://www.vdsworld.com/download.php?id=361
 |
|
| Back to top |
|
 |
Mac Professional Member

Joined: 08 Jul 2000 Posts: 1585 Location: Oklahoma USA
|
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
Posted: Tue Jul 30, 2002 6:36 pm Post subject: |
|
|
You beat me at this one, Mac...  |
|
| Back to top |
|
 |
bbelcher Contributor

Joined: 30 Jul 2002 Posts: 172
|
Posted: Tue Jul 30, 2002 8:41 pm Post subject: |
|
|
| Thanks for the quick replys. I figured out the rest of the code but still not working like I want it to. I have taken a look at MAC screen saver and It does works great under NT/2000 but I need the WINKEYS disabled or all new windows closed if invoked by a keyboard shortcut. Another Idea I had was to suspend explorer.exe. That works but any keys that are pushed durring the suspend fills up the keyboard buffer and fires out as soon as explorer is unsuspended. Does anybody know how to clear the keyboard buffer or to redirect it? |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
Posted: Wed Jul 31, 2002 12:57 pm Post subject: |
|
|
| Make 26 (or more) buttons with there names from A to Z and set a & before them... If the user presses a key there will be a ABUTTON (or Z) event, and then you can add the letter to a variable, %%text... You can send it with window send,@winontop(),%%text[/b] |
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You can attach files in this forum You can download files in this forum
|
|