oncreate

[lade]

Pewnie to lamerskie pytanie, ale za bardzo na tym sie nieznam a jest mi potrzebne. Mam taki problem: Musze w On create ( form1)wpisac dwa kody do roznych zadan. Jak to zrboic, jak wpisuje te dwa kody, oddzeilam je end; i nadal error.

 

[Serfer@]

Zrób sobie dwie niezależne procedury.

 

[abramakabra]

Jak byś dobrze napisał to nie było by błędów...
Pokaż co napisałeś to sie sprawdzi.

 

[lade]

dfobra juz to zrobilem, ale niemoge znlaesc funkcji zmiany tepety. Znalazlem jedna ale niedizała:

var
S : string;
begin
S := 'c:Cocuments and SettingsPC1Moje dokumentyMoje obrazytest.bmp';
SystemParametersInfo(SPI_SETDESKWALLPAPER,0, PChar(s), SPIF_UPDATEINIFILE or SPIF_SENDWININICHANGE);

end;[/b]

Wiem ze jest jakas ze z rejestrru ale nieweim jak wyglada. Moze ktos wie?