Вниз
Скачать: CL | DM;

Как вставить в Listview таблицу базы данных   Найти похожие ветки 

← →
Гаврилов В.А.   (2004-12-05 18:14) [0]

Уважаемые мастера!
Помогите советом, я делаю так:

table1.first;
while not Table1.eof do
begin
listview1.items.add.caption:= table1.fieldbyname("name").assstring;
table1.next;
end;

все работает но отражается только один столбик таблице (что собственно и прописано) но а как с остальными, черт побери не могу понять.
С уважением Гаврилов Виталий


← →
begin...end ©   (2004-12-05 18:15) [1]

А для остальных столбиков SubItems имеется.


← →
Гаврилов В.А.   (2004-12-05 18:18) [2]

а точнее

listview1.items.add.subitem.caption так что ли но ведь это код меняет название столбца, да как надо то привязаться к этому subitem-у


← →
begin...end ©   (2004-12-05 18:21) [3]

> [2] Гаврилов В.А.   (05.12.04 18:18)

ListView1.Items[индекс].SubItems.Add("...")


← →
Гаврилов В.А.   (2004-12-05 18:34) [4]

это видимо так

table1.first;
while not Table1.eof do
begin
listview1.items.add.caption:= table1.fieldbyname("name").assstring;
ListView1.Items[0].SubItems.Add("city")
ListView1.Items[1].SubItems.Add("e-mail")
table1.next;
end;


← →
begin...end ©   (2004-12-05 18:40) [5]

> [4] Гаврилов В.А.   (05.12.04 18:34)

while not Table1.EOF do
begin
 with ListView1.Items.Add do
 begin
   Caption := Table1.FieldByName("name").AsString;
   SubItems.Add("city");
   SubItems.Add("e-mail")
 end;
 Table1.Next
end.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
3-1100608109
Tor
2004-11-16 15:28
2004.12.19
из dbf в txt через TADODataSet


1-1101925567
sloug
2004-12-01 21:26
2004.12.19
Listbox и Grid


3-1100279696
able
2004-11-12 20:14
2004.12.19
Какую БД выбрать?


14-1101493824
Alexander Panov
2004-11-26 21:30
2004.12.19
consts.pas из Delphi3.


1-1102260155
Камиль
2004-12-05 18:22
2004.12.19
Как открыть HTML файл в Delphi6?




   Наверх