Mit readln nur bestimmte Textstelle auslesen

[hamptoncourt]

naja, ich werde hier vermutlich gleich gesteinigt, geteert und gefedert, aber irgendwie will das nicht so recht klappen ...

Habe im Forum ein paar Beispiele zu dem gefunden und versucht, mich daran zu orientieren (dachte, wenn es bei denen klappt, dann vielleicht auch bei mir) ... aber es klappt natürlich nicht ...

Delphi-Quellcode:

Pos1 := pos('"H1">',s);
if Pos1 <>0 Then
begin
Pos2 := PosEx('>', s, Pos1 + 1);
if Pos2 <> 0 Then
begin
Pos3 := PosEx('<',s,Pos2 + 1);
if Pos3<>0 Then
begin
n := Pos3-Pos2;
s2 := copy(s, Pos2, length(n));
end;

Vermutlich bin ich auf nem komplett falschen tripp :-/ Aber der sagt auch Identifire not found "PosEx" ...

[Namenloser]

Hallo, PosEx befindet sich meines Wissens nach in der Unit strutils, die musst du also oben unter uses hinzufügen.

Außerdem: Bist du sicher, dass das H1 in doppelten Anführungszeichen eingeschlossen ist? Eigentlich heißt es <H1> und nicht <"H1"> .

Und rücke deinen Code ein, sonst wirst du schnell die Übersicht verlieren.

[hamptoncourt]

Ja, ich habe nochmal im Quelltext der Homepage nachgesehen, da steht: "H1">< ...