掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Memoについて (ID:6741)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
OnKeyPress begin if Length(memo1.lines[memo1.y])>50 then begin key:=''; end; end; momoの現在位置はyじゃなかったかな。。 読み込みをしないならこれでよし 読み込む場合は読み込み時に var i:integer; begin i:=0 while i<memo1.count do begin if Length(memo1.lines[i])>50 then begin memo1.lines[i]:=leftstr(memo1.lines[i],50); end; i:=i+1; end; end; memo1.yは多分間違ってます
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.