procedure TForm1.Button1Click(Sender: TObject);
var
vv_i : Integer;
begin
for vv_i := 0 to ListView1.Items.Count - 1 do
begin
if (ListView1.Columns.Items[2].caption = 'c') and
(ListView1.Items[vv_i].SubItems.Strings[1] = '6')then
begin
ListView1.Items[vv_i].Selected := True;
end;
end;
// 포커스가 없으면 선택된것이 안보이네요...
// 아니면 HideSelection 프로퍼티에서 False주세요...
ListView1.SetFocus;
end;
Listview에서 마우스로 선택한 경우가 아니라, 어떤 필드에서 선택한 값에 따라 selected하려면 어떻게 하면 됩니까? 예를 들어, A B C -------------- 1 2 3 4 5 6 7 8 9 와 같은 Listview가 있을 때, C가 6인 Line을 selected 하게 하려...
공성환
•
2002.02.15 20:24
procedure TForm1.Button1Click(Sender: TObject);
var
vv_i : Integer;
begin
&nbs...
var
vv_i : Integer;
begin
for vv_i := 0 to ListView1.Items.Count - 1 do
begin
if (ListView1.Columns.Items[2].caption = 'c') and
(ListView1.Items[vv_i].SubItems.Strings[1] = '6')then
begin
ListView1.Items[vv_i].Selected := True;
end;
end;
// 포커스가 없으면 선택된것이 안보이네요...
// 아니면 HideSelection 프로퍼티에서 False주세요...
ListView1.SetFocus;
end;