//返回ListBox选中的多项目 procedure TForm1.Button2Click(Sender: TObject);vari:Integer;s:string;begin for i:=0 to ListBox1.Items.Count-1 do if ListBox1.Selected[i] then s:=s+ListBox1.Items[i]+#13#10; showmessage(s);end; http://www.myexception.
refer: https://www.cnblogs.com/lonelyxmas/p/7650259.html using System; using System.Collections.Generic; using System.Collections.ObjectModel; using System.Diagnostics; using System.IO; using System.Linq; using System.Runtime.InteropServices.WindowsR