Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как получить список полей(записей) из таблицы, ListBox таблица Paradox 
:(
    Опции темы
Berliner
Дата 5.4.2006, 13:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 803
Регистрация: 18.5.2005

Репутация: нет
Всего: 2
Написал вот, ошибка. МОжет кто знает как правильно?
Код

ListBox1.Items[ListBox1.ItemIndex]:=Form2.Table1.Fields[1];
PM   Вверх
StranikS
Дата 5.4.2006, 14:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 39
Регистрация: 1.2.2006

Репутация: нет
Всего: 2
Забыл указать тип изымаемых данных:

Код

form1.ListBox1.Items[form1.ListBox1.ItemIndex]:=form1.Table1.Fields[0].AsString;

Добавлено @ 14:57
ИЗВИНЯЮСЬ, НЕ ПРОЧИТАЛ ТЕМУ.

Список полей можно вывести так:

Код

Table1.FieldDefs.Update;                      
{ должно быть вызвано, если Table1 не активна } 
for i := 0 to Table1.FieldDefs.Count - 1 do 
with Table1.FieldDefs.Items[i] do form1.ListBox1.Items[form1.ListBox1.ItemIndex]:=Name; 
end; 


Это сообщение отредактировал(а) StranikS - 5.4.2006, 14:58
PM MAIL   Вверх
Berliner
Дата 5.4.2006, 15:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 803
Регистрация: 18.5.2005

Репутация: нет
Всего: 2
Спасиб попробую
PM   Вверх
Alex
Дата 5.4.2006, 17:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 17
Всего: 162
Код

var
  i: integer;
begin
  Table1.FieldDefs.Update;
  ListBox1.Items.BeginUpdate;
  try
    ListBox1.Items.Clear;
    for i := 0 to Table1.FieldDefs.Count - 1 do
      ListBox1.Items.Add(Table1.FieldDefs.Items[i].Name);
  finally
    ListBox1.Items.EndUpdate;
  end;
end;



--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
Berliner
Дата 6.4.2006, 11:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 803
Регистрация: 18.5.2005

Репутация: нет
Всего: 2
спасиб за ответы, только мне надо вывести все записи поля из таблицы, а не все поля.
Попытался переделать код: Но код не работает, не выводит записи. Подскажите что не так, пожалуста?

Код

ListBox1.Items.BeginUpdate;
  try
    ListBox1.Items.Clear;
    for i := 0 to Form1.Table3.Fields.Count - 1 do
      ListBox1.Items.Add(Form1.Table3.Fields[1].AsString);
  finally
    ListBox1.Items.EndUpdate;
  end;
PM   Вверх
Alex
Дата 6.4.2006, 18:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 17
Всего: 162
Тогда не создавайте дублирующих тем http://forum.vingrad.ru/index.php?showtopi...mp;#entry695076


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0592 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.