掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
改行コードを判別したいのですが (ID：8799)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
> これで可能かと思います 本当に試しましたか？ Memo1.Lines.Text にしてしまうと改行は CRLF になってしまうよ。 procedure TForm1.Button1Click(Sender: TObject); var s,T:string; L:integer; begin s := '0123456789'+#10+'0123456789'; Memo1.Lines.Text := s; L:=10;//改行コードを除いた１行の長さ T :=Memo1.Text; case T[L+1] of #10 :Showmessage('LF'); #13 :if T[L+2]=#10 then Showmessage('CRLF') else Showmessage('CR'); end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.