оболочка кейгена

[LuVeNa]

http://clip2net.com/s/5P5ljz

помогите плиз добить оболочку кейгена
как новичок чтото голову уже сломал как подцепить путь для сохранения, и нету нормальных примеров в хэлпе

rollout gkg "user details"
(
label label1 "UserName:" align:#left across:2
edittext details_name width:80 align:#left offset: [-120,0]
label label2 "License save path:" align:#left
button file_button "..." align:#left width:40 offset: [0,-2] across:3
edittext result_file_name width:300 align:#left offset: [-60,0]

on file_button pressed do

()


button go_button "GO!" align:#center width:40 offset: [-120,30]
)
gkgDialog = newRolloutFloater "GEN_0.1" 400 135
addRollout gkg gkgDialog

Обновление сообщения автором
25.09.2013 в 19:52
сохраняться будет файлик с расширением .LIC
заранее спасибо

 

[igorznag]

как подцепить путь для сохранения

rollout gkg "user details" 
( 
label label1 "UserName:" align:#left across:2 
edittext details_name width:80 align:#left offset: [-120,0] 
label label2 "License save path:" align:#left 
button file_button "..." align:#left width:40 offset: [0,-2] across:3 
edittext result_file_name width:300 align:#left offset: [-60,0] 

on file_button pressed do 
(
r=getSaveFileName types:"Data(*.LIC)|*.LIC"
if(r!=undefined)then
(
result_file_name.text=r
)
) 

button go_button "GO!" align:#center width:40 offset: [-120,30] 
) 
gkgDialog = newRolloutFloater "GEN_0.1" 400 135 
addRollout gkg gkgDialog

 

[LuVeNa]

спасибо! разобрался и чуток подправил
загвоздка, в трех соснах блуждаю...
не могу сообразить как сделать чтоб дефолтный путь сразу высвечивался (изначально окошко пустое)

rollout gkg "user details"
(
label label1 "UserName:" align:#left across:2
edittext details_name width:80 align:#left offset: [-120,0]
label label2 "License save path:" align:#left
button file_button "..." align:#left width:40 offset: [0,-2] across:3
edittext result_file_name width:300 align:#left offset: [-60,0]

on file_button pressed do
(
r=getSavePath caption:"license install path" initialDirgetdir #userScripts + @"\mylic")
if(r!=undefined)then
(
result_file_name.text=r
)
)

on details_name entered val do
(
nn=val
)


button go_button "GO!" align:#center width:40 offset: [-120,30]
)
gkgDialog = newRolloutFloater "GEN_0.1" 400 135
addRollout gkg gkgDialog

 

[LuVeNa]

все, решил трабл методом тыка и пары примеров ))
легко оказалось

 

[LuVeNa]

хм, новая трабла...
как палочки развернуть в другую сторону ?
файл не записывается при таком формате
createfile
ошибка выдается

пример строки C:\Users\****\AppData\Local\Autodesk\3dsMaxDesign\2014 - 64bit\ENU\scripts\


надо получить C:/Users/****/AppData/Local/Autodesk/3dsMaxDesign/2014 - 64bit/ENU/scripts/

 

[LuVeNa]

задачу решил

j = sssfile
r = j.count
for i = 1 to r do
(
if j == "\\" then
(
j = replace j i 1 "/"
)
)