• Trainer
  • Forums
  • Suche
  • Members
  • Kalender
  • Hilfe
  • Extras
Forum stats
Show team
Neue Beiträge ansehen
Heutige Beiträge ansehen
Home of Gamehacking - Archiv
Login to account Create an account
Login
Benutzername:
Passwort: Passwort vergessen?
 



  Home of Gamehacking - Archiv Coding Visual Basic 6, VB.NET
1 2 3 4 Weiter »
String Auslesen?

Seiten (3): 1 2 3 Weiter »
Ansichts-Optionen
String Auslesen?
chesar Offline
Member
***
Beiträge: 218
Themen: 36
Registriert seit: Aug 2010
Bewertung: 0
#1
04.03.2012, 12:39
Moin Moin,
sagt mal wie kann ich eigentlich ein String auslesen? z.b. ein Namen.
Ich Trainer Modul ist ja keine Funktion dafür.

Danke euch schon mal....
Suchen
Antworten
Bluespide Offline
Member
***
Beiträge: 96
Themen: 14
Registriert seit: Jun 2010
Bewertung: 0
#2
04.03.2012, 15:47 (Dieser Beitrag wurde zuletzt bearbeitet: 04.03.2012, 15:50 von Bluespide.)
Die bytes normal auslesen und dann:

Code:
.       Dim enc As System.Text.Encoding = System.Text.Encoding.Default
        Dim s As String = enc.GetString(ausgelesenebytes)

Suchen
Antworten
chesar Offline
Member
***
Beiträge: 218
Themen: 36
Registriert seit: Aug 2010
Bewertung: 0
#3
04.03.2012, 16:49
Wie kann ich den String dann in einer TextBox anzeigen?

Sorry das ich mich so glatt anstelle, bin noch nich ganz da -.-
Suchen
Antworten
Hatschi
Unregistered
 
#4
04.03.2012, 17:05

Code:
Textbox1.Text = s

Antworten
chesar Offline
Member
***
Beiträge: 218
Themen: 36
Registriert seit: Aug 2010
Bewertung: 0
#5
04.03.2012, 17:24
Ich lese die bytes in eine TextBox

Code:
GetProcessId(ProcName)
        TextBox3.Text = Read_Long(&H5848EFC)

Und in einer Anderen Text Box soll dann der Sting Stehen.

und dann?

Suchen
Antworten
Bluespide Offline
Member
***
Beiträge: 96
Themen: 14
Registriert seit: Jun 2010
Bewertung: 0
#6
04.03.2012, 17:30

Code:
1
2
3
4
5
6
.       GetProcessId(ProcName)
        Dim value As Long = Read_Long(&H5848EFC)
        TextBox3.Text = value.ToString()
        Dim bytes() = BitConverter.GetBytes(value)
        Dim enc As System.Text.Encoding = System.Text.Encoding.Default
        TextBox4.Text = enc.GetString(bytes) '<-- String

Suchen
Antworten
chesar Offline
Member
***
Beiträge: 218
Themen: 36
Registriert seit: Aug 2010
Bewertung: 0
#7
04.03.2012, 18:40
Danke dir....
Suchen
Antworten
chesar Offline
Member
***
Beiträge: 218
Themen: 36
Registriert seit: Aug 2010
Bewertung: 0
#8
04.03.2012, 18:50 (Dieser Beitrag wurde zuletzt bearbeitet: 04.03.2012, 19:58 von chesar.)
OK, noch ein kleines Problem.
Wenn ich die bytes ausgelesen habe.

z.b. 2036621644 = Lady

So wird nicht der ganze Name in der Textbox wiedergegeben.
Es müsst stehen Lady Blood

In CE habe ich Text und Länge 20


Read_Long -> Ein Long -> 8 Bytes
System.Text.Encoding.Default -> Könnte Unicode sein
1 Unicode-Char entspricht 2 Bytes
8 Bytes / 2 Bytes = 4
Suchen
Antworten
Bluespide Offline
Member
***
Beiträge: 96
Themen: 14
Registriert seit: Jun 2010
Bewertung: 0
#9
05.03.2012, 05:35
Bastel dir einfach selber eine Funktion die den String bis zum ende ausließt, in etwa so:

Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
.   Private Function ReadStringUnicode(ByVal Adress As Integer) As String
        Dim enc As System.Text.Encoding = System.Text.Encoding.Unicode
        Dim str As String = ""
        Dim tByte As Integer = 0
        Do
            tByte = Module2.ReadByte(Adress)
            If tByte = 0 Then
                str += enc.GetString({tByte})
                Exit Do
            Else
                str += enc.GetString({tByte, Module2.ReadByte(Adress + 1)})
                Adress += 2
            End If
        Loop
        Return str
    End Function

Suchen
Antworten
chesar Offline
Member
***
Beiträge: 218
Themen: 36
Registriert seit: Aug 2010
Bewertung: 0
#10
05.03.2012, 19:44
einfach :P das sagst du so "Einfach" :sleepy:

Wie meinst du das mit Module2? Kann ich das in de Trainermodul mit einfügen?
Wie lesen ich dann den String aus?
Fragen über Fragen ich weiß.... Angel

Danke danke dir.........

Suchen
Antworten
Share Thread:            
Seiten (3): 1 2 3 Weiter »


  • Druckversion anzeigen
  • Thema abonnieren


Benutzer, die gerade dieses Thema anschauen:
2 Gast/Gäste

  • Kontakt
  • Forum team
  • Forum stats
  • Nach oben
 
  • RSS-Synchronisation
  • Lite mode
  • Home of Gamehacking - Archiv
  • Help
 
Forum software by © MyBB - Theme © iAndrew 2014



Linearer Modus
Baumstrukturmodus