掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
改行コードを判別したいのですが (ID：8798)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
固定長でしたか ではansiposは不要ですね procedure TForm1.Button1Click(Sender: TObject); var LFPos,CRPos:integer; L:integer; T:string; begin 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.