Source Code Aplikasi Timeleft binary D7

Hai sahabat trader binary ketemu lagi ni jangan bosen-bosen ya!!! ✋✋😀 ,kali ini saya akan sedikit share SC(sourcecode) aplikasi yang mirip dengan timeleft yang biasa digunakan dalam trading Binary.
Saya sendiri sebelumnya memang mencari cara bagaimana sih bisa membuat aplikasi yang demikian setelah melihat sebuah vidio di youtube maupun di group trading facebook kok itu terlihat sangat keren sekali ya  😎 wkwkwk.
Dibawah ini adalah sebuah screenshoot dari aplikasi yang saya maksud itu secara logikanya aplikasi tersebut dibangun dengan beberapa komponen seperti timer dan label yang terdapat pada delphi7 tersebut.

Source Code:

unit ADI; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, jpeg, ExtCtrls, StdCtrls; type TForm1 = class(TForm) Image1: TImage; Timer1: TTimer; Label2: TLabel; procedure Timer1Timer(Sender: TObject); procedure Image1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); procedure FormShow(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Timer1Timer(Sender: TObject); begin Label2.Caption := TimeToStr(time); end; procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); const SC_DRAGMOVE = $F012; begin begin ReleaseCapture; Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0); end; end; procedure TForm1.FormShow(Sender: TObject); begin setWindowPos(Self.Handle, HWND_TOPMOST,0,0,0,0, SWP_NOMOVE or SWP_NOSIZE or SWP_showwindow); end; end.

Pencarian di internetpun tetep gak ketemu juga udah coba search kesana dan kesini enggak juga kunjung ketemu,memang tadinya udah mau menyerah sih tapi akhirnya ketemu juga cara nya dan dibawah ini adalah sorce code yang sudah terbentuk dan dapat di run dengan baik.

Disini saya menggunakan software delphi7  versi enterprice 7.0 dan saya anggap kalian sudah mempunyai atau menginstalnya di pc atau laptop kalian dan os yang saya gunakan adalah windows 10 64bit kalau kalian belum punya aplikasi delphi7 bisa download atau cari di internet dan untuk mengedit nama disini saya menggunakan aplikasi bawaan windows yaitu paint dan selebihnya kalian bisa berkreasi sendiri.