Tai Kamiya

The file is offline.

Hi guys, the title says it all. There's in an way to make the GUI buttons in EO 2.3 close their respective menus just by clicking in them again?

I tried in EO3.0/Advanced and it didn't work. I don't know if it supposed to, beucase there's no compilation or VB errors. Anyone know what is causing it? Maybe the code need be modified in any part?

> No delete this code its not needed > > ``` > > Set Buffer = New clsBuffer > > Buffer.WriteBytes Data() > > Dim attackingplayer As String > > attackingplayer = Buffer.ReadLong > > Set Buffer = Nothing > > ``` > > also delete this line in client checkattack sub > > ``` > > Buffer.WriteLong MyIndex > > ``` , Gzz, sorry for the mistake! This one is working well, thank'ya again! 

> i havent got access to vb6 right now so replace your code with mine and tell me if it works > > ``` > > Dim Buffer as clsBuffer > > Set Buffer = New clsBuffer > > Buffer.WriteLong SAttack > > Buffer.WriteLong Index > > SendDataToMap GetPlayerMap(index), Buffer.ToArray() > > Set Buffer = Nothing > > ``` Aw, yep! Worked as pie. My very thanks to you, bro. And if anyone need the final code, here it goes: ``` Dim Buffer As clsBuffer Set Buffer = New clsBuffer Buffer.WriteBytes Data() Dim attackingplayer As String attackingplayer = Buffer.ReadLong Set Buffer = Nothing Set Buffer = New clsBuffer Buffer.WriteLong SAttack Buffer.WriteLong index SendDataToMap GetPlayerMap(index), Buffer.ToArray() Set Buffer = Nothing ```

> No. In wich line does the error show up? > > Also sending MyIndex to the server in the checkattck sub its extra uneeded work since attackingplayer will always be equal to index Hi there, thanks for the reply and sorry for any english mistake, I'm brazilian. My final code stands as this: ``` 'SendAttack index Dim Buffer Set Buffer = New clsBuffer Buffer.WriteBytes Data() Dim attackingplayer As String attackingplayer = Buffer.ReadLong Buffer.WriteLong SAttack Buffer.WriteLong attackingplayer SendDataToMap GetPlayerMap(index), Buffer.ToArray() Set Buffer = Nothin ``` And the error happens in the line ``` SendDataToMap GetPlayerMap(index), [b]Buffer.ToArray()[/b] ```

Hey guys, sorry for the post in an old topic, but I've got a problem. When I try to compile, I get the error: **"Compile Error:** **Type Mistach:array or user-defined type expected."** in ``` Set Buffer = New clsBuffer Buffer.WriteLong SAttack Buffer.WriteLong attackingplayer SendDataToMap GetPlayerMap(index), Buffer.ToArray() Set Buffer = Nothing ``` Ain't I suppose to specify Buffer.ToArray() putting "index" in ()?