--by leftspace
ed=createEdit(MainForm.Panel10)
lbl=createLabel(MainForm.Panel10)
btn=createButton(MainForm.Panel10)
btnb=createButton(MainForm.Panel10)
function selectPidBtn() --17444
openProcess(tonumber(ed.text))
end
function attach_aow()
local p = io.popen('tasklist /fi "IMAGENAME eq aow_exe.exe" /fi "MEMUSAGE gt 300000" /nh', 'r');
local procInfo = p:read('*a');
p:close();
local pid = procInfo:match('%d+');
pid = tonumber(pid);
openProcess(pid);
end
-- labe
lbl.Align=alBottom
lbl.Width = 22;
lbl.Height = 23;
lbl.BorderSpacing.Left=6
lbl.BorderSpacing.Right=6
lbl.BorderSpacing.Top=50
lbl.Caption = "PID"
-- editbox
ed.Align=alBottom
ed.Width = 22;
ed.Height = 23;
ed.BorderSpacing.Left=6
ed.BorderSpacing.Right=6
ed.BorderSpacing.Top=0
ed.Enabled=true
--button
btn.Align=alBottom
btn.Width = 22;
btn.Height = 23;
btn.BorderSpacing.Left=6
btn.BorderSpacing.Right=6
btn.BorderSpacing.Top=0
btn.Caption = "Open Process"
btn.OnClick = selectPidBtn
btn.Enabled = true
--button
btnb.Align=alBottom
btnb.Width = 22;
btnb.Height = 23;
btnb.BorderSpacing.Left=6
btnb.BorderSpacing.Right=6
btnb.BorderSpacing.Top=0
btnb.Caption = "Open AOW"
btnb.OnClick = attach_aow
btnb.Enabled = true