dear all.... mau tanya nih, dah mentok.. aku dah tanya om google, jwbnya ngawur. searching di Delphi-id gak sesuai...:( gini: aku select dari tabel hasilnya:

ID NAMA
1   Andri
2   Budi
3   Dita

1. diinginkan data itu ditampilkan di ListView dg ada checkbox disamping kirinya. 2. field ID dijadikan indeks di listview tersebut (krn kemungkinan ID gak urut) dan nama menjadi caption itemnya. 3. jika ID=1 maka item dg nama Andri akan terceklist berlaku jg dg item yg lain. terus: bagaimana mengetahui item mana yg terceklist dan tidak? terima kasih banyak sebelumnya semoga gak bikin bgg pertanyaanya....

Wah ... masih ga ngeh maksud mas imunk. Tapi klo untuk mengecek item mana yang terceklist, bisa seperti ini :

procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
  Memo1.Clear;
  with ListView1 do
    for i:= 0 to Pred(Items.Count) do
      if (Items[i].Checked) then
        Memo1.Lines.Add(Items[i].Caption + ':' +
          Items[i].SubItems.Strings[0] + ' Checked')
      else
        Memo1.Lines.Add(Items[i].Caption + ':' +
          Items[i].SubItems.Strings[0] + ' Not Checked');
end;

Klo mau ngeceklist secara koding, bisa seperti ini :

ListView1.Items[0].Checked:= true;

Moga bisa membantu

mungkin maksudnya gini ya... Coba dech smoga membantu..

Procedure TambahList(Nama,ID:String);
var
   ListItem : TListItem;
Begin
  ListItem := ListView1.items.add;
  ListItem.Caption := Nama;
  Listitem.subitem.add(ID);
  if ID = '1' then ListItem.Checked = True;
end;
Procedure PopulateList;
begin
ZQuery1.Close;
ZQuery1.SQL.Clear;
ZQuery1.SQL.add('Select ID, Nama from Tbl_Nama ');
ZQuery1.Open;
ZQuery1.First;
While Not ZQuery1.Eof do
begin
TambahList(ZQuery1.FieldValues['Nama'],ZQuery1.FieldValues['ID']);
ZQuery1.Next;
end;
end;

[/pas]

terima kasih banyak mas kaka dan mas herux, aku coba dulu mudah2an berhasil.....:)