FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ejemplo en VB para convertir a Delphi
Hola a todos.
Tengo una situación un poco crítica. Puede alguno ayudarme a reescribir este procedimiento en Delphi? Private Sub Command1_Click() Dim sAux As String Dim lAux As Long Dim lreturn As Long Const FLD_XNUMBER = 6 sAux = Chr$(&H4) & Chr$(&H2) AddField sAux sAux = Chr$(&H0) & Chr$(&H0) AddField sAux Call SendCommand 'Initialize string sAux = Space(10) 'Debug to check answer 'no time out. just for debugging lreturn = 1 lreturn = GetMessageField(sAux, lAux, FLD_XNUMBER) DoEvents MsgBox (sAux) End Sub Funciona perfectamente en VB. He hecho de todo pero en Delphi no me funciona. Muy agradecido anticipadamente. Saludos. Fabio. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Ejemplo sencillo para ejecutar Hilos en delphi | n03l | Varios | 4 | 23-08-2012 15:23:27 |
Un ejemplo para hacer un Telnet | Rafael Reina | Internet | 1 | 17-07-2006 13:17:14 |
Ejemplo para un viejo clippero | lbidi | Varios | 1 | 18-01-2006 15:39:04 |
AnyNET-Delphi Beta2: Una herramienta para convertir de .NET a Delphi.NET | mamcx | Noticias | 3 | 01-10-2005 01:27:09 |
Principiante PHP Requiere ejemplo para dummy | ASAPLTDA | PHP | 1 | 12-09-2005 16:58:14 |
|