Search  
Friday, May 25, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.
SearchForum Home
  Visual FoxPro  Form-uri si generatoare de form-uri  Gridul si filtr...
 Gridul si filtrarea
 
 4/8/2010 6:22:47 PM
User is offlineLordVlad
53 posts


Gridul si filtrarea
 (N/A)
Am un grid si un combobox si doresc sa filtrez continutul gridului prin intermediul comboboxului

Combobox-ul isi ia valorile in RowSource dupa cum urmeaza: "SELECT DISTINCT localitate FROM imobile INTO CURSOR loc"

Butonul pentru filtrare arata cam asa:

thispf = thisform.PFAdmin.imobile.PFImobile.vizualizare

SELECT imobile

SET FILTER TO localitate = thispf.loc_imob.Value IN imobile

thisform.Refresh

Filtrarea functioneaza...oarecum. Dupa ce fac cautari/filtrari si inchid formul, la urmatoarea deschidere a formului imi da eroarea "Object THISPF is not found". In cadrul form.load-ului exista USE clienti IN 0 si USE imobile in 0.

Si nu e singuru form la care imi da eroarea asta. Mai am un form simplu cu combo si grid la fel ca acesta, doar ca filtrarea are mai mutle elemente iar acolo eroarea este la combobox "Unknown member LOC_IMOB" (LOC_IMOB este numele comboboxului) - eroarea aparand tot dupa ce inchid si redeschid formul.
Daca dau ignore la eroare si redeschid formul merge iar ... dar tot asa, pana cand inchid formul.
Deci practic formurile merg o data da si o data nu. De ce? Unde e problema?

Va multumesc pentru ajutor!
Cu stima,
Vlad
 4/8/2010 6:30:27 PM
User is offlineoviciandrus
762 posts
www.comptech.ro
1st




Re: Gridul si filtrarea
 (N/A)

Incearcă aşa:

lcFilter = "SET FILER TO LOCALITATE = '" + thispf.loc_imob.Value +"'"

SELECT "IMOBILE"

&lcFilter

thisform.Refresh()
 4/8/2010 7:01:15 PM
User is offlineLordVlad
53 posts


Re: Gridul si filtrarea
 (N/A)
In cazul in care am mai multe campuri/variabile dupa care trebuie sa fitrez, cum procedez?
 4/8/2010 7:01:17 PM
User is offlineLordVlad
53 posts


Re: Gridul si filtrarea
 (N/A)
In cazul in care am mai multe campuri/variabile dupa care trebuie sa fitrez, cum procedez?
 4/8/2010 7:05:26 PM
User is offlineoviciandrus
762 posts
www.comptech.ro
1st




Re: Gridul si filtrarea
 (N/A)
Pentru un camp a mers? Deoarece am avut o greseala de tipar mai sus?
 4/8/2010 7:07:52 PM
User is offlineLordVlad
53 posts


Re: Gridul si filtrarea
 (N/A)
Da a mers. Am observat greseala de tipar si am rectificat-o
 4/8/2010 7:28:48 PM
User is offlineoviciandrus
762 posts
www.comptech.ro
1st




Re: Gridul si filtrarea
 (N/A)
Pentru mai multe campuri trebuie sa compui comanda de filtrare cam aşa:

lcFilter = "SET FILER TO (LOCALITATE = '" + thispf.loc_imob.Value +"') AND (NUMAR = " + Transform(thispf.numar.value) + ") AND (DATA = {" + Transform(thispf.data.value) + "})"
 4/8/2010 8:08:49 PM
User is offlineLordVlad
53 posts


Re: Gridul si filtrarea
 (N/A)
lcFilter = "SET FILER TO (tip_imobil = '"+ thisform.tip_imobil.Value +"') AND (nr_camere = '"+ val(thisform.nr_camere.Value) +"') AND (pret_imob >= '"+ val(thisform.pret1.Value) +"') AND (pret_imob <= '"+ val(thisform.pret2.Value) +"') AND (localitate = '"+ thisform.loc_imob.Value +"') AND (tip_contr = 'Vanzare') AND (vandut = .F.)"

Imi da Operator/operant type mistmatch. Daca dau ignore imi da "Unrecognized command verb"...voi vedeti greseala?
 4/8/2010 11:35:57 PM
User is offlineoviciandrus
762 posts
www.comptech.ro
1st




Re: Gridul si filtrarea
 (N/A)

Spune-mi te rog ce tipuri au următoarele câmpuri în tabelă:

TIP_MOBIL, NR_CAMERE, PRET_IMOB, LOCALITATE, TIP_CONTR, VANDUT

adică CHARACTER, NUMERIC etc
 4/9/2010 5:54:41 PM
User is offlineLordVlad
53 posts


Re: Gridul si filtrarea
 (N/A)
TIP_MOBIL - char(10)
NR_CAMERE - numeric(2)
PRET_IMOB - numeric(7)
LOCALITATE - char(20)
TIP_CONTR - char(10)
VANDUT - logic
 4/9/2010 8:01:02 PM
User is offlineoviciandrus
762 posts
www.comptech.ro
1st




Re: Gridul si filtrarea
 (N/A) Modified By oviciandrus on 4/9/2010 8:01:58 PM)
 LordVlad wrote
TIP_MOBIL - char(10)
NR_CAMERE - numeric(2)
PRET_IMOB - numeric(7)
LOCALITATE - char(20)
TIP_CONTR - char(10)
VANDUT - logic


lcFilter = "SET FILER TO (tip_imobil = '"+ thisform.tip_imobil.Value +"') AND (nr_camere = "+Transform (thisform.nr_camere.Value) +") AND (pret_imob >="+Transform (thisform.pret1.Value) +") AND (pret_imob <="+Transform (thisform.pret2.Value) +") AND (localitate = '"+ thisform.loc_imob.Value +"') AND (tip_contr = 'Vanzare') AND (NOT vandut)"

= MessageBox(lcFilter)

Studiaza ce vezi si incearcă să inţelegi!

Tu ai facut ceva de genul "abcd" + 75
 Page 1 of 1
NextPreviousNo Rating
  Visual FoxPro  Form-uri si generatoare de form-uri  Gridul si filtr...
Search  Forum Home         

 Google Ads Minimize
    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement