AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi In einer Seite nach einem Wert suchen... [TWebBrowser]
Thema durchsuchen
Ansicht
Themen-Optionen

In einer Seite nach einem Wert suchen... [TWebBrowser]

Ein Thema von NeoXan · begonnen am 25. Jan 2004 · letzter Beitrag vom 26. Jan 2004
Antwort Antwort
NeoXan
(Gast)

n/a Beiträge
 
#1

In einer Seite nach einem Wert suchen... [TWebBrowser]

  Alt 25. Jan 2004, 22:13
Code:
<td bgcolor='#880000' width='129.07894736842' align='center' height='14'>
15
</td>
Moin,

wie könnte ich den Wert [15] auslesen. Die Property bgcolor und align sind unter den gesamten td Tags einmalig...oder könnte man angeben das der Wert in der so-und-so-vielten Zeile/Spalte ausgelesen werden soll.

mfg
NeoXan
  Mit Zitat antworten Zitat
Benutzerbild von Stanlay Hanks
Stanlay Hanks

Registriert seit: 1. Mär 2003
2.078 Beiträge
 
Delphi 2005 Professional
 
#2

Re: In einer Seite nach einem Wert suchen... [TWebBrowser]

  Alt 25. Jan 2004, 22:25
Hi! Schau mal hier. Der Beitrag zeigt, wie man den Quelltext einer Internet Seite in ein Memo bekommt. Wenn die Zeichenfolge wirklich einmalig ist, könntest du mit

FPosition := Pos('Einmalige Zeichenfolge', Memo1.Text); Den Afang des Tags suchen und dann mit

IntegerVariable := FPosition + Length('Einmalige Zeichenfolge'); an das Ende dieses Strings navigieren. Wenn du dann schreibst

StringVariable := Copy(Memo1.Text, IntegerVariable, 2); //2 ist die Länge des Strings der ausgelesen werden soll dann solltest du die Zahl haben. (Das würde natürlich bedingen, dass die Zahl immer 2 Stellig oder dreistellig usw ist. Aber das is ja noch abänderbar).

Du kannst auch eine ganze Zeile auslesen:

Memo1.Lines[1] liefert dir den String aus der zweiten Zeile eines Memos.

Man liest sich, Stanlay
  Mit Zitat antworten Zitat
NeoXan
(Gast)

n/a Beiträge
 
#3

Re: In einer Seite nach einem Wert suchen... [TWebBrowser]

  Alt 25. Jan 2004, 23:00
boah herlich...dat funzt allet

hmm...jetzt fehlt nur noch diese eine Überprüfung...also vielleicht könnte man das ja mit AnsiContainsStr machen...also überprüfen ob die Stringvariable NUR 0-9 enthält...und wenn es andere Werte enthält, dann ist die Zahl vermutlich kleiner als 2 stellig bzw. die falsche posi, richtig?
  Mit Zitat antworten Zitat
Benutzerbild von Stanlay Hanks
Stanlay Hanks

Registriert seit: 1. Mär 2003
2.078 Beiträge
 
Delphi 2005 Professional
 
#4

Re: In einer Seite nach einem Wert suchen... [TWebBrowser]

  Alt 26. Jan 2004, 14:59
Du könntest auch einfach schreiben:

Delphi-Quellcode:
var str : String;
FLength : Integer;
begin
.
.
.
str := Copy(Memo1.Text,IntegerVariable, Memo1.Text - IntegerVariable); //Kopiert alles nach dem einleitenden <td..> Tag in die String Variable "Str"

FLength := Pos('</td>',Memo1.Text); //FLength ist die Position des ersten Vorkommens von </td>, also den abschließenden html Tags.
Dann könntest du die "Copy" Funktion aus meinem ersten Beitrag abändern in:

StringVariable := Copy(Memo1.Text, IntegerVariable, FLength); Wenn ich mich nicht vertan hab, müsstest du dann den gesamten Wert zwischen den zwei Tags kriegen.

Man liest sich, Stanlay
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:11 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz