Creamos un nuevo proyecto gambas de tipo consola y pegamos este código.
luego lo copilamos, despues intalamos el paquete .deb, y despues lo probamos en la terminal.
' gambas module file
'by postapase
Public Sub Main()
Dim modificador As String
modificador = Application.Args[1] 'esto lo aprendi de Shell
Select modificador
Case "arquitectura"
Shell "uname -m"
Case "codename"
Shell "uname -n"
Case "--help"
Print Application.Name & "-" & Application.Version
Case Else
Print "modificador desconocido"
Print "escriba 'PcInfo --help'"
End Select
End
'by postapase
Public Sub Main()
Dim modificador As String
modificador = Application.Args[1] 'esto lo aprendi de Shell
Select modificador
Case "arquitectura"
Shell "uname -m"
Case "codename"
Shell "uname -n"
Case "--help"
Print Application.Name & "-" & Application.Version
Case Else
Print "modificador desconocido"
Print "escriba 'PcInfo --help'"
End Select
End
necesario registrarse en el foro, código fuente:
http://www.gambas-es.org/download.php?id=617
Saludos, comenten....
No hay comentarios.:
Publicar un comentario