require 'phi'
require 'rdb'
require "dir_to_dataset"
form = Phi::Form.new
grid = RDB::DBGrid.new form
grid.align = Phi::AL_CLIENT
grid.data_source = RDB::DataSource.new dir_to_dataset
p grid.columns[3].pick_list
sl=Phi::StringList.new
sl.text=["日本","ドイツ","フランス"].join("\r\n")
grid.columns[3].pick_list.assign(sl)
# grid.columns[3].pick_list.text = %w[日本 ドイツ フランス].join("\r\n")
p grid.columns[3].pick_list
form.show
Phi.mainloop
