Has anyone used RUNDLL routines wit

[fjagdis]

Has anyone used RUNDLL routines within a VFP program ?

 

[Mike Lewis]

Fjagdis,

I haven't.

What exactly do you want to achieve?

Mike


Mike Lewis
Edinburgh, Scotland

http://www.ml-consult.demon.co.uk

 

[rgbean]

Here's a couple examples:

run /n rundll32.exe shell32.dll,Control_RunDLL main.cpl
run /n rundll32.exe shell32.dll,Control_RunDLL desk.cpl
run /n rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl, @0,3 && open to specific tab

Rick

 

[fjagdis]

About a year alo I was looking for a way to disable the mouse (and re-enable it). I found a workaround. I recently noticed (in a VB forum) that RUNDLL could do this but I have not tried it.

 

[Mike Lewis]

Fjagdis,

I don't know if this will help, but you can hide the mouse pointer like this:

DECLARE INTEGER ShowCursor IN win32api INTEGER
ShowCursor(0) && hides the pointer

and:

ShowCursor(1) && restores the pointer

When the mouse cursor is hidden, the mouse is completely invisible to the user and cannot be used.

Mike


Mike Lewis
Edinburgh, Scotland

http://www.ml-consult.demon.co.uk

 

[Mike Gagnon]

fjagdis

How disabling mouse and keyboard "while a process is going on", to prevent the user from causing an error?

DECLARE INTEGER BlockInput IN user32 INTEGER fBlockIt

? BlockInput (1)
? "*** Input blocked"
	
FOR ii=1 TO 10
	DO dataproc
ENDFOR

? BlockInput (0)
? "*** Input unblocked"

PROCEDURE  dataproc
* it is just an emulation of a time-consuming procedure
	LOCAL ii
	WAIT WINDOW NOWAIT "Creating cursor..."
	CREATE CURSOR cs (id N(6), dt D)
	FOR ii=1 TO 10000
		INSERT INTO cs VALUES (ii, date()-ii)
	ENDFOR
	WAIT CLEAR
	? Chr(9) + "- cursor created at " + TTOC (datetime())
	USE IN cs
RETURN

Mike Gagnon

If you want to get the best response to a question, please check out FAQ184-2483 first.