Ĺadny brzuch
Chciałbym osiągniąc taki efekt, jaki jest w Wordziie, po wciśnięciu opcji: Podgląd strony Web. Co mam zrobić, aby po wciśnięciu opcji w menu, otworzyła się domyślna przeglądrka, a w niej został odczytany aktualnie pisany plik??
To może tak: do zmiennej przypisujesz ścieżke pliku...
Do uses dodaj ShellApi,
a gdzie chcesz żeby włączał przeglądarke wpisujesz: ShellExecute( GetDesktopWindow,'open','http://adres_strony',nil,nil,SW_SHOWNORMAL);
Zobacz jak to ma być dokładnie...bo mi się coś zdaje że zamiast http:// ma być file://adres pliku
Użytkownik Zaper edytował ten post 05 kwiecień 2005, 12:52
mi się coś zdaje że zamiast http:// ma być file://adres pliku
Mi chodzi o otwarcie z dysku, więc napewno file://, jeszcze nie sprawdziłem czyt działa, bo bawilem się z innym programikiem, jak sprawdzę to dam znać:)
Rozumiem że robisz Edytor HTML, i chcesz mieć podgląd strony?
Cos mi nie działa ten sposób. Nie ja nie robię, edytora HTML, ja robię edytor tekstowy. Niektórzy piszą strony, w prostych edytoach, jakim jest np. Notatnik, tak samo chciałbym aby było w moim programiku. Nire wiem czy wyrazilem się jasno, alle ten kod, to najprawdopodobniej nie to co chciałem. Chcę, aby ten kod odczytała domyślna przeglądarka HTML, tlyko nie wiem czy da się tak, przed zapisem pliku. Da się tak w Wordzie. Nie otworzy sie ten kod np. FF czy IE.
Wiesz co ja też spotkałem się z takim problemem.
A zrobiłem to tak:
procedure TForm.Podglad; begin RichEdit1.Lines.SaveToFile('C:\Temp.htm'); ShellExecute(0,'open','C:\Temp.htm',nil,nil,SW_SHOWNORMAL); Sleep(1000); DeleteFile('C:\Temp.htm'); end;
U mnie to działało :)
Sleep(1000); DeleteFile('C:\Temp.htm');
Eee... ja nie za bardzo rozumiem o co ci chodzi
Jak ją odswieżyć? Jeszcze raz ShellExecute?
Działa!!! Wielkie dzięki delpher za kod. Jest dokłądnie tak jak chciałem. dzięki również Tobie migajek, widzę Ty mi równiez pomogłeś.
Eee... ja nie za bardzo rozumiem o co ci chodzi
Jak ją odswieżyć? Jeszcze raz ShellExecute?
U mnie tak było z operą, ale w sumie to co napisałem mi wystarczało...
można sobie pogłówkować, że dopiero po zamknięciu przęglądarki ten plik sie usuwa. Jak kto woli :P
U mnie tak było z operą, ale w sumie to co napisałem mi wystarczało...
można sobie pogłówkować, że dopiero po zamknięciu przęglądarki ten plik sie usuwa. Jak kto woli :P
Albo stworzyć nową formę, w niej otwierać stronę, a po zamknięciu jej usunąć Tempa.
A może lepiej wpakować od razu do normalnego Tempa, np.:
C:\Documents and Settings\%UserName%\Ustawienia lokalne\Temp
Bo te pliki są znikomej wielkości i w Tempie powinny czuć się najlepiej, poza tym ten plik "Temp.htm" bedzie cały czas nadpisywany więc nie bedzie setek niepotrzebnych plików. Jak ktoś bedzie oczyszczał dysk to i te pliki się usuną. A może od razu najlepiej jest to wpakować do Temporary Internet Files, gdzie jest tyle syfu, że sporo osób ma ustawione oczyszczanie tego folderu przy każdym wyłączaniu przeglądarki.
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
To może tak: do zmiennej przypisujesz ścieżke pliku...
Do uses dodaj ShellApi,
a gdzie chcesz żeby włączał przeglądarke wpisujesz: ShellExecute( GetDesktopWindow,'open','http://adres_strony',nil,nil,SW_SHOWNORMAL);
Zobacz jak to ma być dokładnie...bo mi się coś zdaje że zamiast http:// ma być file://adres pliku
Użytkownik Zaper edytował ten post 05 kwiecień 2005, 12:52
mi się coś zdaje że zamiast http:// ma być file://adres pliku
Mi chodzi o otwarcie z dysku, więc napewno file://, jeszcze nie sprawdziłem czyt działa, bo bawilem się z innym programikiem, jak sprawdzę to dam znać:)
Rozumiem że robisz Edytor HTML, i chcesz mieć podgląd strony?
Cos mi nie działa ten sposób. Nie ja nie robię, edytora HTML, ja robię edytor tekstowy. Niektórzy piszą strony, w prostych edytoach, jakim jest np. Notatnik, tak samo chciałbym aby było w moim programiku. Nire wiem czy wyrazilem się jasno, alle ten kod, to najprawdopodobniej nie to co chciałem. Chcę, aby ten kod odczytała domyślna przeglądarka HTML, tlyko nie wiem czy da się tak, przed zapisem pliku. Da się tak w Wordzie. Nie otworzy sie ten kod np. FF czy IE.
Wiesz co ja też spotkałem się z takim problemem.
A zrobiłem to tak:
procedure TForm.Podglad; begin RichEdit1.Lines.SaveToFile('C:\Temp.htm'); ShellExecute(0,'open','C:\Temp.htm',nil,nil,SW_SHOWNORMAL); Sleep(1000); DeleteFile('C:\Temp.htm'); end;
U mnie to działało :)
Sleep(1000); DeleteFile('C:\Temp.htm');
Eee... ja nie za bardzo rozumiem o co ci chodzi
Jak ją odswieżyć? Jeszcze raz ShellExecute?
Działa!!! Wielkie dzięki delpher za kod. Jest dokłądnie tak jak chciałem. dzięki również Tobie migajek, widzę Ty mi równiez pomogłeś.
Eee... ja nie za bardzo rozumiem o co ci chodzi
Jak ją odswieżyć? Jeszcze raz ShellExecute?
U mnie tak było z operą, ale w sumie to co napisałem mi wystarczało...
można sobie pogłówkować, że dopiero po zamknięciu przęglądarki ten plik sie usuwa. Jak kto woli :P
U mnie tak było z operą, ale w sumie to co napisałem mi wystarczało...
można sobie pogłówkować, że dopiero po zamknięciu przęglądarki ten plik sie usuwa. Jak kto woli :P
Albo stworzyć nową formę, w niej otwierać stronę, a po zamknięciu jej usunąć Tempa.
A może lepiej wpakować od razu do normalnego Tempa, np.:
C:\Documents and Settings\%UserName%\Ustawienia lokalne\Temp
Bo te pliki są znikomej wielkości i w Tempie powinny czuć się najlepiej, poza tym ten plik "Temp.htm" bedzie cały czas nadpisywany więc nie bedzie setek niepotrzebnych plików. Jak ktoś bedzie oczyszczał dysk to i te pliki się usuną. A może od razu najlepiej jest to wpakować do Temporary Internet Files, gdzie jest tyle syfu, że sporo osób ma ustawione oczyszczanie tego folderu przy każdym wyłączaniu przeglądarki.