Vrh aplikacija koja zaista dodaje novu vrednost svakoj tastaturi i Vašem kompjuteru:
WINDOWS 10 SOUND KEYBOARD (FREEWARE DOWNLOAD)
password = raspakuj
Unesite password dva puta, Please enter the password twice !
************************************
Drugari, ja svoje aplikacije pravim prvenstveno da bi bile dobre i korisne za mene i moje potrebe, ako se i Vama dopadaju, kontaktirajte me, otvoren sam za svaki predlog i saradnju.
Počnemo da radimo ono što želimo!
koja će Vam dati novu energiju i entuzijazam, ako koristite računar u svakodnevnom radu !
Stavite slušalice ili odvrnite zvučnike i počnite da kucate najkvalitetniji sadržaj ikada.
************************************
MORE WINDOWS TIPS:
http://www.koma-code.de/
MORE LINUX TIPS:
MORE ELECTRONICS TIPS:
MORE DELPHI TIPS:
procedure TForm1.ApplicationEvents1Minimize(Sender: TObject); begin { Hide the window and set its state variable to wsMinimized. } Hide(); WindowState := wsMinimized; { Show the animated tray icon and also a hint balloon. } TrayIcon1.Visible := True; TrayIcon1.Animate := True; TrayIcon1.ShowBalloonHint; end; procedure TForm1.FormCreate(Sender: TObject); var MyIcon : TIcon; begin { Load the tray icons. } TrayIcon1.Icons := TImageList.Create(Self); MyIcon := TIcon.Create; MyIcon.LoadFromFile('icons/earth1.ico'); TrayIcon1.Icon.Assign(MyIcon); TrayIcon1.Icons.AddIcon(MyIcon); MyIcon.LoadFromFile('icons/earth2.ico'); TrayIcon1.Icons.AddIcon(MyIcon); MyIcon.LoadFromFile('icons/earth3.ico'); TrayIcon1.Icons.AddIcon(MyIcon); MyIcon.LoadFromFile('icons/earth4.ico'); TrayIcon1.Icons.AddIcon(MyIcon); { Set up a hint message and the animation interval. } TrayIcon1.Hint := 'Hello World!'; TrayIcon1.AnimateInterval := 200; { Set up a hint balloon. } TrayIcon1.BalloonTitle := 'Restoring the window.'; TrayIcon1.BalloonHint := 'Double click the system tray icon to restore the window.'; TrayIcon1.BalloonFlags := bfInfo; end; procedure TForm1.TrayIcon1DblClick(Sender: TObject); begin { Hide the tray icon and show the window, setting its state property to wsNormal. } TrayIcon1.Visible := False; Show(); WindowState := wsNormal; Application.BringToFront(); end;
No comments:
Post a Comment
Beogradsko programiranje=