Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Listview comes hidden inside the container
Message
De
05/07/2016 15:02:03
 
 
À
05/07/2016 13:30:24
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 10
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01637921
Message ID:
01637928
Vues:
68
>Hi all,
>
>This is an old issue... but for a new one problem...
>
>If I recall, I had this same problem on the past...
>
>But, I can recall the way to deal with that...
>
>By a user button, The app. creates a new container, with a hidden listview inside...
>
>Basically, I populate with that code... But, listview I got visible, only if I click in the place where should be the list...
>
>
>With This
>	With .olecontrol1
>		=SendMessage(.hWnd, WM_SETREDRAW ,.T.,0)
>		.listitems.Clear
>		Select cur_implics
>		Scan
>			o                    = .listitems.Add
>			With o
>				.Text		 = cur_implics.razaosoc
>				.Tag		 = cur_implics.cid
>				.SubItems(1) = Transform(cur_implics.nqttits, "9999")
>				.SubItems(2) = Transform(cur_implics.npmp, "9999")
>				.SubItems(3) = cur_implics.ctipo
>				.ForeColor	 = Iif( cur_implics.ctipo = "F", Rgb(182, 190, 213), Rgb(60, 180, 60) )
>				For Each loSubItem In DateList.ListSubItems
>					loSubItem.ForeColor = Iif(cur_implics.ctipo = "F", Rgb(182, 190, 213), Rgb(60, 180, 60) )
>				Endfor
>			Endwith
>			lnqt = lnqt + 1
>		Endscan
>		If  lnqt > 0
>			.EnsureVisible(1)
>		ENDIF
>		.visible=.t.
>	Endwith
>	=SendMessage(.hWnd, WM_SETREDRAW ,.F.,0)
>	*.visible=.t.
>	.Draw()
>	*
>Endwith
>
You may need to set the appropriate Column.Sparse = .F.
Regards. Al

"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov

Neither a despot, nor a doormat, be

Every app wants to be a database app when it grows up
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform