tincho 19-04-2021, 17:47
Hola a todos.
Resulta que el texto que sale de un pdf no esta formateado correctamente, pero si que se pueden hacer algunas cosas para mejorarlo.
Si por ejemplo una cadena termina en ".\n" (punto+nueva-linea) estamos casi con seguridad en el final de un párrafo.
Pero luego hay situaciones en las que se trata de un título y que la linea de texto no termina en "." pero por suerte sucede que luego la siguiente linea comienza por una mayúscula.
Bien ahora la pregunta ¿Cual es la expresión regular, u otra forma para reemplazar \n# por \n[::jump::]#? donde # es cualquier letra mayúscula.
  • Reemplazar \n# por \n[::jump::]#
Saludos.
vuott 18-04-2021, 00:45
Apuntar Big Grin  en el mapa de un MapView: 

Código:
Private MapView1 As MapView
Private mp As MapPoint = MapPoint(36.490590, -6.238170)  ' en honor de mi amigo, Romanorum Consul Shell
Private DrawingArea1 As DrawingArea
 
 
Public Sub Form_Open()
 
  Dim pn As Panel
 
  With Me
    .W = Screen.AvailableWidth
    .H = Screen.AvailableHeight
    .Arrangement = Arrange.Fill
    .Mouse = Mouse.Blank
  End With
  With MapView1 = New MapView(Me) As "MapView1"
    .Map.AddTile("GoogleMap", "https://mt0.google.com/vt/lyrs=s&hl=&x={x}&y={y}&z={z}")
    .Map.Zoom = 11
' Imposta il centro della mappa:
    .Map.Center = mp
  End With
 
  pn = MapView1.Children[0]
  DrawingArea1 = pn.Children[0]
   
End
 
Public Sub MapView1_MouseMove()
 
  Dim pt As New Point(Mouse.X, Mouse.Y)
  Dim lat As Float = MapView1.Map.PixelToMapPointRel(pt).Lat
  Dim lon As Float = MapView1.Map.PixelToMapPointRel(pt).Lon
 
  mp = MapPoint(lat, lon)
 
  MapView1.Refresh
  MapView1.Map.Refresh
 
End

Public Sub MapView1_Draw()
 
  Dim c, x, y, r As Short
  Dim po As Point = MapView1.Map.MapPointToPixelRel(mp)
 
  With Paint
    .Begin(DrawingArea1)
    .Brush = .Color(Color.DarkOrange)
    .LineWidth = 2.0
    .Arc(MapView1.Map.MapPointToPixelRel(mp).X, MapView1.Map.MapPointToPixelRel(mp).Y, 50, 0, 360, False)
    .Arc(MapView1.Map.MapPointToPixelRel(mp).X, MapView1.Map.MapPointToPixelRel(mp).Y, 30, 0, 360, False)
    .Stroke
    .Brush = .Color(Color.Red)
    .Arc(MapView1.Map.MapPointToPixelRel(mp).X, MapView1.Map.MapPointToPixelRel(mp).Y, 1.5, 0, 360, False)
    .Fill
    
    r = 50
    x = po.X
    y = po.Y
    
    For c = 0 To 360 Step 90
      po.X = x + r * Cos(Rad(c))
      po.Y = y + r * Sin(Rad(c))
      .MoveTo(po.X, po.Y)
' Per ridurre la lunghezza della "x" per i gradi 0, 90, 180 e 270 è necessaria questa sequenza: +n 0 -n 0 che si ottiene con il Coseno di c.
' Per ridurre la lunghezza della "y" per i gradi 0, 90, 180 e 270 è necessaria questa sequenza: 0 -n 0 +n che si ottiene con il Coseno di c + 90.
      .LineTo(x + (20 * Cos(Rad(c))), y - (20 * Cos(Rad(c + 90))))
      .Stroke
    Next
    .Brush = .Color(Color.Yellow)
    .DrawText(Format(mp.Lat, "0.######"), x + r * Cos(Rad(270)) - (Me.Font.TextWidth(Format(mp.Lat, "0.######")) / 2), (y + (r + 15) * Sin(Rad(270))), Me.Font.TextWidth(Format(mp.Lat, "0.######")), Me.Font.TextHeight(Format(mp.Lat, "0.######")), Align.Left)
    .DrawText(Format(mp.Lon, "0.######"), x + r * Cos(Rad(0)) - (Me.Font.TextWidth(Format(mp.Lon, "0.######")) / 2), (y + (r + 15) * Sin(Rad(0))), Me.Font.TextWidth(Format(mp.Lon, "0.######")), Me.Font.TextHeight(Format(mp.Lon, "0.######")), Align.Left)
    .End
  End With
 
End
AlfredoSC 16-04-2021, 23:36
Hola...saludos:

Pues comencé a hacer proyectos con el ESP32 adicionando las librerías a Arduino bajo Win2 y también en Ubuntu 18.04. Para "subir" el software ya compilado al ESP32 hay que oprimir el botón BOOT mientras avanzan algunos % de carga. Luego se puede soltar y la carga continúa.

Durante estos momentos yo veía fluctuar en intensidad el led integrado rojo del ESP32. Luego al terminar de "subir" el software, y abriendo la terminal Serial, aparecían paquetes de mensajes, cuyo encabezado decía algo parecido a:

"Brownout detector was triggered. CPU Reset"...

Estuve buscando en la web temas relacionados, pero hay muy pocas soluciones. Incluso Expressive (los fabricantes) no proporcionan una solución. En cierta página, alguien propuso modificar un archivo de los descargados para la tarjeta ESP32, denominado sdkconfig, cambiando a la línea que contiene _BROWNOUT_DET=y, se le pone "n", para quedar como:

... _BROWNOUT_DET=n

Pero el colega que propuso esta solución indica que no le funcionó. Así que yo también modifiqué otro archivo:

sdkconfig.h

El cual contiene entre otras muchas la línea .... _BROWNOUT_DET=1

Así que por lógica, lo cambié por ..._BROWNOUT_DET= 0

Guardados ambos archivos, volví a compilar mi proyecto de ESP32 con Arduino y puede "subir" el software a la placa sin ningún problema. Al terminar de subir, de inmediato funcionó y sin mandar los molestos paquetes de error o reset.

Claro que bajé unos 4 datasheets del ESP32 para analizar un poco la cosa del registro que controla la detección de Brownout, que no es otra cosa que la detección del voltaje de alimentación que "baja" un poco por el consumo que hace el ESP32 al encender sus componentes diversos. También encontré que tiene 8 niveles de detección de niveles de voltaje, pero como lo he deshabilitado, ya no interesan de momento.

El problema real es cuando se arma un circuito con el ESP32, varios sensores, fuente y baterías de respaldo. En algún momento al funcionar con baterías, y estas agotarse un poco solamente, el ESP32 comenzará  a hacer sus RESETS, ante la asombro del diseñador.

Incluso si durante las prácticas se usa un cable USB largo (80 cm o mas), la caída de tensión será mas notoria. Es por eso que yo hice la maniobra en ambos archivos. Al principio quise aminorar el problema colocando un capacitor de 1000uF/10V entre Vin y Gnd del ESP32, pero no se quitó el problema.

Por último, he querido hacer lo mismo en Ubuntu, pero no encuentro los dichosos archivos....ayuda por favor...

Eso es todo....
<Nota: Editado>
Páginas (564):    1 458 459 460 461 462 564   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 292
Último miembro: Nicls_key
Temas del foro: 1,742
Mensajes del foro: 9,029
Últimos temas
Ordenar en un TableView
Foro: General
Último mensaje por: Shordi, Hace 3 horas
Respuestas: 3 - Vistas: 67
Odio a gb.Report
Foro: General
Último mensaje por: guizans, Ayer, 13:36
Respuestas: 9 - Vistas: 1,524
Reportes de Gambas
Foro: Aplicaciones/Fragmentos de Código
Último mensaje por: Alberto59, 27-10-2025, 16:34
Respuestas: 2 - Vistas: 1,321
Ordenando las carpetas
Foro: Programación en otros lenguajes
Último mensaje por: tercoide, 22-10-2025, 15:57
Respuestas: 0 - Vistas: 101
Powered By MyBB, © 2002-2025 MyBB Group.
Made with by Curves UI.