Einzelnen Beitrag anzeigen

Benutzerbild von Binärbaum
Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: In einem Feld suchen

  Alt 10. Mär 2005, 17:38
Zitat von Nisbo:
If Pos('sid',Memo2.caption) > 0 then ShowMessage('Drin!');

funktioniert

If Pos('sid=',Memo2.caption) > 0 then ShowMessage('Drin!');

allerdings nicht

als inhalt von Memo2.caption habe ich z.b. dieses format: name.php?schnulli=123&sid=

was für mich jetzt interessant zu wissen ist ob halt sid= schon vorhanden ist da ich es sonst selber hinten anfügen möchte
Wenn das 'sid=' immer am Ende des Strings steht, kann man das auch so überprüfen:
Delphi-Quellcode:
if copy(Memo2.Caption, length(Memo2.Caption)-3, 4) = 'sid=then begin
  //'sid=' ist vorhanden
  ...
end
else begin
  //ist noch nicht vorhanden
  ...
end;
MfG
Binärbaum
There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek
  Mit Zitat antworten Zitat