文字列の分割がうまくいきません (ID:38564)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 >文字列をタブで分割し、一番前の部分を取得しようとしていますが なら function Take(Text:String; Delimiter: String = #8): String; begin Result := Copy(Text,1,Pos(Delimiter,Text)-1); end; でいいんじゃないか？