Algo de feedback
Este cartel aparece al ejecutar, supongo que hay que crear el paquete e instalarlo en el PC verdad?
Ademas se queda en bucle mostrando ese cartel por mas que le de al botón OK varias veces.
Estoy haciendo un método para solucionarlo, te lo paso en 10 min.
Ya esta, esto lo resuelve
Código:
Public Sub Form_Open()
Dim n As Integer
CheckRun()
With GridView1
.Rows.Count = ListBox1.List.Max
.columns.Count = 1
For n = 0 To .Rows.Max
GridView1[n, 0].Text = ListBox1[n].Text
Next
End With
End
Private Sub CheckRun()
If Settings["RunNumber", 0] < 1 Then
Shell "mkdir -p '" & Desktop.ConfigDir & "/gbThemes/Theme'" Wait
If Exist("/tmp/gbThemes-0.0.5.tar.gz") Then
Shell "rm " & "/tmp/gbThemes-0.0.5.tar.gz" Wait
Endif
Copy "./gbThemes-0.0.5.tar.gz" To "/tmp/gbThemes-0.0.5.tar.gz"
Shell "tar –xvzf /tmp/gbThemes-0.0.5.tar.gz –C " & Desktop.ConfigDir & "/gbThemes/Theme" Wait
Shell "rm " & "/tmp/gbThemes-0.0.5.tar.gz" Wait
Settings["RunNumber"] = 1
Else
Settings["RunNumber"] = Settings["RunNumber"] + 1
Endif
End
El botón "salir" no funciona.
El formulario no redondea las esquinas.
El tema "Light" tiene el mismo aspecto que el tema "Dark"
con gb.gui el titulo de la ventana se trunca.
Me olvidaba, felicitaciones por poner el careto en el video.