Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

Shasokais

Members
  • Posts

    62
  • Joined

  • Last visited

    Never

Posts posted by Shasokais

  1. When i try create new char i see error on server.

    In ModPlayer

    ```
    ' Send Resource cache
    For i = 0 To ResourceCache(GetPlayerMap(Index)).Resource_Count <====here
    SendResourceCacheTo Index, i
    Next

    ```
    Oh no it's my fault forgot to spawn point

    How pickup item on ground? I click LMB and RMB, but nothing happen
  2. Guys i have error

    ```

    Private Sub SSTab1_Click(PreviousTab As Integer)
    Dim strload As String
    Dim i As Long
    Dim TotalCount As Long

    If frmServer.SSTab1.Tab = 3 Then
        frmServer.lstaccounts.Clear
        strload = Dir(App.path & "\data\accounts\" & "*.bin")
        i = 1
        Do While strload > vbNullString
            frmServer.lstaccounts.AddItem Mid(strload, 1, Len(strload) - 4)
            strload = Dir
            i = i + 1
        Loop

        TotalCount = (i - 1)

        With frmServer
        .TextName.Text = vbNullString
        .TextPass.Text = vbNullString
        .TextCount.Text = Format(Date, "m/d/yyyy")
        .ChkMember.Value = 0
        .lblAcctCount.Caption = "" & TotalCount
        End With
    End If
    End Sub
    ```
    on .Clear and .AddItem

    Metod or data member not found

    Help please!
  3. Still have problem with chat:

    I replaced the fonts, everything works fine. But here's the problem with chat. If you enter a message from a client that are entered incorrectly characters (I need Cyrillic).

    ![](http://i.imgur.com/QwY3xdw.jpg)

    However, the message from the server is displayed correctly:

    ![](http://i.imgur.com/ks3943s.jpg)

    I tried to change this():

    > ' Set font
    >
    >     'Call SetFont(FONT_NAME, FONT_SIZE)
    >     frmMain.Font = "Verdana"
    >     frmMain.FontSize = 10

    But nothing to work(((
×
×
  • Create New...