Ĺadny brzuch
Witam! Niedawno zaczalem prace z Delphi i tworze sobie taki mini programik z przeroznymi opcjami (od wylaczania monitora do wlaczenia painta). No i teraz mam problem poniewaz chcialem wstawic pole TEdit a ponizej TButton, ktory po nacisnieciu otwieral by domyslna przegladarke z linkiem, ktory uzytkownik podal w TEdit.
Zrobilem taka procedure:
procedure TForm1.TButtonclick(Sender: TObject); begin ShellExecute(Handle, 'open', 'TEdit.Text', nil, nil, sw_Normal); end;
I nie dziala :/. Macie moze jakies pomysly jak to rozwiazac ?
Użytkownik Bercik88 edytował ten post 23 sierpień 2007, 08:54
Witam! Niedawno zaczalem prace z Delphi i tworze sobie taki mini programik z przeroznymi opcjami (od wylaczania monitora do wlaczenia painta). No i teraz mam problem poniewaz chcialem wstawic pole TEdit a ponizej TButton, ktory po nacisnieciu otwieral by domyslna przegladarke z linkiem, ktory uzytkownik podal w TEdit.
Zrobilem taka procedure:
procedure TForm1.TButtonclick(Sender: TObject); begin ShellExecute(Handle, 'open', 'TEdit.Text', nil, nil, sw_Normal); end;
I nie dziala :/. Macie moze jakies pomysly jak to rozwiazac ?
Tak.
Pomyśleć, pomyśleć i jeszcze raz pomyśleć, a nie walić na forum od razu!
Ja widze, że próbujesz otworzyć program o nazwie 'TEdit.Text' - chyba nie to chciałeś osiągnąć?
Poszukaj sobie na necie/forum jak się otwiera linki w domyślnej przeglądarce i popraw to sam. To na prawdę nie przekracza Twoich możliwości.
Na forum znalazlem to:
Jak uruchomić stronę www w domyślnej przeglądarce.
Cały czas się ktoś o to pyta więc:
do uses dodajemy ShellAPI
A potem gdzieś sobie wtykamy kod (np. do buttona):
ShellExecute(Handle, 'open', 'http://costam.pl', nil, nil, sw_Normal);
Post napisany przez PcSA.
Dlatego zmienilem te http://costam na text z TEdita. A myslec myslalem i nic nie wymyslilem :/ :P
Na forum znalazlem to:
Post napisany przez PcSA.
Dlatego zmienilem te http://costam na text z TEdita. A myslec myslalem i nic nie wymyslilem :/ :P
...pchar(Edit1.text)...
...pchar(Edit1.text)...
Dzieki :* Temat do zamkniecia :)
Temat powinien byc zamkniety od razu, bo milion razy bylo to na forum i brak Ci podstawowej wiedzy.
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Zrobilem taka procedure:
procedure TForm1.TButtonclick(Sender: TObject); begin ShellExecute(Handle, 'open', 'TEdit.Text', nil, nil, sw_Normal); end;
I nie dziala :/. Macie moze jakies pomysly jak to rozwiazac ?
Użytkownik Bercik88 edytował ten post 23 sierpień 2007, 08:54
Witam! Niedawno zaczalem prace z Delphi i tworze sobie taki mini programik z przeroznymi opcjami (od wylaczania monitora do wlaczenia painta). No i teraz mam problem poniewaz chcialem wstawic pole TEdit a ponizej TButton, ktory po nacisnieciu otwieral by domyslna przegladarke z linkiem, ktory uzytkownik podal w TEdit.
Zrobilem taka procedure:
procedure TForm1.TButtonclick(Sender: TObject); begin ShellExecute(Handle, 'open', 'TEdit.Text', nil, nil, sw_Normal); end;
I nie dziala :/. Macie moze jakies pomysly jak to rozwiazac ?
Tak.
Pomyśleć, pomyśleć i jeszcze raz pomyśleć, a nie walić na forum od razu!
Ja widze, że próbujesz otworzyć program o nazwie 'TEdit.Text' - chyba nie to chciałeś osiągnąć?
Poszukaj sobie na necie/forum jak się otwiera linki w domyślnej przeglądarce i popraw to sam. To na prawdę nie przekracza Twoich możliwości.
Na forum znalazlem to:
Jak uruchomić stronę www w domyślnej przeglądarce.
Cały czas się ktoś o to pyta więc:
do uses dodajemy ShellAPI
A potem gdzieś sobie wtykamy kod (np. do buttona):
ShellExecute(Handle, 'open', 'http://costam.pl', nil, nil, sw_Normal);
Post napisany przez PcSA.
Dlatego zmienilem te http://costam na text z TEdita. A myslec myslalem i nic nie wymyslilem :/ :P
Na forum znalazlem to:
Post napisany przez PcSA.
Dlatego zmienilem te http://costam na text z TEdita. A myslec myslalem i nic nie wymyslilem :/ :P
...pchar(Edit1.text)...
...pchar(Edit1.text)...
Dzieki :* Temat do zamkniecia :)
Temat powinien byc zamkniety od razu, bo milion razy bylo to na forum i brak Ci podstawowej wiedzy.