TWebBrowser: Inhaltbereich markieren und drucken???

[romber]

Hallo!

Ich lade eine bestimmte Seite in TWebBrowser. Kann ich irgendwie den bestimmten Bereicht des Seiteninhalts markieren, wenn ich die Quellcode der Seite kenne und genau weiss, wie der zu markierenden Bereich im Quellcode anfängt und endet? Ist das überhaupt möglich? Diesen Bereich möchte ich dann drucken, genau so wie im normalen Browser, wenn wir nicht die ganze Seite, sondern nur den markierten Bereich drucken wollen.

Danke!

[Volker Z.]

Hallo,

leider etwas wenig Information.

Zitat:

[...] wenn ich die Quellcode der Seite kenne und genau weiss, wie der zu markierenden Bereich im Quellcode anfängt und endet [...]

Heißt das Du kennst den Textinhalt der Seite oder hat der Quellcode eine ganz spezielle Struktur (Kommentare o. ä.)?

Wenn Du den Textinhalt der Seite kennst, also z. B.:

Ich lade eine bestimmte Seite in TWebBrowser. Kann ich irgendwie den bestimmten Bereicht des Seiteninhalts markieren, wenn ich die Quellcode der Seite kenne und genau weiss, wie der zu markierenden Bereich im Quellcode anfängt und endet? Ist das überhaupt möglich? Diesen Bereich möchte ich dann drucken, genau so wie im normalen Browser, wenn wir nicht die ganze Seite, sondern nur den markierten Bereich drucken wollen.

und Du möchtest den Teil von "Ich lade eine bestimmte [...]" bis "[..] Ist das überhaupt möglich?" selektieren und drucken, dann ginge das z. B. so:

Delphi-Quellcode:

procedure TForm1.Button1Click (Sender : TObject);
var
  t0, t1 : string;
  r0, r1 : IHTMLTxtRange;
begin
  t0 := 'Ich lade eine bestimmte';
  t1 := 'Diesen Bereich möchte ich dann';
  r0 := ((WebBrowser1.Document as IHTMLDocument2).body as IHTMLBodyElement).createTextRange;
  r1 := ((WebBrowser1.Document as IHTMLDocument2).body as IHTMLBodyElement).createTextRange;
  if r0.findText (t0, 0, 0) and r1.findText (t1, 0, 0) then
    begin
      r0.setEndPoint ('EndToStart', r1);
      r0.moveEnd ('word', -1);
      r0.select;
      WebBrowser1.ExecWB (OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT)
    end
end;

Sollte Dir den Bereich entsprechend selektieren und den Druckdialog aufrufen.

Wenn Du etwas anderes vor hast, dann musst Du schon noch etwas Info liefern.


Gruß

[romber]

Erst mal vielen Dank für die schnelle Reaktion!

Zitat von Volker Z.:

Heißt das Du kennst den Textinhalt der Seite oder hat der Quellcode eine ganz spezielle Struktur (Kommentare o. ä.)?

Die Quellcode hat eine ganz spezielle Struktur.

Zitat von Volker Z.:

...und Du möchtest den Teil von "Ich lade eine bestimmte [...]" bis "[..] Ist das überhaupt möglich?" selektieren und drucken...

Genau. Allerdings ist der o.g. Texbeispiel mit dem Inhalt zu vergleichen, den ich markieren und ausdrucken möchte. Diesen Inhalt kenne ich nicht, ich weiss nur, dass der benötigte Berreich im Quelltext der Seite immer zwischen zwei HTML-Tags steht. So Z.B:

Code:

<irgendwas id="irgendelcheDetails" class="details">Hier der Bereich zum Selektieren</irgendwas>

Das bedeuted, ich kann in meinem Fall nicht einfach den Text im Browser-Bereich markieren, sondern muss irgendwie mit dem Quelltext der Seite arbeiten.

[Volker Z.]

Hallo,

leider kann ich wieder nur raten. Hilft Dir vielleicht folgendes weiter:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  d : IHTMLDocument3;
  e : IHTMLElement;
  t : string;
  r : IHTMLTxtRange;
begin
  d := WebBrowser1.Document as IHTMLDocument3;
  if not Assigned (d) then
    Exit;

  e := d.getElementById ('irgendelcheDetails');
  if Assigned (e) then
    begin
      t := e.innerText;
      r := ((WebBrowser1.Document as IHTMLDocument2).body as IHTMLBodyElement).createTextRange;
      if r.findText (t, 0, 0) then
        begin
          r.select;
          WebBrowser1.ExecWB (OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT)
        end
    end
end;

[EDIT]
Wenn es die NSA nicht wissen darf was Du selektiv ausdrucken möchtest, ok auch gut, ansonsten zeigt doch einfach den HTML-Code; helfen wird dann sicherlich einfacher.
[/EDIT]

Gruß

[Perlsau]

Zitat von romber:

Genau. Allerdings ist der o.g. Texbeispiel mit dem Inhalt zu vergleichen, den ich markieren und ausdrucken möchte. Diesen Inhalt kenne ich nicht, ich weiss nur, dass der benötigte Berreich im Quelltext der Seite immer zwischen zwei HTML-Tags steht. So Z.B:

Code:

<irgendwas id="irgendelcheDetails" class="details">Hier der Bereich zum Selektieren</irgendwas>

Das bedeuted, ich kann in meinem Fall nicht einfach den Text im Browser-Bereich markieren, sondern muss irgendwie mit dem Quelltext der Seite arbeiten.

Derartige HTML-Parser habe ich schon öfter geschrieben, und auch diese Problematik ist mir nicht ganz fremd. Da du den Quelltext verwenden mußt, um einen bestimmten Textbereich eingrenzen zu können, wäre es sicher nicht verkehrt, dir die ersten zwei drei Worten nach <irgendwas id="irgendelcheDetails" class="details"> zu merken und ebenso die letzten zwei drei Worte vor </irgendwas>. Diese beiden Strings übergibst du dann an deine Markier- und Druckmethode, z.B. die von Volker Z oben.