tercoide 08-08-2022, 15:40
buen día, amigos:
Resulta que el CAD que estamos haciendo esta llegando a un punto de maduración importante y pronto (en tiempos geológicos) llegara el momento en que queramos difundirlo en las redes.
Sin llegar ser una copia y lejos de ser tener la capacidad de otros CAD de gigantes como AutoDesk, comparten nomenclatura, cosas de su formulario principal y formatos de archivo que están en ese soft, principalmente el AutoCAD. La pregunta que me hago es: hasta que punto se puede un programa parecerse a otro sin violar derechos de autor? se puede "Guardar" un archivo en un formato supuestamente privativo (DWG , aunque hubo un controversia al respecto y juicios entre companias)

Si "castellanizamos" los nombres , no estaríamos esquivando violaciones de Copyright, generalmente en ingles?

Huh
guizans 08-08-2022, 00:03
Hola a todos.

Me estoy volviendo loco con un error que no soy capaz de encontrar. Tengo esta función, que basicamente rellena un array de dos dimensiones preguntando al usuario por los números.
Código:
Private Function preguntarDatos(d As String) As Float[]

  Dim a, c As Integer
  Dim entrada As String
  Dim en As Float[]
  Dim b As Float
 
  en = New Float[filas, columnas]
  Print "Introduce los datos de la matriz '" & d & "':"
  For c = 0 To filas - 1
    For a = 0 To columnas - 1
      While True
        Print "Dato [" & Str(c + 1) & ", " & Str(a + 1) & "] = ?"
        Input entrada
        Try b = CFloat(entrada)
        If Error Then
          Print "Dato no válido..."
        Else
          Break
        Endif
      Wend
      en[c, a] = b
    Next
  Next
  Return en
End
Como apunte, las variables "filas" y "columnas" son variables de clase y he comprobado que no tengan un valor de cero. El caso que es en la primera vuelta del bucle for me da un error de "Bad number of dimensions" en la línea 22. Y no puede ser, ya que las variables "c" y "a" tienen el valor de 0, como digo es en la primera interacción.
 El caso que poninedo este código en la web de Gambas no me da error.
Código:
Dim a, c As Integer
Dim entrada,d As String
Dim en As Float[]
Dim b As Float
dim filas, columnas as integer

filas = 3
columnas = 3
d="jk"

  en = New Float[filas, columnas]
  Print "Introduce los datos de la matriz '" & d & "':"
  For c = 0 To filas - 1
    For a = 0 To columnas - 1
      While True
        Print "Dato [" & Str(c + 1) & ", " & Str(a + 1) & "] = ?"
      entrada = "3"
        Try b = CFloat(entrada)
        If Error Then
          Print "Dato no válido..."
        Else
          Break
        Endif
      Wend
      en[c, a] = b
    Next
  Next

Como se puede observar es practicamente el mismo, el primero me da error y el segundo no. ¿Alguién ve lo que estoy haciendo mal?

Muchas gracias.

Un saludo.
sushisan 07-08-2022, 16:29
Buenos días a todos.

Necesito implementar algo que se comporte como el Form en el IDE: que se pueda arrastrar "algo" (una imagen por ejemplo) y se coloque según una grilla, pero que , una vez colocado, pueda volverse a arrastrar de nuevo para reubicarlo. Intente un drag/drop sobre un Drawapanel y dibujar la imagen, lo cual funciona correctamente, pero eso no puede volver a reubicarse de la misma manera, queda fijo. Lo cual es correcto porque el nuevo dibujo no es un objeto si no un dibujo sobre el DrawPanel.

Hay algo parecido o un ejemplo de algo similar?
Páginas (566):    1 284 285 286 287 288 566   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 295
Último miembro: ncofre98
Temas del foro: 1,748
Mensajes del foro: 9,072
Últimos temas
Problemas con las interru...
Foro: General
Último mensaje por: guizans, 14-12-2025, 18:40
Respuestas: 5 - Vistas: 239
Scrolling un ScrollArea
Foro: Controles/Librerías/Componentes
Último mensaje por: Shordi, 12-12-2025, 07:24
Respuestas: 5 - Vistas: 249
Ordenar en un TableView
Foro: General
Último mensaje por: guizans, 08-12-2025, 23:06
Respuestas: 9 - Vistas: 941
Resultados dispares según...
Foro: Bases de Datos
Último mensaje por: guizans, 04-12-2025, 22:49
Respuestas: 6 - Vistas: 399
Mover un Result a una pos...
Foro: Bases de Datos
Último mensaje por: guizans, 30-11-2025, 19:25
Respuestas: 2 - Vistas: 223
Powered By MyBB, © 2002-2025 MyBB Group.
Made with by Curves UI.