Memoについて

解決


HY57  2008-01-03 16:38:07  No: 29147  IP: [192.*.*.*]

HY57です。
編集中のMemo1から3行目の文字を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から3行目の文字をEdit3に表示する方法を教えて下さい。
よろしくお願いします。

編集    削除
サンプー  2008-01-03 21:00:37  No: 29148  IP: [192.*.*.*]

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

編集    削除
KHE00221  2008-01-03 21:03:38  No: 29149  IP: [192.*.*.*]

出来てない?

編集    削除
通りがかり  2008-01-03 22:06:53  No: 29150  IP: [192.*.*.*]

> 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  IP: [192.*.*.*]

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

編集    削除