resolución en objetos picture VB 6.0


estoy haciendo una apliacion que habre un objeto picture y dibuja unas lineas en el, mi problema es el siguiente:

la conversion de dwips a centimetros (567) segun dice la mayoria, no es exacta................ alguien sabe cual es???????

de vez en cuando el Vb se hace la picha un lio y hace una linea fuera de sitio, por ejemplo picture1.line (x,y)-(x,j) pinta la linea en su sitio para x = a 2, 3, 4, 5 pero al llegar al seis no se porque la hace o mas arriba de donde toca o mas abajo de donde toca, muy poco pero lo suficiente como para que a simple vista se note, mas aun cuando x no es entero, es decir cuando x vale 2.5/3/3.5/4 ahi llega a solapar lineas podriais decirme como solucionarlo??????


saludos
</TR>

RE: resolución en objetos picture VB 6.0

El valor de conversión de milímetros a twips es exactamente de 56.7, es decir, tu medida en milímetros la debes multiplicar por 56.7 para traducir a twips y dividir en caso contrario.

Nunca me he encontrado que un picture dibuje una línea en otro lugar diferente al que yo le indico. Quizas tu problema radica en la precisión numérica que estés usando. Lo mejor es que trabajes con valores simples o doble (Single o Double) y en cualquier caso transformalo a single con el conversor.

Debes de comprobar también que no le envias datos convertidos de una cadena formateada ya que los conversores pueden no funcionar correctamente.

No obstante yo te aconsejo que le asignes una escala al objeto en el mismo sistema de coordenadas en el que estés trabajando

mipict.scale(minx,maxy)-(maxx,miny)

de esta forma te evitas tener que transformar a twips y transformar tu sistema al del picture.


Lo que no tiene solución es la forma en la que se representa una linea diagonal ya que desgraciadamente los monitores lo único que entienden son pixeles y no vectores. Cuando trazas una linea que no es ni horizontal ni vertical el sistema operativo transforma esa recta en una sucesión de puntos que en una serie (NxMy) se aproximan el máximo posible a la realidad pero con un efecto de escalonamiento imposible de eliminar.


Espero que esta nota te aclare tu problema.

Un cordial saludo
-Acalanto-</TR>

__________________
Un cordial saludo
-Acalanto-

Madrid - España

Visual Basic
Videos Programacion
Foro Programacion
Tutoriales Programacion

RE: resolución en objetos picture VB 6.0

espero que funcione gracias por tu tiempo</TR>

RE: resolución en objetos picture VB 6.0

Lamento decirte que no funciona.....................
Te mando una copia de uno de los botones de la pantalla.............

Private Sub Command14_Click()
Picture1.Picture = LoadPicture("c:appxxx
atlla.bmp"
‘ratlla.bmp es un fichero bmp de 10 cm. De altura ‘por 5 de ancho

Picture1.Scale (0, 50)-(100, 0)
‘ de acuerdo con las medidas y siguiendo tu consejo “mipict.scale(minx,maxy)-(maxx,miny)” le digo que dispone de cien medidas en alto y
‘cincuenta en alto (lo he probado al revés y tampoco rula)

i = 1 ‘ si el máximo es cien (100 mm.) y quiero una línea cada milímetro el paso será de uno
While i < 100
Picture1.Line (0, i)-(Picture1.Width / 2, i)’ esto tendría que hacer una línea cada “i” es decir cada milímetro
i = i + 1
Wend
Call SavePicture(Picture1.Image, "c:appxxxMyPicture.bmp"
‘mypicture.bmp es el fichero bmp resultante de 10 cm. De altura ‘por 4.999 de ancho

End Sub

Como podrás ver si lo ejecutas las líneas del fichero resultante no están separadas por un milímetro si no por lo que le sale de los webs , y si decides que el paso sea de ½ milímetro poniendo “Picture1.Scale (0, 50)-(200, 0)” la cosa empeora de forma alucinante.........!!!!!!!!!!

Te agradecería algún consejo de cómo solucionarlo

Gracias por tu tiempo y por tu amabilidad
</TR>

RE: resolución en objetos picture VB 6.0

Efectivamente, cuando las líneas se encuentran muy juntas se observa a simple vista un error en la precisión de la linea, haciéndose más patente a medida que las líneas se juntan.

El código que te remito intenta minimizar este efecto mediante el ajuste de la imágen a las dimensiones de la pantalla pero a pesar de todo se sigue notando.

Si descubro algúnu truco te lo haré saber, de todas formas tengo la impresión que es un problema de pixelado que será dificil evitar.

Un cordial saludo
-Acalanto-

__________________
Un cordial saludo
-Acalanto-

Madrid - España

Visual Basic
Videos Programacion
Foro Programacion
Tutoriales Programacion

RE: resolución en objetos picture VB 6.0

[cita title=Escrito originalmente por acalanto]Efectivamente, cuando las líneas se encuentran muy juntas se observa a simple vista un error en la precisión de la linea, haciéndose más patente a medida que las líneas se juntan.

El código que te remito intenta minimizar este efecto mediante el ajuste de la imágen a las dimensiones de la pantalla pero a pesar de todo se sigue notando.

Si descubro algúnu truco te lo haré saber, de todas formas tengo la impresión que es un problema de pixelado que será dificil evitar.

Un cordial saludo



Gracias........... mirare como va, el problema es que es para dibujar algo tipo escalado de termometro....... y claro las lineas a veces van muy juntas.......</TR>