Advertising
Navigation
Information

GTA 4 Tools

:

Creating your own mods

Handling Editor


Author: Paul Jay (Paulo Barca)
Date: 02.07.2012
Downloads: 31104 | Statistics
Filesize: 0.157 MB

Rating:
5.71 based on 309 votes

With this Handling Editor now is super easy to change value's on your GTA IV car's.

You are free to make a Donation for my work.

I can send the VB.NET Source with a simple Donation.

Contact me on my mail: [email protected]

Advertising
Download
Advertising
Report
Mod Report

Are you the owner of this mod? If someone has stolen your work, you can make a request for removing this mod.

Report this mod

Screenshots
Videos
Add a Youtube video

10 comments found
Name:


Comment text:


reload, if the code cannot be seen

Attention:
You need to be registered and signed in to post comments!
bobby111wwr
"Vic"
Vic
Comments: 0
Profile
Message
07.07.2012, 09:25

password plz................


RequiemKarga
"Vic"
Vic
Comments: 0
Profile
Message
12.07.2012, 08:11

şifreeeeeeeeeeeeeeee


RequiemKarga
"Vic"
Vic
Comments: 0
Profile
Message
12.07.2012, 08:11

şifreeeeeeeeeeeeeeee


RequiemKarga
"Vic"
Vic
Comments: 0
Profile
Message
12.07.2012, 08:12

gtainside.com şifreymiş fotodan gördüm .d


RequiemKarga
"Vic"
Vic
Comments: 0
Profile
Message
12.07.2012, 08:13

gtainside.com şifreymiş fotodan gördüm .d


spacekees
"Vic"
Vic
Comments: 0
Profile
Message
14.09.2012, 15:41

where is the password???

may i have the pasword plz?


spacekees
"Vic"
Vic
Comments: 0
Profile
Message
14.09.2012, 15:46

lol i got it didnt know the pasword is in rar file :)


jb183
"Vic"
Vic
Comments: 0
Profile
Message
20.01.2013, 06:03

DOES NOT WORK


Ardian89
"Vic"
Vic
Comments: 0
Profile
Message
16.02.2013, 14:12

I've seen you code it's simpe... nobodys want buy your gaycode here is it : Dim str6 As String = Conversions.ToString(Registry.LocalMachine.OpenSubKey("SOFTWARERockstar GamesGrand Theft Auto IV").GetValue("InstallFolder"))
Me.Button3.Enabled = False
Me.ComboBox1.Enabled = False
Me.TabControl1.Enabled = True
Dim reader As New StreamReader((str6 & "commondatahandling.dat"))
Me.TextBox1.Text = ""
Do While (reader.Peek <> -1)
Dim str2 As String = reader.ReadLine
If str2.Contains(Me.ComboBox1.Text) Then
Me.TextoOriginal.Text = str2
Exit Do
End If
Loop
Me.TextBox.Text = ""
Dim str As String = ""
Me.TextBox0.Text = str
Me.TextBox1.Text = str
Me.TextBox2.Text = str
Me.TextBox3.Text = str
Me.TextBox4.Text = str
Me.TextBox5.Text = str
Me.TextBox6.Text = str
Me.TextBox7.Text = str
Me.TextBox8.Text = str
Me.TextBox9.Text = str
Me.TextBox10.Text = str
Me.TextBox11.Text = str
Me.TextBox12.Text = str
Me.TextBox13.Text = str
Me.TextBox14.Text = str
Me.TextBox15.Text = str
Me.TextBox16.Text = str
Me.TextBox17.Text = str
Me.TextBox18.Text = str
Me.TextBox19.Text = str
Me.TextBox20.Text = str
Me.TextBox21.Text = str
Me.TextBox22.Text = str
Me.TextBox23.Text = str
Me.TextBox24.Text = str
Me.TextBox25.Text = str
Me.TextBox26.Text = str
Me.TextBox27.Text = str
Me.TextBox28.Text = str
Me.TextBox29.Text = str
Me.TextBox30.Text = str
Me.TextBox31.Text = str
Me.TextBox32.Text = str
Me.TextBox33.Text = str
Me.TextBox34.Text = str
Me.TextBox35.Text = str
Me.TextBox36.Text = str
Me.ExportTXT.Text = str
Dim array As String() = Me.TextoOriginal.Text.Split(New Char() { ChrW(9) })
Dim num3 As Integer = Information.UBound(array, 1)
Dim i As Integer = 0
Do While (i <= num3)
Me.TextBox.Text = (Me.TextBox.Text & array(i) & " ")
i += 1
Loop
Dim text As String = Me.TextBox.Text
Do While [text].Contains(" ")
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
If [text].Contains(" ") Then
Do While [text].Contains(" ")
[text] = [text].Replace(" ", " ")
Loop
End If
Loop
Me.TextBox.Text = Strings.Trim([text])
Dim strArray As String() = Me.TextBox.Text.Split(New Char() { " "c })
Dim num4 As Integer = Information.UBound(strArray, 1)
Dim j As Integer = 0
Do While (j <= num4)
Me.TextBox0.Text = strArray(0)
Me.TextBox1.Text = strArray(1)
Me.TextBox2.Text = strArray(2)
Me.TextBox3.Text = strArray(3)
Me.TextBox4.Text = strArray(4)
Me.TextBox5.Text = strArray(5)
Me.TextBox6.Text = strArray(6)
Me.TextBox7.Text = strArray(7)
Me.TextBox8.Text = strArray(8)
Me.TextBox9.Text = strArray(9)
Me.TextBox10.Text = strArray(10)
Me.TextBox11.Text = strArray(11)
Me.TextBox12.Text = strArray(12)
Me.TextBox13.Text = strArray(13)
Me.TextBox14.Text = strArray(14)
Me.TextBox15.Text = strArray(15)
Me.TextBox16.Text = strArray(&H10)
Me.TextBox17.Text = strArray(&H11)
Me.TextBox18.Text = strArray(&H12)
Me.TextBox19.Text = strArray(&H13)
Me.TextBox20.Text = strArray(20)
Me.TextBox21.Text = strArray(&H15)
Me.TextBox22.Text = strArray(&H16)
Me.TextBox23.Text = strArray(&H17)
Me.TextBox24.Text = strArray(&H18)
Me.TextBox25.Text = strArray(&H19)
Me.TextBox26.Text = strArray(&H1A)
Me.TextBox27.Text = strArray(&H1B)
Me.TextBox28.Text = strArray(&H1C)
Me.TextBox29.Text = strArray(&H1D)
Me.TextBox30.Text = strArray(30)
Me.TextBox31.Text = strArray(&H1F)
Me.TextBox32.Text = strArray(&H20)
Me.TextBox33.Text = strArray(&H21)
Me.TextBox34.Text = strArray(&H22)
Me.TextBox35.Text = strArray(&H23)
Me.TextBox36.Text = strArray(&H24)
j += 1
Loop
Me.Label2.Text = "Data Loaded"
Me.Timer1.Enabled = True
End Sub


Ardian89
"Vic"
Vic
Comments: 0
Profile
Message
16.02.2013, 14:13

and pw is : gtainside.com