Советы по Delphi


              

Добавьте все поля для Table1,


Как создать lookup-поле в TDBGrid для Delphi 2.0
  1. Разместите на форме 2 компонента TTable, 1 компонент TDataSource и 1 - TDBGrid.
  2. Подключите Table1 - к DataSource1 - к DBGrid1
    • DataSource1.DataSet = Table1
    • DBGrid1.DataSource = DataSource1
    • Установка Table1
      • Table1.Database = DBDemos
      • Table1.TableName = Customer
      • Table1.Active = True
      • Установка Table2
        • Table2.Database = DBDemos
        • Table2.TableName = Orders
        • Table2.Active = True
        • Добавьте все поля для Table1, используя Fields Editor (редактор полей):
          • Дважды щелкните на Table1
          • Нажмите правую кнопку мыши в редакторе полей
          • Выберите пункт Add New Fields. Добавьте их все.
          • Добавьте новое поле для Table1.
            • Нажмите правую кнопку мыши в редакторе полей и выберите пункт "New Field".
            • Определите следующие параметры для вновь добавленного поля:
              • Name: Bob
              • Type: String
              • Size: 30
              • Select Lookup
              • Key Fields: CustNo    -  Поле в Table1 для хранения значения
              • DataSet: Table2       -  Здесь устанавливается табличный lookup
              • LookUpKeys: CustNo  -  Данный ключ копируется в KeyField
              • Result Field: OrderNo -  Значение для показа пользователю в выпадающем списке
              • Запустите приложение
              [001023]


              Содержание  Назад  Вперед