Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
extraneous browse window
Message
De
15/08/1996 14:38:16
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
extraneous browse window
Divers
Thread ID:
00005792
Message ID:
00005792
Vues:
96
Related thread: SELECT ... WHERE process in ?lcProcess
Being unable to pass a parameterized list to a view I'm
attempting a different approach.

Given:
Grid with
RecordSource:
SELECT Itmlayer.thickness, Itmlayer.color, Itmlayer.process FROM glass!itmlayer
WHERE Itmlayer.process in (select Process from Process_cursor)
RecordSourceType: SQL
Form.Load:
CREATE CURSOR Process_cursor (Process C(2))
Form.lstProcess:
*** lstProcess.Click
*** Created: 08/14/96
*** Purpose: keep track of selected items in this box.

FOR nCnt = 1 TO This.ListCount
IF This.Selected(nCnt)
insert into Process_cursor (Process) values (THIS.List(nCnt,2))
ELSE
delete from Process_cursor where process = THIS.List(nCnt,2)
ENDIF
ENDFOR


With this code:

wait window "Command1.Click begin"
THISFORM.Grid1.RecordSource = "SELECT Itmlayer.thickness, Itmlayer.color, Itmlayer.process;
FROM glass!itmlayer WHERE Itmlayer.process in (select Process from Process_cursor)"
wait window "Command1.Click end"

the CORRECT results are showing up in Grid1, but a browse window is also showing up. Can this be suppressed? How?

Thanks, Kim
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform