Вниз
Скачать: 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-1101111353
Alex@work
2004-11-22 11:15
2004.12.19
Посоветуйте инсталлятор


1-1102405062
Игорь_
2004-12-07 10:37
2004.12.19
Форма закладка


1-1102361074
Kolan
2004-12-06 22:24
2004.12.19
Помогите разобраться в Delphi работает в Buildere нет.


3-1101115078
YurikGL
2004-11-22 12:17
2004.12.19
Выборка из процедуры.


9-1092714276
MonoLife
2004-08-17 07:44
2004.12.19
Линии на канве




   Наверх