Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Parent Object Will Not Allow This Property Setting - Gri
Message
De
18/07/2006 13:08:46
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01137255
Message ID:
01137308
Vues:
22
I could swear I tried that Nadya! Honestly, about 10 times! I did something wrong originally though because now it works! :o)
*--page activate:
loObject = THIS.Grid1.Column2
THIS.Grid1.RECORDSOURCE=""
THIS.Grid1.RECORDSOURCE="Tracy"
IF !PEMSTATUS(loObject,'Edit1',5)
    WITH THIS.Grid1.Column2
        .REMOVEOBJECT([Text1])
        .ADDOBJECT([Edit1],[EditBox])
        .CURRENTCONTROL = [Edit1]
        .Edit1.VISIBLE = .T.
        .CONTROLSOURCE = "(thisform.returntheaddress())"
	.Width = 150
    ENDWITH
ENDIF
this.Grid1.refresh()
*--Form ReturnTheAddress()
RETURN (ALLTRIM(number) + IIF(!EMPTY(apt_room),"-" + TRIM(apt_room)," ") + ;
		IIF(!EMPTY(st_prefix)," " + TRIM(st_prefix) + " "," ") + ALLTRIM(street) + ;
		IIF(!EMPTY(st_type)," " + st_type,"") + IIF(!EMPTY(st_suffix)," " + st_suffix,""))
.·*´¨)
.·`TCH
(..·*

010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform