require 'phi'; include Phi
require 'rdb'; include RDB
require 'com' # CoInitialize

form = Form.new

table = ADOTable.new
table.connection_string =
    'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.;' +
    'Extended Properties=Text;Persist Security Info=False'
table.cursor_type = CT_STATIC
table.table_name = 'NightShift#txt'
table.active = true

data_source = DataSource.new
data_source.data_set = table

grid = DBGrid.new form
grid.data_source = data_source
grid.align = AL_CLIENT

form.show
Phi.mainloop
