F
fjboy
Unregistered / Unconfirmed
GUEST, unregistred user!
本人新手.在写程序中遇见了好多困难.希望能找个高手帮忙.但是一直找人帮忙不是长久的事.大家都没什么时间.所以本人希望能找个师傅,学习技术.我愿意每个月出学费.只要能教我就可以.有时间教我的请留下QQ号码.或直接加我QQ:399467
在此先像大家请教个问题.ListView 控件中如何实现模糊搜索功能.
var
i : Integer;
S : string;
begin
S := Edit41.Text;
for i := 0 to ListView.Items.count - 1 do begin
if ListView.Items.SubItems.strings[1] = S then begin
ListView.SetFocus;
ListView.Selected := ListView.Items;
Exit;
end;
以上代码只能按名字搜索.我想写个模糊搜索的.
比如 在 Edit41.Text 里输入的是 '我'.那么 ListView.Items.SubItems.strings[1] 这列的表有包含'我'的关键字全部显示在 ListView 中.而不存在这个关键字的其他内容全部不显示.
在此先像大家请教个问题.ListView 控件中如何实现模糊搜索功能.
var
i : Integer;
S : string;
begin
S := Edit41.Text;
for i := 0 to ListView.Items.count - 1 do begin
if ListView.Items.SubItems.strings[1] = S then begin
ListView.SetFocus;
ListView.Selected := ListView.Items;
Exit;
end;
以上代码只能按名字搜索.我想写个模糊搜索的.
比如 在 Edit41.Text 里输入的是 '我'.那么 ListView.Items.SubItems.strings[1] 这列的表有包含'我'的关键字全部显示在 ListView 中.而不存在这个关键字的其他内容全部不显示.