TWebBrowser if then Problem

[jaenicke]

Du suchst wohl eher PosEx statt Pos, aber das Problem ist halt, dass die Buchstaben einfach überall gefunden werden. Die können zufällig auch woanders vorkommen.

[klaus9]

Hi, jetzt glaube ich habe ich es hinbekommen..

Delphi-Quellcode:

var was:string;
begin
IF (pos('MH',string(webBrowser1.OleObject.Document.Body.InnerHtml))=0)
 THEN
 showmessage('nein')
    else
 IF (pos('11:45',string(webBrowser1.OleObject.Document.Body.InnerHtml))=0)  THEN
    showmessage('nein')
    else
         showmessage('jepp');
         end;

ist vielleicht nicht so super gut programmiert aber scheint zu klappen.. hoffe ich

[jaenicke]

Das ist (abgesehen von deiner etwas abenteuerlichen Formatierung) das selbe wie:

Delphi-Quellcode:

var
  was: string;
begin
  if (Pos('MH', string(webBrowser1.OleObject.Document.Body.InnerHtml)) = 0)
    or (Pos('11:45', string(webBrowser1.OleObject.Document.Body.InnerHtml)) = 0) then
    ShowMessage('nein')
  else
    ShowMessage('jepp');
end;

Aber wie gesagt:
Sobald zufällig die Buchstaben woanders auch vorkommen, und sei es in einem Wort, würden die so auch gefunden...

[klaus9]

ja stimmt da hast du recht.. hmm muß ich vielleicht nen bisschen rum probieren.