folder Tahribat.com Forumları
linefolder Delphi - Pascal
linefolder Delphi De Yazılan Bir Programı Hakkında Yardım



Delphi De Yazılan Bir Programı Hakkında Yardım

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    demonship
    demonship's avatar
    Kayıt Tarihi: 09/Mart/2007
    Erkek
    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

    Nasıla öğrencen
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    wert
    wert's avatar
    Kayıt Tarihi: 19/Eylül/2005
    Erkek
    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;


    |sadece aptalların başarısı ders notu ile ölçülür|
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    SSH
    SSH's avatar
    Kayıt Tarihi: 21/Temmuz/2005
    Erkek
    şö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

    sırıtma la.
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    FiLoZoF
    FiLoZoF's avatar
    Kayıt Tarihi: 31/Temmuz/2005
    Erkek
    ş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;
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Gladiator
    Gladiator's avatar
    Kayıt Tarihi: 13/Haziran/2006
    Erkek
    ş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 ..
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Ayro
    Ayro's avatar
    Kayıt Tarihi: 08/Ağustos/2005
    Erkek
    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 :)
  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Emrow
    Emrow's avatar
    Banlanmış Üye
    Kayıt Tarihi: 17/Mart/2007
    Erkek
    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