Here are two subs I have, Select All and Deselect All

#=====================
sub SelectAll_Click
#=====================
{
    my $count = $MainWin->ListView->Count();
    foreach my $item (0..$count)
    {
        $MainWin->ListView->ItemCheck($item,1);
    }
}

#=====================
sub ClearSelections_Click
#=====================
{
    my $count = $MainWin->ListView->Count();
    foreach my $item (0..$count)
    {
        $MainWin->ListView->ItemCheck($item,0);
    }
}

Regards,
Sam Dela Cruz



I believe this will actually "clear" the listview... I just want to 
"deselect" any "selected/highlighted" items.
-----Original Message-----
From: Jonathan Southwick [mailto:[EMAIL PROTECTED]
Sent: Wednesday, July 23, 2003 12:01 PM
To: [EMAIL PROTECTED] Sourceforge. Net (E-mail)
Subject: Re: [perl-win32-gui-users] How do you deselect all currently selected 
items from a listview?


Here is how I do it in one of my programs:

      $MainWindow->Recipients->Clear();

Where Recipients is the name of my listbox.

Jonathan
========================
Jonathan Southwick
[EMAIL PROTECTED]
Technical & Network Services
Allegheny College
Meadville, PA 16335
(814) 332-2755


At 7/22/2003  09:44 AM, Magnone, Angelo wrote:

How do you deselect all currently selected items from a listview? 



------------------------------------------------------------
This e-mail may be privileged and/or confidential, and the sender does not 
waive any related rights and obligations. Any distribution, use or copying 
of this e-mail or the information it contains by other than an intended 
recipient is unauthorized. If you received this e-mail in error, please 
advise me (by return e-mail or otherwise) immediately. 

Ce courrier électronique est confidentiel et protégé. L'expéditeur ne 
renonce pas aux droits et obligations qui s'y rapportent. Toute diffusion, 
utilisation ou copie de ce message ou des renseignements qu'il contient 
par une personne autre que le (les) destinataire(s) désigné(s) est 
interdite. Si vous recevez ce courrier électronique par erreur, veuillez 
m'en aviser immédiatement, par retour de courrier électronique ou par un 
autre moyen.

===========================================================
------------------------------------------------------------
This e-mail may be privileged and/or confidential, and the sender does not 
waive any related rights and obligations. Any distribution, use or copying 
of this e-mail or the information it contains by other than an intended 
recipient is unauthorized. If you received this e-mail in error, please 
advise me (by return e-mail or otherwise) immediately. 

Ce courrier électronique est confidentiel et protégé. L'expéditeur ne 
renonce pas aux droits et obligations qui s'y rapportent. Toute diffusion, 
utilisation ou copie de ce message ou des renseignements qu'il contient 
par une personne autre que le (les) destinataire(s) désigné(s) est 
interdite. Si vous recevez ce courrier électronique par erreur, veuillez 
m'en aviser immédiatement, par retour de courrier électronique ou par un 
autre moyen.

============================================================ 



Reply via email to