main.dfm

来自「jvcl driver development envionment」· DFM 代码 · 共 52 行

object frmMain: TfrmMain
  Left = 210
  Top = 238
  Width = 246
  Height = 130
  Caption = 'Data Pump example'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object go: TButton
    Left = 80
    Top = 40
    Width = 75
    Height = 25
    Caption = 'go'
    TabOrder = 0
    OnClick = goClick
  end
  object DataBase: TJvUIBDataBase
    Params.Strings = (
      'sql_dialect=3'
      'lc_ctype=NONE'
      'password=masterkey'
      'user_name=SYSDBA')
    DatabaseName = 'Data\EMPLOYEE.GDB'
    UserName = 'SYSDBA'
    PassWord = 'masterkey'
    LibraryName = 'gds32.dll'
    Left = 10
    Top = 6
  end
  object Transaction: TJvUIBTransaction
    DataBase = DataBase
    Left = 40
    Top = 8
  end
  object Query: TJvUIBQuery
    SQL.Strings = (
      'INSERT INTO COUNTRY (COUNTRY,CURRENCY) VALUES (?, ?)')
    Transaction = Transaction
    CachedFetch = False
    Left = 72
    Top = 8
  end
end