(
 --dotnet.loadassembly "System.Data" 
 rollout ro_test "test"
 (  
  dotnetcontrol dg "System.Windows.Forms.DataGridView"
  
  on ro_test open do
  (
   local colWidth = 160
   local fromCol = dotNetObject "System.Windows.Forms.DataGridViewTextBoxColumn"
   fromCol.headerText = "Original Textures"
   fromCol.readOnly = true
   fromCol.frozen = true
   fromCol.width = colWidth
   
   local toCol = dotNetObject "System.Windows.Forms.DataGridViewTextBoxColumn"
   toCol.headerText = "New Textures"
   toCol.width = colWidth
   
   dg.columns.add fromCol
   dg.columns.add toCol
   
   dg.Location = dotNetObject "System.Drawing.Point" 10 10
   dg.Width = 400
   dg.Height = 400
   dg.Visible = true
   
   for i = 1 to 5 do
   (
    local row = #(dotNetObject "System.String" ("row str"))
    dg.rows.add row
   )
  )
 )
 
 createdialog ro_test 500 500
)

크리에이티브 커먼즈 라이센스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.

(0) (0)