Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid white space
Message
De
06/11/2004 15:08:56
 
 
À
06/11/2004 06:27:39
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:
00958892
Vues:
20
hi, i agree i need to read more and more,

ok
i put SET STEP ON at the method,nothing happend,
i run myform no errors and no result at mygrid at page2,

pls. q.1. if you can add if statment at my code under as
if found()
go to the page2 autmaticly
else
=messagebox("")

q.2. how i can add command to print and view the data i see at mypage2.grid1 at my report mstr22.rpt
q.3.how i can see my report at screen if i don't have printer
q.4. i need to change the title of the page2.grid1 to arabic names as
innoumber,price,total.......

this code under it works,but i need to add (q.1)
thisform.pageframe1.page2.grid1.Visible=.t.

with thisform.pageframe1.page2.Grid1
    .RecordsourceType = 4 && SQL
    .Columncount = -1
      .Recordsource = 'select innoumber,price,total,w1,w2,t1,t2,t3,datein,billno from mstr'+;
     '   where UPPER(inname) = UPPER(TRIM(thisform.pageframe1.page1.text1.Value)) and nam1 = thisform.pageframe1.page1.text4.Value and datein>=thisform.pageframe1.page1.text3.value .and. datein<=thisform.pageframe1.page1.text5.value '+;
     '   into cursor crsMyCursor'
ENDWITH
thisform.pageframe1.page2.text1.value=thisform.pageframe1.page1.text1.Value
thisform.pageframe1.page2.text2.value=thisform.pageframe1.page1.text4.Value
sum innoumber to thisform.pageframe1.page2.text3.value
sum total to thisform.pageframe1.page2.text4.value
sum t1 to thisform.pageframe1.page2.text5.value
sum t2 to thisform.pageframe1.page2.text6.value
sum t3 to thisform.pageframe1.page2.text7.value
  
 count  to thisform.pageframe1.page2.text8.value
 thisform.pageframe1.page1.grid2.Visible=.f.
 thisform.pageframe1.page2.grid1.setfocus()
thanks.
best regards
m.qasem
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform