Comunidad Gambas-es

Gbrubik-GL 0.1.0. No funciona actualmente

Shell 27-05-2023, 19:01

Buenas!.

Este proyecto es una adaptación del Cubo De Rubik que si no me equivoco es de tercoIDE.
El otro día fui a usar el proyecto pero la Gambas 3.18.2 no me dejó en Linux Mint 20.2.

Se quejaba de que faltaban componentes, lógicamente La Linux Mint 20.2 no usa Qt4, pero si Qt5.
He probado en una Linux Mint 19.3 que si tiene QT4, el proyecto no se ha quejado de componentes, pero si ha dado error al funcionar.
Los componentes que solicita el proyecto son:

[Imagen: yZuXa83.png]

Aparentemente el estado de los componentes son estables.
No creo que sea un problema sustituir:

- gb.qt4 -> gb.qt5
- gb.qt4.opengl -> gb.qt5.opengl

Como sabéis en la Gambas 3.18.2 disponemos ademas de:

- gb.gui.qt.opengl
- gb.gui.qt

Pero con esos si se quejaría el proyecto. Es como si el intercambiador gb.gui.qt.opengl no haga por acceder a gb.qt5.opengl.

Detallo la salida por consola para mostrar los mensajes de error: ( El programa se detiene inesperadamente y se aborta ).

Código:
 
gb.jit: panic: unsupported opcode 0600

//////// modMotor3D

void jit_modmotor3d_9(uchar n);

static void jit_modmotor3d_9_(double p0,double p1,double p2,double p3,double p4,double p5);

void jit_modmotor3d_27(uchar n);

static void jit_modmotor3d_27_(double p0,double p1,double p2,double p3);

// Rotar3Df

void jit_modmotor3d_9(uchar n)

{

  VALUE *sp = *((VALUE **)0x55f1269479b0);

  jit_modmotor3d_9_(PARAM_f(0),PARAM_f(1),PARAM_f(2),PARAM_f(3),PARAM_f(4),PARAM_f(5));

}

static void jit_modmotor3d_9_(double p0,double p1,double p2,double p3,double p4,double p5)

{

  double l0 = 0;

  double l1 = 0;

  VALUE **psp = (VALUE **)0x55f1269479b0;

  VALUE *sp = SP;

  ushort *pc = (ushort *)0x55f12898e574;

  GB_VALUE_GOSUB *gp = 0;

  bool error = FALSE;

  VALUE *ssp = sp;

  TRY {

__L0:; // modMotor3D.Rotar3Df.0

Subo el código fuente por si lo perdisteis.

P.d He logrado hacerlo funcionar, pero eliminando la palabra Fast de dos procedimientos:

- Rotar3Df
-TranslateScale

[Imagen: enzPBSS.png]

Saludos

El componente gb.jit necesita según la ayuda de Gambas LLVM >= 3.1
Pero tomando el nombre de LLVM como referencia en Synaptic solo encontré instalado esto:

[Imagen: IQVgZ3x.png]

Encuentro que esto no esta instalado:

[Imagen: JKoGQso.png]

Es el único que se llama LLVM como Low-Level Virtual machine.

Esto todo en una Linux Mint 19.3, claro.

Archivos adjuntos

GBrubik-GL-0.1.tar.gz (Tamaño: 27.44 KB Descargas: 2)

General Respuestas 4

De nuevo problemas con la ayuda online de Gambas

Shell 27-05-2023, 11:33

Buenas!.

Ahora ya se muestra al menos un mensaje.

Se vuelve a repetir, ¿ qué ocurre realmente ?. Hace poco tuvimos un problema similar.
¿ Mantenimiento ?, ¿ cambio de alojamiento ?.

Y lógicamente con el portal de Gambas, ocurre igual, solo que no muestra mensaje.

Saludos

General Respuestas 3

obtener foco sobre un formulario

alberto-moyano 26-05-2023, 20:35

Hola colisteros, no encuentro que hago mal en el siguiente caso. Tengo un formulario (con un editor) que puedo instanciar tantas veces como lo necesite, la cuestión es que cuando quiero guardar cambios en cualquiera de los formularios abiertos, no lo obtengo y solo guarda los cambios en el primero, no entiendo si mi error es de lógica o de código, el código que desarrollé es el siguiente.

Gracias por cualquier comentario

Código:
[code]

Private formulariosAbiertos As New FormMAESTRO[]

Private activeForm As FormMAESTRO

' Evento GotFocus para cada formulario

Public Sub Form_GotFocus()

  activeForm = Me

End

Public Sub menuSAVE_Click()

  If activeForm = Null Then

    Return

  End If

  If activeForm.Dialog.Path = "" Then

    guardarComo(activeForm, True)

  Else

    File.Save(activeForm.Dialog.Path, activeForm.TextEditor.Text)

  End If

End Sub

Public Sub menuSAVE_AS_Click()

  guardarComo(True)

End

Public Sub guardarComo(formulario As FormMAESTRO, local As Boolean)

  formulario.Dialog.Title = "Guardar como..."

  formulario.Dialog.Filter = ["*.tex", "Archivos LaTeX", "*.adoc", "Archivos Asciidoc", "*.md", "Archivos Markdown"]

  If formulario.Dialog.SaveFile() Then

    ' Proceso cancelado por el usuario

    Return

  Else

    If formulario.Dialog.Path = "" Then

      Message.Info("El archivo no tiene un nombre válido.")

      Return

    End If

    If local Then

      File.Save(formulario.Dialog.Path, formulario.TextEditor.Text)

      ' Actualizar el título del formulario con la nueva ubicación

      formulario.Title = formulario.Dialog.Path

    Else

      ' Otras acciones a resolver

    Endif

  Endif

End

[/code]

y el código que utilizo para abrir las diferentes instancias y guardarlas en una lista es

Código:
Public Sub menuABRIRarch_Click()

  Abrir(True)

End

Public Sub Abrir(local As Boolean)

  Dim cadena As String

  Dialog.Title = "Escoger archivo"

  Dialog.Filter = ["*.tex", "Archivos LaTeX", "*.adoc", "Archivos Asciidoc", "*.md", "Archivos Markdown"]

  If Dialog.OpenFile() Then

    ' Proceso cancelado por el usuario

    Return

  Else

    If Dialog.Path = "" Then

      Message.Info("El archivo no tiene un nombre válido.")

      Return

    End If

    If local Then

      cadena = File.Load(Dialog.Path)

      Dim newForm As New FormMAESTRO

      newForm.TextEditor.Text = cadena

      newForm.TextEditor.SetFocus

      newForm.Show

      newForm.Title = Dialog.Path

      ' Añadir el formulario a la matriz de formularios abiertos

      formulariosAbiertos.Add(newForm)

    Else

      ' Otras acciones según sea necesario

    Endif

  Endif

End

Aplicaciones/Fragmentos de Código Respuestas 2

Páginas (560): 1 … 169 170 171 172 173 … 560

Bienvenido, Invitado

Buscar en los foros

Estadísticas del foro

Miembros: 288

Último miembro: shoUsho

Temas del foro: 1,729

Mensajes del foro: 8,987

Últimos temas

Portal

Shell 27-05-2023, 19:01

Shell 27-05-2023, 11:33

alberto-moyano 26-05-2023, 20:35

Convertir formatos de aud...

Paren...WAIT !!!

GambOS

Gambas y Wayland

Odio a gb.Report