' gambas class file
PUBLIC SUB _new()
END
PUBLIC SUB Form_Open()
END
PUBLIC SUB Button1_Click()
DIM comando AS String
comando = "chmod u+x pa-clone"
SHELL comando WAIT
END
PUBLIC SUB Button2_Click()
DIM comando AS String
comando = "./pa-clone"
SHELL comando WAIT
END
PUBLIC SUB Button3_Click()
DIM comando AS String
comando = "exit"
SHELL comando WAIT
END
PUBLIC SUB _new()
END
PUBLIC SUB Form_Open()
END
PUBLIC SUB Button1_Click()
DIM comando AS String
comando = "chmod u+x pa-clone"
SHELL comando WAIT
END
PUBLIC SUB Button2_Click()
DIM comando AS String
comando = "./pa-clone"
SHELL comando WAIT
END
PUBLIC SUB Button3_Click()
DIM comando AS String
comando = "exit"
SHELL comando WAIT
END
y una imagen de lo que sucede...