1200 user online
Mod DB
Latest Mods
Featured Mods
Upload
Videos
Tutorials
FAQ
Search
 

Information

GTA IV Tools: Creating your own mods

Handling Editor


Author: Paul Jay (Paulo Barca) | Email
Date: 02.07.2012 | 19042 Downloads
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: paulobarca_7@hotmail.com
Download
Advertising
Favorites
Here you can add this modification to your personal favorites.
Advertising
Report
Are you the owner of this mod? If someone has stolen your work, you can make a request for removing this mod.
Screenshots
Handling Editor

Videos
Add new
Video.


Comments | 10 posts so far
Your Name/Nick:


Your Message:


Smileys:



Attention:
You need to be registered and signed in to post comments!
16.02.2013, 15:13

and pw is : gtainside.com
Quote |
(0 likes)
16.02.2013, 15: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("SOFTWARE\Rockstar Games\Grand Theft Auto IV").GetValue("InstallFolder"))
Me.Button3.Enabled = False
Me.ComboBox1.Enabled = False
Me.TabControl1.Enabled = True
Dim reader As New StreamReader((str6 & "\common\data\handling.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
Quote |
(0 likes)
20.01.2013, 07:03

DOES NOT WORK
Quote |
(0 likes)
14.09.2012, 17:46

lol i got it didnt know the pasword is in rar file :)
Quote |
(0 likes)
14.09.2012, 17:41

where is the password???

may i have the pasword plz?
Quote |
(0 likes)
12.07.2012, 10:13

gtainside.com &#351;ifreymi&#351; fotodan gördüm .d
Quote |
(0 likes)
12.07.2012, 10:12

gtainside.com &#351;ifreymi&#351; fotodan gördüm .d
Quote |
(0 likes)
12.07.2012, 10:11

&#351;ifreeeeeeeeeeeeeeee
Quote |
(0 likes)
12.07.2012, 10:11

&#351;ifreeeeeeeeeeeeeeee
Quote |
(0 likes)
07.07.2012, 11:25

password plz................
Quote |
(0 likes)