[Delphi] Pare pytan (chyba proste)

0

Witam!

Mam pare pytan na ktore nie moge sobie poradzic, wiec prosze o odpowiedz lub wskazowke gdzie szukac (byle by byla jakas pomoc)

Oto moje pytanka [diabel] :

  1. Przegladarka: Przegloadam pliki graficzne przegladrka (sam robilem) i mi sie spodobal obrazek co przeglodam, chce go zapisac. Obrazek znajduje sie na komponecje TImage. Chce zeby sie odworzylo okno i zebym zapisal obrazek. Proste wydaje sie :).

  2. Jak zrobic aby dalo sie przeglodac pliki .gif ? (moge przegladac pliki *.bmp i *.jpg). Takze sa jakies inne formaty ktore Delphi obsluguje ?

  3. Jak zrobic ze po nacisniecju np. button program sie uruchmi jeszcze raz (taki restart :-) )

  4. Jak zrobic Zoom Image`a i Oddalanie (z taka lupa)

Tym co mi pomogli ogromnie dzieki i tym ci sie starali :-* :-* :-* :-D .

[browar] DZIEKI WAM ZA POMOC [browar]

0
  1. Przegladarka: Przegloadam pliki graficzne przegladrka (sam robilem) i mi sie spodobal obrazek co przeglodam, chce go zapisac. Obrazek znajduje sie na komponecje TImage. Chce zeby sie odworzylo okno i zebym zapisal obrazek. Proste wydaje sie :).

normalnie: if savedialog.execute then rysunek.picture.savetofile(savedialog.execute);

jeżeli masz filelistboxa to rysunek.picture.savetofile(filelistbox.filename);

  1. Jak zrobic aby dalo sie przeglodac pliki .gif ? (moge przegladac pliki *.bmp i *.jpg). Takze sa jakies inne formaty ktore Delphi obsluguje ?

Delphi obsługuje ico,jpg,bmp,wmf,emf, poczekaj zaglądne do mojej przeglądarki;) o i prawdopodobnie jpeg ale go nieużyłem bo byłby problem z extractfileext;)
No więc co do gifów to ściągnij sobie komponent gifimage połóż go na tym gdzie masz zwykły image i przy extractfileext sparwdzaj czy GIF jak tak to rysunek.visible:=false rysunekgif.visible:=true a jak nie to odwrotnie:P Zresztą ja se zrobiłem filtercombobox i jak filter włączony jest na gif to zmienna globalna gifmode :=true potem to już se chyba poradzisz jak nie to pisz na gg

  1. Jak zrobic ze po nacisniecju n ;p p. button program sie uruchmi jeszcze raz (taki restart :-) )

hmmmmm hmmmmm może... nie... niewiem w tym ci raczej niepomoge
ale popróbuj z labelami (nie tlabel tylko label)

  1. Jak zrobic Zoom Image`a i Oddalanie (z taka lupa)

ja zrobiłem width i height + np 50 ale to nie jest dobry sposób:-/
raz zrobiłem height :=width ale żeby było ok to zrób if height>width then width:=height w tedy bedzie jako taki kwadrat;)

PS. Jak zwykle haotycznie;)
PS2. Mam w mojej przeglądarce np. Modyfikowanie jpegów , dodawanie sygnaturki tekstowej co tam jeszce... Opcje z dowolną zmianą szczegółów i zapisywanie w rejku;))) Pisz na gg to powymieniamy sie informacjami :-)

0
  1. Jak zrobic aby dalo sie przeglodac pliki .gif ? (moge przegladac pliki *.bmp i *.jpg). Takze sa jakies inne formaty ktore Delphi obsluguje ?

Ja odpowiem - precz z delphi. ee ja korzystałem z biblioteki freewarowej NviewLib, która otwiera JPG, GIF, BMP, ICO i cośtam jeszcze... mogę podesłać wraz z pomocą...

Drajwer:

prawdopodobnie jpeg ale go nieużyłem bo byłby problem z extractfileext

jaki problem z extractfileext? pliki JPEG mają rozszerzenie JPG i JPE, rozszerzenia JPEG nie używa się.

0

no niewiem chyba jpe sie nieużywa NIE MA sie o co kłucić jpeg to jpeg ;)

Ja ściągnołem Fnview czy jak i niechce sie kompletnie zainstalować :(

0
  1. Jak zrobic ze po nacisniecju np. button program sie uruchmi jeszcze raz (taki restart :-) )

eee... to bedzie kompletna improwizacja :D

w OnClose albo innym podobnym, daj ShellExecute i uruchom w nim drugi raz swoja aplikacje (mozna z parametrem zeby bylo wiadomo ze to tylko przeladowanie) - jesli bedzie dzialalo dobrze, to spox, jesli bedzie przez chwile widac dwa okienka, to koniecznie zrob to uruchomienie z parametrem i teraz w tej uruchamianej aplikacji po 'wykryciu' parametru szukasz po prostu innego okna przegladarki, gdy je namierzysz to je niszczysz [diabel] hehe, albo jest tez druga alternatywa ze po tym shellexecute dajesz w tym samym OnClose jeszcze Form1.Visible := False. Powinno zadzialac.

0
  1. Przegladarka: Przegloadam pliki graficzne przegladrka (sam robilem) i mi sie spodobal obrazek co przeglodam, chce go zapisac. Obrazek znajduje sie na komponecje TImage. Chce zeby sie odworzylo okno i zebym zapisal obrazek. Proste wydaje sie :).

normalnie: if savedialog.execute then rysunek.picture.savetofile(savedialog.execute);

tu powinno byc normalnie: if savedialog.execute then rysunek.picture.savetofile(savedialog.filename);

jeżeli masz filelistboxa to rysunek.picture.savetofile(filelistbox.filename);

tu tez jest blad

  1. Jak zrobic aby dalo sie przeglodac pliki .gif ? (moge przegladac pliki *.bmp i *.jpg). Takze sa jakies inne formaty ktore Delphi obsluguje ?

Delphi obsługuje ico,jpg,bmp,wmf,emf, poczekaj zaglądne do mojej przeglądarki;) o i prawdopodobnie jpeg ale go nieużyłem bo byłby problem z extractfileext;)
No więc co do gifów to ściągnij sobie komponent gifimage połóż go na tym gdzie masz zwykły image i przy extractfileext sparwdzaj czy GIF jak tak to rysunek.visible:=false rysunekgif.visible:=true a jak nie to odwrotnie:P Zresztą ja se zrobiłem filtercombobox i jak filter włączony jest na gif to zmienna globalna gifmode :=true potem to już se chyba poradzisz jak nie to pisz na gg

  1. Jak zrobic ze po nacisniecju n ;p p. button program sie uruchmi jeszcze raz (taki restart :-) )

hmmmmm hmmmmm może... nie... niewiem w tym ci raczej niepomoge
ale popróbuj z labelami (nie tlabel tylko label)

  1. Jak zrobic Zoom Image`a i Oddalanie (z taka lupa)

ja zrobiłem width i height + np 50 ale to nie jest dobry sposób:-/
raz zrobiłem height :=width ale żeby było ok to zrób if height>width then width:=height w tedy bedzie jako taki kwadrat;)

co do lupy to łapnij mnie na GG

PS. Jak zwykle haotycznie;)
PS2. Mam w mojej przeglądarce np. Modyfikowanie jpegów , dodawanie sygnaturki tekstowej co tam jeszce... Opcje z dowolną zmianą szczegółów i zapisywanie w rejku;))) Pisz na gg to powymieniamy sie informacjami :-)

1 użytkowników online, w tym zalogowanych: 0, gości: 1