Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АрхитектураБиологияГеографияДругоеИностранные языки
ИнформатикаИсторияКультураЛитератураМатематика
МедицинаМеханикаОбразованиеОхрана трудаПедагогика
ПолитикаПравоПрограммированиеПсихологияРелигия
СоциологияСпортСтроительствоФизикаФилософия
ФинансыХимияЭкологияЭкономикаЭлектроника

Практическая работа. Вывести в компонент ListBox1 содержимое всех полей текущей записи (начиная с первого).

Базы данных в Delphi | Ведение в базы данных | Таблицы баз данных. | Таблицы Paradox | Практическая работа | Набор данных | Практическая работа | Самостоятельная работа | Режимы наборов данных | Практическая работа |


Читайте также:
  1. I I. Практическая часть - задача
  2. I. Работа над диссертацией
  3. I. Работа со справочной литературой.
  4. I. Учебная работа
  5. II ПРАКТИЧЕСКАЯ ЧАСТЬ
  6. II. Научно-исследовательская работа и практика
  7. III. Работа с претензиями клиентов

Вывести в компонент ListBox1 содержимое всех полей текущей записи (начиная с первого).

Расположите на форме компоненты в соответствии с рисунком:

Напишите обработчик события OnClick для кнопки:

procedure TForm1.Button1Click (Sender: TObject);

var n:integer;

Begin

for n:=0 to table1.FieldCount-1 do

ListBox1.Items.Add (table1.Fields [n].AsString);

end;

После этого запустите программу и щелкните по кнопке на форме. В ListBox вы увидите список содержимого полей текущей записи набора данных. Содержимое каждого поля интерпретируется как строковое значение и добавляется к списку ListBox.

 

Самостоятельно выполните следующие задания:

1. Вывести в компонент ListBox1 содержимое всех полей текущей записи (начиная с последнего).

2. Использую общую схему обработки всех записей НД, вывести в компонент ListBox1 содержимое всех записей из всех полей (начиная с последней записи).

 

 


Дата добавления: 2015-07-19; просмотров: 55 | Нарушение авторских прав


<== предыдущая страница | следующая страница ==>
Доступ к полям| Практическая работа

mybiblioteka.su - 2015-2024 год. (0.006 сек.)