Dedicado a mis proyectos en Gambas ,un lenguaje de programación parecido al Visual Basic + Java pero ampliamente mejorado y...¡¡para gnu/linux!!.La potencia del gnu/linux sumada a la facilidad del Basic



Consultas, Desarrollo de programas y petición de presupuestos:



martes, 10 de septiembre de 2019

sábado, 22 de abril de 2017

Actualizando KDE desde PPA: resolviendo problema de embeber consola en krusader


Actualizando KDE desde PPA: resolviendo problema de embeber consola en krusader


Krusader  es una  de mis aplicaciones preferidas a la hora de administrar archivos en mi PC. La trae el escritorio KDE, pero la he podido instalar con también en otros escritorios (xfce por ejemplo). En caso es que mi distro actual (linux mint 16.04), la versión que esta en repositorios es la 2.4.0 que tiene un pequeño bug a la hora de embeber la consola dentro de los paneles de la propia aplicación:


Consola embebida dentro de los paneles de Krusader
Nota: En linux mint 16.04, da un error al embeber la consola, la captura es de la version 2.5 de krusader

¿como resolvemos este problema? Añadiendo el siguiente  PPA a nuestro sistema:

sudo add-apt-repository ppa:kubuntu-ppa/backports-landing
sudo apt-get update

Una vez hecho esto, con simplemente:
sudo apt-get install krusader

Se nos instala la version de krusader 2.5.0, que tiene corregido el bug de embeber la terminal o consola :)

Os dejo un video que hice hace tiempo, explicando el uso de perfiles en krusader:


lunes, 17 de abril de 2017

Gambas3: Nuevo control DayButton

Gambas3: Nuevo control DayButton

Una forma de extender el lenguaje gambas3, es crear nuevos controles que faciliten el trabajo de los programadores, a la hora de crear interfaces y/o programas. Este control es un ejemplo, sobre partiendo de uno existente (el button), se crea otro que nos muestra la fecha que le hayamos pasado en su propiedad fecha de la siguiente manera: día de la semana en texto, día numéricamente, y mes. Ademas si te sitúas encima de el, te sale el tooltip con la fecha:







Para redibujar el interior del botón, el código es el siguiente:

Public Sub _new()
  $hDA = New DrawingArea(Me) As "da"
  Me.Proxy = $hDA
End
Public Sub da_Draw()
  Dim hImage As New Image
  Dim iFlag As Integer = Style.StateOf(Me)
  Style.PaintButton(0, 0, $hDA.W, $hDA.H, $bState, iFlag, False)
  If Me.W > Me.H Then
    Me.H = Me.W
  Else
    Me.W = Me.H
  Endif
  Style.PaintButton(0, 0, $hDA.W, $hDA.H, $bState, iFlag, False)
  Draw.RichText(Html(WeekDatText(Me.fecha)), 0, 0, Me.W, Me.H / 3, Align.Center)
  Draw.RichText(Html(Day(Me.fecha)), 0, Me.H / 3, Me.W, Me.H * 1 / 3, Align.Center)
  Draw.RichText(Html(MonthText(Me.fecha)), 0, Me.H * 2 / 3, Me.W, Me.H / 3, Align.Center)
End

Y las funciones que convierten la fecha en texto (dia, mes) son:


Public Function WeekDatText(fecha As Date) As String
  Dim ArrayDay As String[]
  ArrayDay = [("Lunes"), ("Martes"), ("Miercoles"), ("Jueves"), ("Viernes"), ("Sabado"), ("Domingo")]
  Return Choose(WeekDay(fecha), ArrayDay[0], ArrayDay[1], ArrayDay[2], ArrayDay[3], ArrayDay[4], ArrayDay[5], ArrayDay[6])
End
Public Function MonthText(fecha As Date) As String
  Dim ArrayMonth As String[]
  ArrayMonth = [("Enero"), ("Febrero"), ("Marzo"), ("Abril"), ("Mayo"), ("Junio"), ("Julio"), ("Agosto"), ("Septiembre"), ("Octubre"), ("Noviembre"), ("Diciembre")]
  Return ArrayMonth[Month(fecha) - 1]
End
Private Function Fecha_Read() As Date
  If hfecha = Null Then
    hfecha = Now
    Me.Tooltip = Str(Format(hfecha, "dd-mm-yyyy"))
  Endif
  Return hfecha
End


El video de presentación del control:



Enlace de descarga:  alojado en google drive