Ĺadny brzuch
Ekhemm...mam pytanie...jak dodac do zmiennej systemowej śćieżkę do jakiegoś pliku(bcc32.exe) tak aby uruchamial się on bez podawania scieżki?
1. Do cholery jasnej pisz prefixy ;)
2. jako, że czasami jak mi się nudzi to piszę w Delphi to napisz to w tym porytym języku ;), a więc tak, musisz zlokalizować plik w Twoim przypadku będzie o tyle trudniej, że program możesz zainstalować gdzie chcesz więc ja bym się skupił na wyszukaniu w rejestrze moim kochanym potrzebnych informacji. A jeśli chodzi to systemowe śmieci to:
uses ShlObj; function GetP(Folder: Integer): String; var FilePath: array[0..MAX_PATH] of char; begin SHGetSpecialFolderPath(0, FilePath, Folder , False); Result:=FilePath; end; A to wrzuć do zdarzenia np Button1Click ListBox1.Items.Add('AutoStart '+getp(CSIDL_STARTUP)); ListBox1.Items.Add('Dane aplikacji '+getp(CSIDL_APPDATA)); ListBox1.Items.Add('Kosz'+getp(CSIDL_BITBUCKET)); ListBox1.Items.Add('Ikony dla Panelu Sterowania '+getp(CSIDL_CONTROLS)); ListBox1.Items.Add('Cookies (Internet) '+getp(CSIDL_COOKIES)); ListBox1.Items.Add('Wirtualny pulpit '+getp(CSIDL_DESKTOP)); ListBox1.Items.Add('Fizyczny pulpit '+getp(CSIDL_DESKTOPDIRECTORY)); ListBox1.Items.Add('Mój komputer '+getp(CSIDL_DRIVES)); ListBox1.Items.Add('Ulubione '+getp(CSIDL_FAVORITES)); ListBox1.Items.Add('Czcionki '+getp(CSIDL_FONTS)); ListBox1.Items.Add('Historia (Internet) '+getp(CSIDL_HISTORY)); ListBox1.Items.Add('Wirtualny internet '+getp(CSIDL_INTERNET)); ListBox1.Items.Add('Tymczasowy internet '+getp(CSIDL_INTERNET_CACHE)); ListBox1.Items.Add('Otoczenie sieciowe '+getp(CSIDL_NETHOOD)); ListBox1.Items.Add('Dokumenty '+getp(CSIDL_PERSONAL)); ListBox1.Items.Add('Drukarki '+getp(CSIDL_PRINTERS)); ListBox1.Items.Add('Programy Menu Start '+getp(CSIDL_PROGRAMS)); ListBox1.Items.Add('Ostanio używane dokumenty '+getp(CSIDL_RECENT)); ListBox1.Items.Add('Wy¶lij do... '+getp(CSIDL_SENDTO)); ListBox1.Items.Add('Opcje Menu Start '+getp(CSIDL_STARTMENU)); ListBox1.Items.Add('Wzorce dokumentów '+getp(CSIDL_TEMPLATES));
enjoy ;)
Coś nie za bardzo załapałem:chessy: może jakiś pliczek wsadowy - bo ja z Delphi - Ni w ząb :D
Wartość Path w HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment - działaj :D
Użytkownik Cyrkiel edytował ten post 11 lipiec 2005, 10:01
Dobra wlazłem i jaką utworzyc wartosc? (dla C:\Borland\BCC55\Bin\bcc32.exe)
Edytuj wartosc ciagu o nazwie 'path' (na koncu dopisz ";C:\Borland\BCC55\Bin\").
Edytuj wartosc ciagu o nazwie 'path' (na koncu dopisz ";C:\Borland\BCC55\Bin\").
Ups... nie ControlSet001 tylko CurrentControlSet, popraw :P
Dopisałem do path C:\Borland\BCC55\Bin\ i nic... co robic?(powered by fanta-bambucia):D
Trza się wy- i zalogować, by działało, na razie nie znam innego sposobu :rolleyes:
Echh... za chwile szlag mnie trafi - IDENTYCZNY PROBLEM BYŁ DOSŁOWNIE W ZESZŁYM TYGODNIU! UŻYWAJCIE NA MIŁOŚĆ BOSKĄ TEGO ZAKICHANEGO PRZYCISKU SZUKAJ!
Do Mod: sorry za akapit, ale może teraz do zauważą <_<
// EDIT:
Czas szukania - 23 sek:
http://forum.ks-eksp...showtopic=50384
Użytkownik Real_Noname edytował ten post 11 lipiec 2005, 10:45
I nic... <_< może powiesz mi Noname albo Cyrkiel co mam dokładnie wpisac? Bo wpisuje C:\Borland\BCC55\Bin\ i nic...i nic...ehhhhhhh...ODP. PLZ.
//EDIT: Dobra udało się thx za pomoc!!!
Użytkownik white_dragon edytował ten post 11 lipiec 2005, 12:44
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
1. Do cholery jasnej pisz prefixy ;)
2. jako, że czasami jak mi się nudzi to piszę w Delphi to napisz to w tym porytym języku ;), a więc tak, musisz zlokalizować plik w Twoim przypadku będzie o tyle trudniej, że program możesz zainstalować gdzie chcesz więc ja bym się skupił na wyszukaniu w rejestrze moim kochanym potrzebnych informacji. A jeśli chodzi to systemowe śmieci to:
uses ShlObj; function GetP(Folder: Integer): String; var FilePath: array[0..MAX_PATH] of char; begin SHGetSpecialFolderPath(0, FilePath, Folder , False); Result:=FilePath; end; A to wrzuć do zdarzenia np Button1Click ListBox1.Items.Add('AutoStart '+getp(CSIDL_STARTUP)); ListBox1.Items.Add('Dane aplikacji '+getp(CSIDL_APPDATA)); ListBox1.Items.Add('Kosz'+getp(CSIDL_BITBUCKET)); ListBox1.Items.Add('Ikony dla Panelu Sterowania '+getp(CSIDL_CONTROLS)); ListBox1.Items.Add('Cookies (Internet) '+getp(CSIDL_COOKIES)); ListBox1.Items.Add('Wirtualny pulpit '+getp(CSIDL_DESKTOP)); ListBox1.Items.Add('Fizyczny pulpit '+getp(CSIDL_DESKTOPDIRECTORY)); ListBox1.Items.Add('Mój komputer '+getp(CSIDL_DRIVES)); ListBox1.Items.Add('Ulubione '+getp(CSIDL_FAVORITES)); ListBox1.Items.Add('Czcionki '+getp(CSIDL_FONTS)); ListBox1.Items.Add('Historia (Internet) '+getp(CSIDL_HISTORY)); ListBox1.Items.Add('Wirtualny internet '+getp(CSIDL_INTERNET)); ListBox1.Items.Add('Tymczasowy internet '+getp(CSIDL_INTERNET_CACHE)); ListBox1.Items.Add('Otoczenie sieciowe '+getp(CSIDL_NETHOOD)); ListBox1.Items.Add('Dokumenty '+getp(CSIDL_PERSONAL)); ListBox1.Items.Add('Drukarki '+getp(CSIDL_PRINTERS)); ListBox1.Items.Add('Programy Menu Start '+getp(CSIDL_PROGRAMS)); ListBox1.Items.Add('Ostanio używane dokumenty '+getp(CSIDL_RECENT)); ListBox1.Items.Add('Wy¶lij do... '+getp(CSIDL_SENDTO)); ListBox1.Items.Add('Opcje Menu Start '+getp(CSIDL_STARTMENU)); ListBox1.Items.Add('Wzorce dokumentów '+getp(CSIDL_TEMPLATES));
enjoy ;)
Coś nie za bardzo załapałem:chessy: może jakiś pliczek wsadowy - bo ja z Delphi - Ni w ząb :D
Wartość Path w HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment - działaj :D
Użytkownik Cyrkiel edytował ten post 11 lipiec 2005, 10:01
Dobra wlazłem i jaką utworzyc wartosc? (dla C:\Borland\BCC55\Bin\bcc32.exe)
Edytuj wartosc ciagu o nazwie 'path' (na koncu dopisz ";C:\Borland\BCC55\Bin\").
Edytuj wartosc ciagu o nazwie 'path' (na koncu dopisz ";C:\Borland\BCC55\Bin\").
Ups... nie ControlSet001 tylko CurrentControlSet, popraw :P
Dopisałem do path C:\Borland\BCC55\Bin\ i nic... co robic?(powered by fanta-bambucia):D
Trza się wy- i zalogować, by działało, na razie nie znam innego sposobu :rolleyes:
Echh... za chwile szlag mnie trafi - IDENTYCZNY PROBLEM BYŁ DOSŁOWNIE W ZESZŁYM TYGODNIU! UŻYWAJCIE NA MIŁOŚĆ BOSKĄ TEGO ZAKICHANEGO PRZYCISKU SZUKAJ!
Do Mod: sorry za akapit, ale może teraz do zauważą <_<
// EDIT:
Czas szukania - 23 sek:
http://forum.ks-eksp...showtopic=50384
Użytkownik Real_Noname edytował ten post 11 lipiec 2005, 10:45
I nic... <_< może powiesz mi Noname albo Cyrkiel co mam dokładnie wpisac? Bo wpisuje C:\Borland\BCC55\Bin\ i nic...i nic...ehhhhhhh...ODP. PLZ.
//EDIT: Dobra udało się thx za pomoc!!!
Użytkownik white_dragon edytował ten post 11 lipiec 2005, 12:44