Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid white space
Message
De
05/11/2004 10:54:23
 
 
À
05/11/2004 06:53:54
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 5
Divers
Thread ID:
00957515
Message ID:
00958518
Vues:
20
hi,

thank you ,but sometimes i don't understand what i must do in english language.

ok.
1.i have at my form pagefram with 2 pages
2. i have 2 combo at page1, one for inname, second for nam1
3. i have one grid at page1 belong to combo how get nam1, to choise the item
4. i have thisform.pageframe1.page1.text4.value to insert (choise) inname on it.

in the last my code under at thisform.pageframe1.page1.text4.value procedure valid
with thisform.pageframe1.page2.Grid1
    .RecordsourceType = 4 && SQL
    .Columncount = -1
      .Recordsource = 'select * from mstr'+;
      '   where UPPER(inname) = UPPER(TRIM(thisform.pageframe1.page1.text1.Value)) and nam1 = thisform.pageframe1.page1.text4.Value'+;
'   into cursor crsMyCursor'
    
ENDWITH

thisform.pageframe1.page2.Grid1.refresh
if found it i can see the result at page2 via grid1 belong to mstr.table
this is myform before.

but now i creat(copy new form) at level form i create method as resetgrid(at new form (resetgrid method)i put your code as under.
SELECT csrMstr
ZAP
lcWhere = [UPPER(inname) = '] + UPPER(TRIM(thisform.pageframe1.page1.text1.Value)) + [' and nam1 = '] + thisform.pageframe1.page1.text4.Value + [']
SELECT * FROM MSTR WHERE &lcWhere INTO CURSOR Temp NOFILTER
SELECT csrMstr
APPEND FROM DBF( [Temp] )
USE IN Temp
GO TOP IN csrMstr
IF RECCOUNT( [csrMstr] ) > 0
  Thisform.PageFrame1.ActivePage = 2
  Thisform.PageFrame1.Page2.Grid1.Refresh()
ELSE
  MESSAGEBOX( [No Records Match Your Criteria] )
ENDIF
at page2 grid1 belong mstr, at properties (record source csrmstr)
(record source type 1-alias).


now with all thing when i run myform i get nothing.
at page2.grid1 belong to mstr

***at thisform.pageframe1.page1.text4.value i put
thisform.resetgrid()

thats all,
thanks.
best regards.
m.qasem
thanks very
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform