create a list item only once inside a while loop ?

[Alexxander]

Hi all

how can i create a list item only once inside a while loop ?

server

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("Form1", 615, 227)
$Mainlist = GUICtrlCreateListView("PC Name|Operating system", -1, -1, 615, 227)
GUISetState()
Global $TCPAccept
TCPStartup()
$MainSocket = TCPListen(@IPAddress1, 1234)

While 1
        $TCPRecv = TCPRecv($TCPAccept, 999999999)
        If @error Then _TCPAccept()
        If $TCPRecv <> "" Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)
        Sleep(100)
WEnd

Func _TCPAccept()
        GUICtrlSetData($Mainlist, "")
        Do
                $TCPAccept = TCPAccept($MainSocket)
        Until $TCPAccept <> -1
        GUICtrlSetData($Mainlist, "")
EndFunc   ;==>_TCPAccept

when i run the client 

i get this

i only want to create it once , any ideas ?

Edited October 14, 2013 by Alexxander

[mLipok]

change:

If $TCPRecv <> "" Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

to something like this:

If $TCPRecv = "My Message" Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

TIP:

You just have to establish your kinds of messages you want to analyze.

EDIT:

example:

if message starts from: "PCXYZ: ....." where XYZ is a digit

If StringRegExp($TCPRecv,"PC\d{3}\:",0) = 1 Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

Edited October 14, 2013 by mlipok

[Alexxander]

 

change:

If $TCPRecv <> "" Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

to something like this:

If $TCPRecv = "My Message" Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

TIP:

You just have to establish your kinds of messages you want to analyze.

EDIT:

example:

if message starts from: "PCXYZ: ....." where XYZ is a digit

If StringRegExp($TCPRecv,"PC\d{3}\:",0) = 1 Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

i changed it to

If $TCPRecv = "My Message" Then GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)

but still the same

my problem is not verifying the data 

my problem is i want to create only 1 item when any data is received only 1 item

[mLipok]

my problem is i want to create only 1 item when any data is received only 1 item

 

??

I do not understand.

Do you mean that for each client you want to have only one item in the ListView?

Or did you mean that it was always one item on the ListView, regardless of how many clients and how much messages will be sent.

Edited October 14, 2013 by mlipok

[Alexxander]

 

Do you mean that for each client you want to have only one item in the ListView?

exactly

[mLipok]

Here you have an example (untested) idea:

$aPC = StringRegExp($TCPRecv, "PC\d{3}\:", 3)
If IsArray($aPC) = 1 Then
    $sPC = $aPC[0]
    $vIndex = _GUICtrlListView_FindText($Mainlist, $sPC)
    If $vIndex <> -1 Then
        _GUICtrlListView_SetItemText($Mainlist, $vIndex, StringTrimLeft($TCPRecv, StringLen($sPC)), 1
    Else
        _GUICtrlListView_AddItem($Mainlist, $sPC)
        _GUICtrlListView_AddSubItem($Mainlist, $vIndex, StringTrimLeft($TCPRecv, StringLen($sPC)), 1)
    EndIf
EndIf

[Blinky]

$buffer=""
While 1
        $TCPRecv = TCPRecv($TCPAccept, 999999999)
        If @error Then _TCPAccept()
        If $TCPRecv <> "" And $TCPRecv <>$buffer Then 
            GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)
            $buffer=$TCPRecv
        EndIf
        Sleep(100)
WEnd

Edited October 14, 2013 by Blinky

[mLipok]

$buffer=""
While 1
        $TCPRecv = TCPRecv($TCPAccept, 999999999)
        If @error Then _TCPAccept()
        If $TCPRecv <> "" And $TCPRecv <>$buffer Then 
            GUICtrlCreateListViewItem("new" & "|" & $TCPRecv, $Mainlist)
            $buffer=$TCPRecv
        EndIf
        Sleep(100)
WEnd

 

is that better ?

$buffer &= $TCPRecv

[Alexxander]

 

is that better ?

$buffer &= $TCPRecv

 

nope none works for me

i think i must use arrays im now watching a TUT on YB about arrays  i hope it will help

but that u all guys