Alexyz21
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору [code]local F=far.Flags local Flags=bit64.bor(F.FCF_FG_4BIT,F.FCF_BG_4BIT) local x,y = 17,17 local buffer=far.CreateUserControl(x-1,y-1) for i=0,#buffer-1 do buffer[i+1]={Char=win.OemToUtf8(string.char(bit.band(i,255))),Attributes={Flags=Flags,ForegroundColor=i+8,BackgroundColor=i}} end local Items={ {"DI_DOUBLEBOX",0,0,x,y,0,0,0,0,""}, {"DI_USERCONTROL",1,1,x-1,y-1,buffer,0,0,0,""} } far.Dialog ("",-1,-1,x+1,y+1,nil,Items) |