Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
DBI-Tech ctList Control Question
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Divers
Thread ID:
01117800
Message ID:
01117803
Vues:
18
Yes, I changed the code to:
cId  = TRANSFORM(Temp1.Id)
.oleList.ListCargo(nItem) = cId 
cId is "1"
.oleList.ListCargo(nItem) is ""



>>I am adding items to the list from a table:
>>
>>
>>** Table Employees
>>Id  Emp_Id  FullName
>>-----------------------
>>1   JONES   Jack Jones
>>2   SMITH   Steve Smith
>>3   ROBERTS Rich Roberts
>>
>>
>>My code:
>>
>>SCAN
>>
>>  nItem = nItem + 1
>>
>>  cListItem = Temp1.Emp_Id + CHR(10) + Temp1.FullName
>>
>>  .oleList.AddItem(cListItem)
>>
>>  .oleList.ListCargo(nItem) = TRANSFORM(Temp1.Id)
>>	
>>ENDSCAN
>>
>>
>>The problem is the ListCargo collection. I'm trying to store the record id
>>for later use.
>>
>>The help for it states:
>>"Specifies a non-visible text value for the list item. This property is used to attach
>>a text string to a list item. This text string is only stored by the list item. It is
>>not displayed in any way. The purpose of this string is to be determined by the programmer."
>>
>>If I directly set it as in
.oleList.ListCargo(nItem) = "1"
>>then it works fine.
>>
>>As I have it in the SCAN loop, it fails to work. In the debugger it displays as an
>>empty string.
>>
>>Anyone know what's wrong here?
>>
>>Thanks
>
>
>Kevin, did you manually check result of TRANSFORM(Temp1.Id) and value of Temp1.Id to make sure that is ok?
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform