Entwickler-Ecke
Internet / Netzwerk - Browser programmieren - Hilfe!
Killi - Do 12.06.03 12:38
Titel: Browser programmieren - Hilfe!
Hi!
Ich hab noch keine Ahnung wie ich einen eigenen Brower programmieren soll, aber ich weiß dass es dafür eine Komponente gibt (ich benutze D6) - und zwar die TWebBrowser Kompo....jetzt meine Frage: Kann mir jemand helfen bei den wichtigsten Dingen?
Man müsste oben die URL eingeben können, hinspringen und drucken usw können...
kann mir jmd helfen?
Killi - Do 12.06.03 13:30
also - hab mal rumprobiert und nat. gleich ein paar probleme....wenn ich auf meinen Button klicke dann soll er das hier machen:
Quelltext
1:
| Browser.Navigate(EURL.Text); |
warum macht ers nicht? Er lädt nur Seiten die ich schonmal besucht habe, d.h. Offline....will aber ne Verbindung aufbauen - und offline ist auf FALSE....
Anonymous - Do 12.06.03 21:54
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33:
| unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, SHDocVw;
type TForm1 = class(TForm) WebBrowser1: TWebBrowser; Edit1: TEdit; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); begin Webbrowser1.Navigate(Edit1.Text); end;
end. |
So funktioniert es....
Killi - Fr 13.06.03 08:25
Sagt mal...ich hab doch extra geschrieben dass mein
Quelltext
1: 2: 3: 4:
| procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.Navigate('www.audi.de'); //o.auch Edit1.Text, geht beides net end; |
NICHT funzt...das wundert mich ja gerade, weil alle anderen anscheinend keine Probleme damit haben
inselberg - Fr 13.06.03 18:19
darum solltest du ja auch nicht dein code schnipsel posten sondern das komplette project ;)
denn wenn ich es so übernehme wirds bei mir lauf ... jede wette
kannst mich aber gerne auch an msgen ... irgendwas der untigen wirst du ja sicher haben
Killi - Fr 13.06.03 23:25
hier der code - ist genau das gleiche wie oben steht und ANSCHEINEND tut!!! Habe Delphi 6 mit Win98
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32:
| unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, SHDocVw;
type TForm1 = class(TForm) WebBrowser1: TWebBrowser; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.Navigate('www.audi.de'); end;
end. |
Anonymous - Sa 14.06.03 00:03
probiers mal mit navigate2
inselberg - Sa 14.06.03 00:04
Quelltext
1: 2: 3: 4: 5:
| darum solltest du ja auch nicht dein code schnipsel posten sondern das komplette project
denn wenn ich es so übernehme wirds bei mir lauf ... jede wette
kannst mich aber gerne auch an msgen ... irgendwas der untigen wirst du ja sicher haben |
ich glaub wir sind in einer raum-zeit-schleife gefangen
fcg - Sa 14.06.03 12:59
hi
setzt doch einfach mal die Offline Property des Webbrowser auf false ;-)
fcg
Killi - Sa 14.06.03 13:22
@fcg: hättest du ALLES gelesen, hättest du gemerkt dass sie schon auf FALSE steht!!!
jetzt hab ichs mit Navigate2 gemacht:
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9:
| procedure TForm1.Button1Click(Sender: TObject); var Flag: OleVariant; adr: OleVariant; begin adr:= 'www.audi.de'; Flag := 2; WebBrowser1.Navigate2(adr, Flag); end; |
tut aber trotzdem nich....zuerst kommt "Aktion abgebrochen" und wenn ich nochmals klicke kommt "Die Seite kann nicht angezeigt werden".....
fcg - Sa 14.06.03 13:32
oh sorry, habe ich übersehen... :oops:
olliistmeinname - Sa 14.06.03 13:36
versuch mal ein http:// vor der adresse zu setzen.
mfg OLLI
Killi - Sa 14.06.03 13:47
tut auch nicht aber war ne gute Idee...hab schon gedacht "wenns das jetzt war......grml :roll: " ABer tut nicht...
Killi - So 15.06.03 20:11
Ich benutze Delphi6 wie schonmal geschrieben...und das Bsp. ist ja echt schön, sieht haargenau aus wie mein Projekt, aber es kommt immer das gleiche! Aktion abgebrochen und Seite kann nicht angezeigt werden!
Liegts evtl. am Win98???
Tat das Bsp bei dir?
Steven - So 15.06.03 20:33
welche browserversion hast du drauf?
das beispiel funktioniert bei mir...
du kannst mir ja mal dein beispiel schicken...
an
hodah@web.de
Anonymous - So 15.06.03 20:40
das liegt an deinen real internet explorer einstellungen....
die twebbrowser kombo greift auf deine falschen einstellungen vom ie zurück....
Steven - So 15.06.03 21:30
läuft den dein internet explorer?
Killi - Mo 16.06.03 22:31
Hi!
Hä??? Welche EInstellungen? Ja, mein IE tut - und ich hab die 6er Version drauf!
Habs heute in de rArbeit nachprogrammiert - tut alles wunderbar! Wieso denn bei mir daheim nicht??? Liegts wirklich nicht an Win98? Wenn nicht - dann...:WELCHE Einstellungen?
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!