1

Konu: SELECT komutunu yarıda kesmek

VFP ile bir SELECT komutuna başladıktan sonra onu yarıda kesmemin bir yolu varmı acaba ?

Kullanıcı yanlış tarhi aralığı vererek çok uzun bir SELECT ifadesini başlattıktan sonra onu yarıda kesmek istiyor, bu mümkünmü ?

2

Re: SELECT komutunu yarıda kesmek

SET ESCAPE ON
ON ESCAPE DO stopit
WAIT WINDOW 'Press ESC to stop loop' NOWAIT
glMoreLoop = .T.

DO WHILE glMoreLoop
ENDDO
RETURN

PROCEDURE stopit
glMoreLoop = .F.
RETURN

vfp9 örneği.  Sanırım işini görür.

Bilmediğin Neyse Yanıldığındır.

3 Son düzenleyen, metin (25.12.2006 11:15:35)

Re: SELECT komutunu yarıda kesmek

Visual Fox Pro
priv xnoesc

xnoesc=.t.
select * from my table where xnoesc and notescape()
 
func notescape
xnoesc=xnoesc and inke()#27
retu xnoesc


"where xnoesc and notescape()" şeklinde yapmamın sebebi bir kere xnoesc .f. olduktan sonra  notescape() fonksiyonunun bir daha çalışmamasını sağlamak.

şu da olabilir:

Visual Fox Pro
priv xnoesc

xnoesc=.t.
set esca on
on key label escape xnoesc=.f.
select * from my table where xnoesc
on key label escape
set esca off
Haksızlıklar karşısında susanlar, dilsiz şeytanlardır!
www.metinemre.com

4

Re: SELECT komutunu yarıda kesmek

Çok teşekkür