Solved

How to make invert selection in Listview

Posted on 2000-04-08
3
367 Views
Last Modified: 2010-04-04
How to make invert selection in listview? just like the invert selection
function in windows explorer?

Rgds

Shekou
0
Comment
Question by:shekou
  • 2
3 Comments
 
LVL 27

Accepted Solution

by:
kretzschmar earned 100 total points
ID: 2696026
hi shekou,

maybe this

procedure TForm1.Button1Click(Sender: TObject);
var I : Integer;
begin
  for i := 0 to listview1.Items.Count - 1 do
    listview1.Items[i].Selected := not listview1.Items[i].Selected;
end;


meikl
0
 

Author Comment

by:shekou
ID: 2697269
Thanks, it works fine.

Shekou
0
 
LVL 27

Expert Comment

by:kretzschmar
ID: 2697438
hi shekou,

glad to helped you,
thanks for accepting my commant as answer,
good luck again

meikl ;-)
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…

730 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question