FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
No se traducir un codigo VB
Buenas a todos,
Tengo un componente activex para conectarme contra una camaraip de videovigilancia, hasta aquí bien ya que tengo importado dicha activex. El problema viene que tengo un ejemplo en VB que funciona i que intento pasar a Delphi y no se. el codigo vb original pone [VB] Set theBuilder = New JxGraphicBuilder theBuilder.JoinPin theBuilder.Decoder, JxMjpegBox1.Displayer Dim theFilter As JxMjpegFilter Set theFilter = theBuilder.Filter theFilter.Mode = JX_FILTER_FIND_ONLY_JPEG_PICTURE Dim theDecoder As JxMjpegDecoder Set theDecoder = theBuilder.Decoder theDecoder.Mode = JX_DECODER_IJL [/VB] entiendo lo que hace declar unas varibles y les asigna valores el problema es que no se como hacer el New ya que JxGraphicBuilder es una clase que viene en el activex pero que no tiene metodo constructor. he intentado hacer lo siguiente. Código Delphi [-] // primero declarar las variables theBuilder : JxGraphicBuilder; theFilter : JxMjpegFilter; theDecoder : JxMjpegDecoder; // despues el siguiente codigo theBuilder.JoinPin(theBuilder.Decoder,mjpg.Displayer ); theFilter := IJxMjpegFilter(theBuilder.Filter); theFilter.Mode := JX_FILTER_FIND_ONLY_JPEG_PICTURE; theDecoder := IJxMjpegDecoder(theBuilder.Decoder); theDecoder.Mode := JX_DECODER_IJL; El compilado no peta pero al ejecutar el codigo peta en la primera linia ya que theBuilder no esta creado. Alguien sabe que deberia hacer. Muchisimas gracias. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Traducir excepciones | JulioGO | Firebird e Interbase | 1 | 15-02-2005 17:47:32 |
Traducir un codigo de VB a Delphi ¡¡¡¡ Por favor !!!! | Betsa23 | Internet | 2 | 30-11-2004 16:29:35 |
Traducir texto a voz | Jose Manuel | API de Windows | 1 | 27-04-2004 22:37:28 |
traducir errores | fjolivares | Firebird e Interbase | 1 | 30-12-2003 16:33:39 |
Traducir aplicación | Sick boy | Varios | 4 | 29-09-2003 13:09:22 |
|