From 0ff219a3d06e32955d1c16c7d0367dfff3b51b42 Mon Sep 17 00:00:00 2001 From: PSposito Date: Sat, 22 Feb 2020 19:54:43 +0200 Subject: [PATCH] Further Code Beautification and Comments --- Logs.pas | 1 + Reboot.pas | 1 + RebootDialog.pas | 8 ++++++++ about.pas | 1 + main.pas | 11 +++++++---- 5 files changed, 18 insertions(+), 4 deletions(-) diff --git a/Logs.pas b/Logs.pas index 0040498..519bc01 100644 --- a/Logs.pas +++ b/Logs.pas @@ -10,6 +10,7 @@ unit Logs; // Developed further for intrusion feeling and logging at 2nd of February 2020, by Initial developer // Developed for Blacklisting/Whitelisting functions for both camera & audio at 7th of February 2020, by Initial developer // Finalized, except traslations at 15th of February 2020. +// Further Capabilities added alone with better Logging at 22nd of February 2020 interface diff --git a/Reboot.pas b/Reboot.pas index 1d19a5d..f79a86c 100644 --- a/Reboot.pas +++ b/Reboot.pas @@ -10,6 +10,7 @@ unit Reboot; // Developed further for intrusion feeling and logging at 2nd of February 2020, by Initial developer // Developed for Blacklisting/Whitelisting functions for both camera & audio at 7th of February 2020, by Initial developer // Finalized, except traslations at 15th of February 2020. +// Further Capabilities added alone with better Logging at 22nd of February 2020 interface diff --git a/RebootDialog.pas b/RebootDialog.pas index 399955b..c863f95 100644 --- a/RebootDialog.pas +++ b/RebootDialog.pas @@ -2,6 +2,14 @@ unit RebootDialog; {$mode objfpc}{$H+} +// Created at 23th of January 2020, by Linuxer (https://gitlab.com/psposito), from scratch with Free Pascal +// Redesigned and further Developed at 28th of January 2020, by Initial developer +// to provide Camera and Mic status alone with On/Off and Mute/Unmute fuctions +// Developed further for intrusion feeling and logging at 2nd of February 2020, by Initial developer +// Developed for Blacklisting/Whitelisting functions for both camera & audio at 7th of February 2020, by Initial developer +// Finalized, except traslations at 15th of February 2020. +// Further Capabilities added alone with better Logging at 22nd of February 2020 + interface uses diff --git a/about.pas b/about.pas index a74c413..4b6ecb0 100644 --- a/about.pas +++ b/about.pas @@ -10,6 +10,7 @@ unit About; // Developed further for intrusion feeling and logging at 2nd of February 2020, by Initial developer // Developed for Blacklisting/Whitelisting functions for both camera & audio at 7th of February 2020, by Initial developer // Finalized, except traslations at 15th of February 2020. +// Further Capabilities added alone with better Logging at 22nd of February 2020 interface diff --git a/main.pas b/main.pas index e54b1bb..aa4de15 100644 --- a/main.pas +++ b/main.pas @@ -10,6 +10,7 @@ unit Main; // Developed further for intrusion feeling and logging at 2nd of February 2020, by Initial developer // Developed for Blacklisting/Whitelisting functions for both camera & audio at 7th of February 2020, by Initial developer // Finalized, except traslations at 15th of February 2020. +// Further Capabilities added alone with better Logging at 22nd of February 2020 interface @@ -59,9 +60,9 @@ type MenuItem31 : TMenuItem; MenuItem32 : TMenuItem; MenuItem33 : TMenuItem; - MenuItem34: TMenuItem; + MenuItem34 : TMenuItem; MenuItem35 : TMenuItem; - MenuItem36: TMenuItem; + MenuItem36 : TMenuItem; MenuItem39 : TMenuItem; MenuItem4 : TMenuItem; MenuItem40 : TMenuItem; @@ -1084,11 +1085,13 @@ begin About.Form2.ListBox1.Items.Add('functions with Camera Monitor, plus the Off stage, so now it '); About.Form2.ListBox1.Items.Add('has a realtime Off (Uvc Video Off), a realtime On (Uvc Video On)'); About.Form2.ListBox1.Items.Add('and a realtime Capture On/Off Icon Statuses '); - About.Form2.ListBox1.Items.Add('This is the final project''s stage of design, except when '); - About.Form2.ListBox1.Items.Add('translations will be finished and added.'); + About.Form2.ListBox1.Items.Add(' '); About.Form2.ListBox1.Items.Add('Note: A big part of code, changed in order to add these statuses'); About.Form2.ListBox1.Items.Add('because it rebased the total violations algorithms (hacks control)'); About.Form2.ListBox1.Items.Add('Done at 15th of February 2020 '); + About.Form2.ListBox1.Items.Add(' '); + About.Form2.ListBox1.Items.Add('Further Capabilities added alone with better Logging at 22nd of '); + About.Form2.ListBox1.Items.Add('February 2020' About.Form2.Show; end;