Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**BackOrifice**

Ohne, dass man jetzt 4k Zeilen RegExpr einbinden muss:

Delphi-Quellcode:

			function GetSecondWord(Str: String): String;

begin

  Result := Copy(Str,Pos(' ',Str) + 1,Length(Str);

end;

Davon ausgehend, dass String := 'Wort1 Wort2' ist.

BackOrifice Registriert seit: 6. Jun 2005 74 Beiträge Delphi 2007 Architect	#10 Re: Wort nach einem Wort 24. Feb 2009, 04:52 Ohne, dass man jetzt 4k Zeilen RegExpr einbinden muss: markieren Delphi-Quellcode: function GetSecondWord(Str: String): String; begin Result := Copy(Str,Pos(' ',Str) + 1,Length(Str); end; Davon ausgehend, dass String := 'Wort1 Wort2' ist. Henning
	Zitat