Visual Basic kod 3 tane offset ekleyince hata vermesi

ozistik · 27 May 2022

Merhaba çok basit bir kod yazdım fakat 3 offset ekleyince hata veriyor. Nasıl çözebilirim?
Kod:

Yanlış bir şey mi var? Yardımcı olabilir misiniz?

hzberqay · 27 May 2022

virtual basicle yazdıysan başka bi programdan yazıp masaüstü yerine değilde dosya açıp onun içinde kaydetip denermisin

ozistik · 27 May 2022

hzberqay' Alıntı:
virtual basicle yazdıysan başka bi programdan yazıp masaüstü yerine değilde dosya açıp onun içinde kaydetip denermisin

Başka dil bilmiyorum.
WritePointerInteger dosyası falan diyorlar o bende yok bulamıyorum da. Nereden bulurum onu da bilmiyorum.

MetehanTR · 27 May 2022

4. hata mesajı kendini açıklayıcı değil mi?
'Genel Geçersiz Kılınabilir Aşırı Yüklemeler İşlevi Ekle(Dize Olarak ÖğeAdı, Tamsayı Olarak Satın Al?, Tamsayı Olarak Satış Fiyatı?) Tamsayı Olarak Ekle' için çok fazla argüman var

Şu adreste 6 argüman geçiriyorsunuz:
WriteInteger("oyunadı", &Hpointer, &Hoffset, &Hoffset, &Hoffset, xx)

Belki istersin:
TA.Insert("oyunadı", &Hpointer, &Hoffset, xx)

ozistik · 27 May 2022

MetehanTR' Alıntı:
TA.Insert("oyunadı", &Hpointer, &Hoffset, xx)

TA.Insert("oyunadı", &Hpointer, &Hoffset, xx)

Okudum ama pek bi halt anlamadım desem yeridir. Kod bu mu reis? Bunu mu deneyeyim?

MetehanTR · 27 May 2022

ozistik' Alıntı:
TA.Insert("oyunadı", &Hpointer, &Hoffset, xx)

Okudum ama pek bi halt anlamadım desem yeridir. Kod bu mu reis? Bunu mu deneyeyim?

" &Hoffset, &Hoffset, &Hoffset, " bunu tekrarlı bir şekilde yazmana gerek yok. Bir kere yazsan yeterli, argümanı tekrarlı yazdığın için hata veriyor. Her argümanı bir kere yazman yeterli olacaktır kod satırında.

ozistik · 27 May 2022

Rica etsem 3 offsetli örnek kod yazar mısın? Cidden anlamadım özür diliyorum.

MetehanTR · 27 May 2022

ozistik' Alıntı:
Rica etsem 3 offsetli örnek kod yazar mısın? Cidden anlamadım özür diliyorum.

" OFFSET (reference, rows, cols, [height], [width]) "
referans - Hücre referansı veya aralığı olarak sağlanan başlangıç noktası.
rows - Başlangıç referansının altında kaydırılacak satır sayısı.
cols - Başlangıç referansının sağına kaydırılacak sütun sayısı.
height - [isteğe bağlı] Döndürülen referansın satırlarındaki yükseklik.
width - [isteğe bağlı] Döndürülen başvurunun sütunlarındaki genişlik.

ozistik · 27 May 2022

Onları Google'dan da buldum. String sorunu da yaşıyordum onu örnekle anlatmışlar da rahat anladım. Bunu komple üst düzey yazılımcı gözüyle yazdıklarından dolayı anlamadım. Bundan mütevellit örnek kod istedim dostum.

hzberqay · 27 May 2022

ozistik' Alıntı:
Başka dil bilmiyorum.
WritePointerInteger dosyası falan diyorlar o bende yok bulamıyorum da. Nereden bulurum onu da bilmiyorum.

yandex üzerinden hepsi çıkıyor onu ordan bulabilirsin bi bak derim

katimur94 · 29 May 2022

Kod:

Public Sub WritePointerFloat(ByVal EXENAME As String, ByVal Pointer As Integer, ByVal Value As Single, ByVal ParamArray Offset As Integer())
        If Process.GetProcessesByName(EXENAME).Length <> 0 Then
            Dim Handle As Integer = Process.GetProcessesByName(EXENAME)(0).Handle
            If Handle <> 0 Then
                For Each I As Integer In Offset
                    ReadMemoryInteger(Handle, Pointer, Pointer)
                    Pointer += I
                Next
                WriteMemoryFloat(Handle, Pointer, Value)
            End If
        End If
    End Sub
   
   
   
   
    WritePointerInteger("Oyunadi",&HPointer,xx,&HOffset1)
        Or
    WritePointerInteger("Oyunadi",&HPointer,xx,&HOffset1, &HOffset2)
        Or
    WritePointerInteger("Oyunadi",&HPointer,xx,&HOffset1, &HOffset2,&HOffset3)

ozistik · 29 May 2022

katimur94' Alıntı:

Kod:

Public Sub WritePointerFloat(ByVal EXENAME As String, ByVal Pointer As Integer, ByVal Value As Single, ByVal ParamArray Offset As Integer())
        If Process.GetProcessesByName(EXENAME).Length <> 0 Then
            Dim Handle As Integer = Process.GetProcessesByName(EXENAME)(0).Handle
            If Handle <> 0 Then
                For Each I As Integer In Offset
                    ReadMemoryInteger(Handle, Pointer, Pointer)
                    Pointer += I
                Next
                WriteMemoryFloat(Handle, Pointer, Value)
            End If
        End If
    End Sub
  
  
  
  
    WritePointerInteger("Oyunadi",&HPointer,xx,&HOffset1)
        Or
    WritePointerInteger("Oyunadi",&HPointer,xx,&HOffset1, &HOffset2)
        Or
    WritePointerInteger("Oyunadi",&HPointer,xx,&HOffset1, &HOffset2,&HOffset3)

Bunu kopyala yapıştır yapayım da direkt butona yapsam sorun olur mu?

Post automatically merged: 29 May 2022

Birde nereleri değiştireceğimi söyler misin

katimur94 · 2 Haz 2022

ozistik' Alıntı:
Bunu kopyala yapıştır yapayım da direkt butona yapsam sorun olur mu?

Post automatically merged: 29 May 2022

Birde nereleri değiştireceğimi söyler misin

yani Basic Bilgin olmadigini anliorum suan

üsteki Fonksion öyle kalsin alta yazilani Butona ekleye bilirsin ama sana önerim Basicleri bari ögren

Visual Basic kod 3 tane offset ekleyince hata vermesi

Benzer Konular

Privacy & Transparency

Privacy & Transparency