[ Ivan007 @ 02.08.2003. 16:08 ] @
Kako da ako kliknem command1 buton ,image1 mi se postavi kao pozadina mojih windowsa!!!!! Pomoć kako project1 pretvoriti u exe aplikaciju!!!!! |
[ Ivan007 @ 02.08.2003. 16:08 ] @
[ gfundak @ 04.08.2003. 01:00 ] @
Evo ti jedan šaljivi odgovor!
Recimo u AcdSee-u napravis capture screen tvoje pozadine i to pohranis u nekom formatu,zatim U vb-u napravis 2 forme u prvoj nek ti bude samo command1 button,a u drugoj formi napravis image1 u koji insertas svoju pozadinu koju si sahranio preko capture screena u AcdSee-u ! U prvoj formi samo stavis da ti command1 pokrene drugu formu! U drugoj formi u kojoj ti se nalazi image1 kod proprties(za formu ne za image1) namjestis da ti WindowState bude Maximized, ClipControls i ControlBox stavis na False i cod Caption izbrises ono sta pise (Form1) i jos stavis da ti Moveable bude False! [ Krsta @ 11.08.2003. 23:31 ] @
Odaberi iz menija File-Make Project1.exe i
sve to lepo potvrdi. [ byTer @ 12.08.2003. 17:52 ] @
Ne zezajte decka...
Kopaj malo po registiju i vidi koje kljuceve treba da promenis. [ Krsta @ 29.08.2003. 23:49 ] @
Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
'Public Const SPI_SETDESKWALLPAPER = 20 'Stavi ovaj kod u command buton Dim ChangeWP dim source source = "C:\windows\setup.bmp" ChangeWP = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, source, 0) Copyright (C) 2001-2024 by www.elitesecurity.org. All rights reserved.
|