SoloCodigo

Si quieres que incluya otras cosillas puedes hacer, por ejemplo, la gestión de un cibercafé (tienes varios ejemplos/guías por Internet).

Buenas.

No trabajo mucho con Crystal, pero prueba a pasarle el drivername y el port además del nombre.

reporte.PrinterName = Printer.DeviceName
reporte.DriverName = Printer.DriverName
reporte.PrinterPort = Printer.Port

Saludos a tod@s.

Estoy haciendo un programa que empieza con un formulario Mdi padre.

Lo que me gustaría saber es si hay alguna manera de evitar el poder modificar el tamaño del formulario Mdi mientras se esta ejecutando y esconder el boton de maximizar.

Los otros formularios tienen la opcion para evitar esto, pero los Mdi no.

   Escribo una solucion que pense por si a alguien le interesa. Pero no me gusta porque todavía permite modificar el tamaño aunque luego vuelve al estado que yo quiero.


¿sabe alguien si hay alguna otra manera?

Gracias de antemano.

Siento responder tan tarde.

Miraré a ver si localizo a la persona que me lo pasó, pero posiblemente tengas razon y sea la versión de las tablas.

Espero que encuentres la solucion y si es posible la pongas en el foro. Suerte.

Todavía no lo he probado, pero un compañero me dejo este codigo:

Dos cosillas antes:

Una, recordar referenciar a Microsoft ActiveX Data Objects 2.7 library

Y la otra es , por si acaso no podeis abrir las tablas de paradox por que os da problemas de que la tabla esta mal, etc, es instalar Borland Database Engine, que se puede descargar de softonic o terra
   
   Código:

   Private Sub Form_Load()

      Dim cnn As ADODB.Connection
      Dim SQL As String
      Dim mirs As ADODB.Recordset
      Set cnn = New ADODB.Connection

      cnn.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\DIRECCION;Extended Properties=Paradox 5.X;")


           Set vRs = New ADODB.Recordset
           vRs.Open "select * from Clientes", cnn, adOpenForwardOnly, adLockReadOnly
           If Not vRs.EOF Then
              While Not vRs.EOF
                  Debug.Print vRs(1)
                  vRs.MoveNext
              Wend
           End If

   End Sub

- Prueba y nos cuentas

Hace tiempo tuve el mismo problema y la única solución con la que di fue subir las imágenes a la base de datos y llamarla desde el crystal al hacer los reportes.  Esto no sería aconsejable si se utiliza muchas imágenes, puesto que aumentaría considerablemente el tamaño de la base de datos.

Ahora mismo no te puedo decir cuales, pero solo admitía un par de formato de imágenes.

si es por dar ideas...

Prueba, cuando limpies la ventana, a cambiar el style del combo. Entonces, me imagino que te permitira micombo.listindex = -1.

Una vez hecho esto, vuelves a dejar el style del combo como estaba.