[ 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!!!!!
[ 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)