Programación General > Delphi

 Duda en Delphi

(1/1)

chuli17:
Hola buenas, aber si me podeis echar una mano con este codigo, es de vb6:


--- Código: Visual Basic ---Private Sub Timer1_Timer()On Error Resume NextDim vIndex As VariantDim i As LongFor i = 1 To ListView1.ListItems.Count vIndex = Split(ListView1.ListItems(i))If Winsock1(vIndex(0)).State <> 7 Then ListView1.ListItems.Remove (i)End IfNext i End Sub 
bien lo traduci a delphi con un programa llamado delux, pero meda error en todos los sitios, si me pudieseis ayudar a traducirlo a delphi y a entender ese trozo codigo... os lo agradezco desde ya!
llevo 1 mes intentado pasalo a delphi pero sin logrosss  :oops:

chuli17:
Ya e conseguido que me valla el codigo porfin!!! aora tengo otro ploblema... e creado un cliente y un servidor con conexion inversa, pero cuando se conecta el servidor al cliente en el listview me sale repetido, osea dos veces, ¿que puedo acer para ke me salga una vez?? con mas que busco el google no me sale nada....

Rogerz:
oye pero almenos pudiste haber agregado el codigo o correccion que te soluciono las cosas...

jony33:
e creado un cliente y un servidor con conexion inversa, pero cuando se conecta el servidor al cliente en el listview me sale repetido, osea dos veces, ¿que puedo acer para ke me salga una vez?? con mas que busco el google no me sale nada....

Navegación

[0] Índice de Mensajes