Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
RemoveObject() and ControlCount
Message
 
À
25/09/1998 14:44:31
Nancy Folsom
Pixel Dust Industries
Washington, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00140062
Message ID:
00141519
Vues:
28
>Hi, Steve.
>
>From the help:
>"Use the AddItem method or AddListItem method when the RowSourceType property is set to 0 (None)."
>
>So, I was just asking if you're listboxes rowsourcetype is 0. Sorry for the shorthand < s >.
>
>Specifically, re you using build 415?
>
>Would it help to pass the object, and not just the name of the object?
>
>If the code for movejob is short, would you post it?
>

Hi, Nancy.

I'm using build 402, and I'm guessing that build 415 is the VisStudio sp3 that I haven't downloaded yet.

I'm not using any listboxes, sorry, I should have been more clear about that. Basically, I've got three containers with one being dragged and dropped between the other two. They are all new classes based on the container class, but they are only lightly modified (they act just like containers).

Here is the code to move the jobs:

parameters ojob,cNewContainer
evaluate("thisform."+alltrim(cNewContainer)+".addobject('"+ ;
alltrim(ojob.name) +"','job' ojob.jobnumber,newheight,ojob.jobdescription, ;
ojob.backcolor,ojob.backcolor,ojob.press,ojob.totalpcs)") * the Job's params in *init
with evaluate("thisform."+alltrim(cNewContainer)+"."+alltrim(ojob.name))
.backcolor = ojob.backcolor
.jobdate = ojob.jobdate
.visible = .T.
endwith
evaluate("thisform."+alltrim(ojob.parent.name)+".removeobject('"+ ;
alltrim(ojob.name)+"')")
release ojob



I want to thank you again for your help, I really appreciate it. I'm beginning to think, though, that either nothing can be done or that I'm making an extremely elementary mistake somewhere. Either way, no one could know the answer to such problems and it might explain why no one else has responded.

Thanks again,

Steve
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform