Memoについて

解決

HY57 2008-01-03 16:38:07 No: 29147

HY57です。
編集中のMemo1から３行目の文字をEdit3に表示いたいのですが、
Memo1.Lines.SaveToFile('Mytext.txt');

lines.LoadFromFile('Mytext.txt');
if lines.Count >= 1 then   begin
   s := lines[3-1];
   if Length(s) >= 0 then   begin
   Edit3.Text:=(s);
  end;
直接Memo1から３行目の文字をEdit3に表示する方法を教えて下さい。
よろしくお願いします。

サンプー 2008-01-03 21:00:37 No: 29148

ヘルプやコードをよく読んでね
Edit3.text := memo1.lines[2];

KHE00221 2008-01-03 21:03:38 No: 29149

出来てない？

通りがかり 2008-01-03 22:06:53 No: 29150

> lines.LoadFromFile('Mytext.txt');
> if lines.Count >= 1 then   begin
>    s := lines[3-1];
>    if Length(s) >= 0 then   begin
>    Edit3.Text:=(s);
>   end;

但し、lines.Count の値を lines[n] が超えないように判断する
必要がありますが．．．

HY57 2008-01-03 23:55:14 No: 29151

サンプーさん、KHE00221さん、通りがかりさん
有り難う御座います。