Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#8

AW: wort zwischen 2 zeichen rauskopieren

  Alt 2. Aug 2014, 09:35
so hab da was zusammen gewürfelt

Code:
Memo3.Text := Copy(Memo3.Text, Pos('<h1 itemprop="name">', Memo3.Text) + 1, Pos('</h1>', Memo3.Text) - Pos('<h1 itemprop="name">', Memo3.Text) - 1);
bleibt zwar noch "h1 itemprop="name">" aber das is nich so wild lösch ich einfach^^

falls wer was besseres hat immer her damit
Benutze niemals die Controls direkt, sondern überlege, was du wirklich machen möchtest. Sonst stehst du morgen vor dem Problem, wie das denn jetzt mit einem Edit, einer ComboBox, einer ListBox, .... funktioniert.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat