Ĺadny brzuch
Po odpaleniu mojej aplikacji "wyrzuca" ona z zasobów kilka plików do katalogu w którym została otwarta. Mój problem polega na tym że w tej aplikacji mam też TOpenPictureDialog w którym mogę wybrać jakiś obrazek (potrzebny w aplikacji do czegoś tam....) Lecz gdy go wybiore obrazek z jakiegoś innego katalogu to mój program zachowuje się jakby był w tym katalogu z obrazkami
(tzn. po wybraniu obrazka nie kasuje np. DeleteFile('aaa.wav') - gdzie aaa.wav to plik wyodrębniony na starcie aplikacji.
Jak po wybraniu przez TOpenPictureDialog obrazka z innego katalogu sprawić by program powrócił do katalogu w którym został otwarty i tam wykonywał pozostałe operacje...?
Pobrałem katalog programu:
KatalogProgramu := ExtractFilePath(application.ExeName);
ale jak zrobić by program tam "powrócił" ??
Użytkownik qwert23 edytował ten post 11 maj 2006, 10:38
Ale masz problem.. <_< Zamiast:
DeleteFile('aaa.wav');daj:
DeleteFile(ExtractFilePath(application.ExeName)+'aaa.wav');
Użytkownik Kajetanek edytował ten post 11 maj 2006, 10:45
Kajetanek - właśnie miałem to dodać że nie mogę tak zrobić (nie chcę używać pełnych ścieżek) - chcę mieć tylko
DeleteFile('aaa.wav');
Nie da się jakoś powrócić do katalogu w którym aplikacja została uruchomiona ?? (żeby tam się wykonywały pozostałe komendy)......
Użytkownik qwert23 edytował ten post 11 maj 2006, 10:50
Da się - funkcją SetCurrentDir
IMHO Lepiej jest kasowac pliki podając pełną ścieżkę - tak jak Kajetanek podał - pewność wybrania właściwego pliku jest stuprocentowa wówczas. Czemu nie możesz tak robić ??
Użytkownik Uno edytował ten post 11 maj 2006, 10:54
bo potem używam pewnej funkcji CMD która nie do końca obsługuje ścieżki ;)
bo potem używam pewnej funkcji CMD która nie do końca obsługuje ścieżki ;)
Uno - pewnie nie pamiętasz ale kiedyś mi przy niej pomagałeś :) Ale pożniej coś zchrzaniłem.....i nie chce mi się teraz w niej grzebać... Ale mniejsza o to - z CurrentDir wszystko mi śmiga zą miło :)
W takim razie:
SetCurrentDir(extractfilepath(application.exename)); DeleteFile('aaa.wav');
eot
Użytkownik Kajetanek edytował ten post 11 maj 2006, 18:51
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
(tzn. po wybraniu obrazka nie kasuje np. DeleteFile('aaa.wav') - gdzie aaa.wav to plik wyodrębniony na starcie aplikacji.
Jak po wybraniu przez TOpenPictureDialog obrazka z innego katalogu sprawić by program powrócił do katalogu w którym został otwarty i tam wykonywał pozostałe operacje...?
Pobrałem katalog programu:
KatalogProgramu := ExtractFilePath(application.ExeName);
ale jak zrobić by program tam "powrócił" ??
Użytkownik qwert23 edytował ten post 11 maj 2006, 10:38
Ale masz problem.. <_< Zamiast:
DeleteFile('aaa.wav');daj:
DeleteFile(ExtractFilePath(application.ExeName)+'aaa.wav');
Użytkownik Kajetanek edytował ten post 11 maj 2006, 10:45
Kajetanek - właśnie miałem to dodać że nie mogę tak zrobić (nie chcę używać pełnych ścieżek) - chcę mieć tylko
DeleteFile('aaa.wav');
Nie da się jakoś powrócić do katalogu w którym aplikacja została uruchomiona ?? (żeby tam się wykonywały pozostałe komendy)......
Użytkownik qwert23 edytował ten post 11 maj 2006, 10:50
Da się - funkcją SetCurrentDir
IMHO Lepiej jest kasowac pliki podając pełną ścieżkę - tak jak Kajetanek podał - pewność wybrania właściwego pliku jest stuprocentowa wówczas. Czemu nie możesz tak robić ??
Użytkownik Uno edytował ten post 11 maj 2006, 10:54
bo potem używam pewnej funkcji CMD która nie do końca obsługuje ścieżki ;)
bo potem używam pewnej funkcji CMD która nie do końca obsługuje ścieżki ;)
Uno - pewnie nie pamiętasz ale kiedyś mi przy niej pomagałeś :) Ale pożniej coś zchrzaniłem.....i nie chce mi się teraz w niej grzebać... Ale mniejsza o to - z CurrentDir wszystko mi śmiga zą miło :)
W takim razie:
SetCurrentDir(extractfilepath(application.exename)); DeleteFile('aaa.wav');
eot
Użytkownik Kajetanek edytował ten post 11 maj 2006, 18:51