Niniejszy artyku│ ma obja╢niµ zasadΩ pisania
wygaszaczy ekranu. Wbrew pozorom nie jest to czynno╢µ trudna. Trzeba
mieµ tylko jako takie pojΩcie na temat grafiki w Delphi.
Wiele z Was zapewne wie ( a Ci co nie wiedz▒ to siΩ
dowiedz▒ :)) ┐e wygaszacze ekranu w Windowsie maj▒ rozszerzenie *.scr.
Jak wiΩc stworzyµ wygaszacz w Delphi? Zapisaµ plik z rozszerzeniem
*.scr!
"Taaak, czy┐by to by│o tak proste?". Tak! Tworzysz jaki╢
program i kompilujesz go, a nastΩpnie zmieniasz rozszerzenie z *.exe
na *.scr i ( koniecznie ) kopiujesz ten program do katalogu z
Windowsem.
»eby stworzyµ jaki╢ wygaszacz musisz mieµ pewne
podstawy programowaniu grafiki. Mo┐esz tak┐e oprogramowaµ zdarzenie
"OnMouseMove", g│≤wnej formy, tak aby po ruszeniu kursorem
myszy aplikacja ko±czy│a swoj▒ pracΩ. Mo┐esz tak┐e ukryµ kursor
myszy nadaj▒c mu w│a╢ciwo╢µ kursor -1.
Screen.Cursor := -1;
Na tym ko±czΩ ten kr≤tki art dotycz▒cy wygaszaczy
pod Windows.
Nara!
Adam boduch
ShapesScreenSaver ( 298
kB )
Matrix
ScreenSaver ( 3 kB )