Delphi De Yazılan Bir Programı Hakkında Yardım
-
merhaba
arkadaşlar delphide bir program yazıyom.Bu program devamlı o bilgisayardan spam mail gönderiyor.yalnız tek sorunum şu bu program kapatınca çalışmıyor.
ben kapantıca arka planda çalışmasını istiyom bunun için ne yapmam lazım.
Yardımlarınız bekliyom -
bu kod systemtrayda gösterir(saatin yanında) birde popupmenu koy sağ tıklağında çıkacak seçenekleri falanda ayarla ii olur biraz bızıkla
evde olasaydım yapmayın yapılmışı war tarzı bişi yapardım ama evde değilim
Uses
ShellApi;
Var
stray:NOTIFYICONDATA;
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
with stray do
begin
cbsize:=sizeof(stray);
wnd:=form1.handle;
hicon:=Application.icon.Handle;
uID:=0;
sztip:='mouseyi üstüne getirdiğinde gözükücek yazıyı yaz';
uflags:=7;
uCallBackMessage:=$200;//icon üzerine tıklama kontrolu için
end;
Shell_NotifyIcon(0,@stray);
end;
//Üstteki Kodu yazmak yeterlidir.
Shell_NotifyIcon(2,@stray);//Gizlemek
Shell_NotifyIcon(1,@stray);//Yenilemek
//$205 farenin sağ tuşuna basılması
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var nokta:TPoint;
begin
getCursorPos(nokta);
if (x=$205) then PopupMenu1.Popup(nokta.x,nokta.y);
end;
-
şölede bişey yapabilirsin
system tray dışında programa kapat tarzında bitane buton koyarsın
hangi formsa işte form1.hide; gibisinden bişey yaparsan arka plandada çalışmaya devam eder -
şimdi arkadaşım diğer yöntemler karışık sana en basidini sölüyorum form un events özelliğinden onclose bölümüne çift tıkla ve aşşadaki kodu yaz.
begin
form1.hide;
end; -
şimdi arkadaşım diğer yöntemler karışık sana en basidini sölüyorum form un events özelliğinden onclose bölümüne çift tıkla ve aşşadaki kodu yaz.
begin
form1.hide;
end;
...........................................
en basiti bu .. -
eğer zombie tarzı birşey yapmayacaksın şöyle birşey yapabilirsin
2 form koyarsın.Sonra 1.si normal program ikincisinede
button1.click
form1.hide
button2.click
form1.(neydi unuttum gösteri)
Yada işte şifre girersin doğruysa gösterir ayar mayar yapar daha farklı şeyler yapabilirsin.yok ben zombie tarzında kullancam bir sürü bilgisayara yükliyicem neti açınca saldırsın diyorsan (mail için fazla bence) o zaman hide sana göre :) -
Zumsuk form1.show; olcak o form gösterme kodu
bide diğer kodların sonuna ; yazsan daha kararlı çalışır.
Toplam Hit: 2356 Toplam Mesaj: 7
