Siema
MAm problem. Napisalem program ktory rozeslany zostal mailem po wewnetrznej sieci jako zzipowany. Tylko ze przyslowiowe panie Zosie nie zapisaly go na dysku , ale kazdorazowo wyszukuja wiadomosc, otwieraja zalacznik i wtedy WinZip pokazuje zawartosc zip'a czyli moj program i stamtad go uruchamiaja.
Czy istnieje mozliwosc wykrycia i np wyswietlenia messag'a i zamkniecia programu jesli jest on wywolany metodą "pani zosi"?
mozesz if (FindWindow(nil,'nazwa captiona winzipa') > 0) or (FindWindow(nil,'nazwa captiona winrara') > 0) or (FindWindow(nil,'nazwa captiona innego programu') > 0) then showmessage('uruchoma z dysku');
Hmm, mysl niezla, dzieki ale czekam na kolejne pomysly.
Licze na wasza wiedze
Jeżeli w paramStr(0) jest jakiś 'temp' to istnieje duże prawdopodobieństwo że program jest uruchamiany właśnie z jakiegoś zipa czy rara.
Program debiloodporny !? to nie możliwe, już ja Ci znajde takiego debila, co nawet czystą forme zawiesi [diabel]
Wyciagasz sciezke programu i porownujesz poczatek ze sciezka tymczasowa (jak ja pobrac jest gdzies we wskazowkach, faq or smth)
np if pos(sciezka, sciezka_tym) <> 0 then z winrara
Lol, na przyszlosc lepiej dobieraj tematy. Jak chcesz wyciagnac obecna sciezke programu uzyj:
var
URL : String;
begin
URL := ExtractFilePath(Application.ExeName) + Application.ExeName;
end;
Jesli chcesz wyczytac sam folder w ktorym sie znajduje, bez nazwy pliku, uzyj:
var
URL : String;
begin
URL := ExtractFilePath(Application.ExeName);
end;
Poeksperymentuj z ta funkcja, i sprawdz gdzie jest to zapisywane, jak to rozpakowujesz w winzipie, jesi w tempie, poszukaj w faq kodu do wyciagniecia urla do tempa, i porownaj polozenie programu z uzyskanym urlem do tempa