Rysowanie po oknie gry

Odpowiedz Nowy wątek
2009-12-31 12:48
0

Witam ! Chciałbym wyświetlić pewien napis na oknie gry ( Call of Duty 4 ) Napisałem procedure lecz nie działa moglibyście rzucić na to okiem ?

procedure DrawString(Context: hdc; X,Y: integer; COLOR: colorref; CENTER: bool; TEXT: char);
begin

end;

I w Taimerze wstawiłem

 procedure TForm8.Timer2Timer(Sender: TObject);
begin
if GetProcessId('iw3mp.exe', PidID, 1) then
begin
StatusBar.Panels[0].Text := 'Wykryto Call of Duty 4';
  WriteArray($00445480,W_OFF);
     WriteArray($00456E78,L_OFF);
        WriteArray($00457CCF,NR_OFF);
               DrawString(dc, 500, 400, ColorToRGB(clBlue), true, 'h');
           DrawString(dc, 500, 400, ColorToRGB(clBlue), true, 'h');
           DrawString(dc, 500, 400, ColorToRGB(clBlue), true, 'h');
           DrawString(dc, 500, 400, ColorToRGB(clBlue), true, 'h');

end else
StatusBar.Panels[0].Text := 'Nie wykryto CoD4 !';
end;

gdzie

 dc : HDC;

Pozostało 580 znaków

2010-01-01 20:42
0
  WriteArray($00445480,W_OFF);
  WriteArray($00456E78,L_OFF);
  WriteArray($00457CCF,NR_OFF);

Co to jest? Co to za magiczne wartości? I skąd się u ciebie bierze dc?

Pozostało 580 znaków

2010-01-02 11:47
0

WriteArray to funkcja odpowiadająca za wpisanie do odpowiedniego adresu pamięci danej wartosci bajtów przypisanych kluczami ( N_OFF - NameTagi Wyłączone ) itd. dc - właśnie aktywny handle? tak mi sie wydawało jeżeli gdzieś jest błąd bardzo bym prosił o poprawienie mnie - i czy może poprostu zacząć to rysować używająć Canvas... itd.

Pozdrawiam

Pozostało 580 znaków

Odpowiedz
Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0