Memoコンポート内にある複数行の文字列をそのままラベルに表示させるには?


カーク  2006-02-09 17:13:53  No: 19955  IP: 192.*.*.*

Memoコンポーネントで複数行にわたるテキスト文を入力し、
その内容をLabelコンポーネントにそのままの状態(改行された状態)で
表示するにはどうしたらいいのでしょうか?
改行コードをいくつか挿入しようとしたのですが、わからない状況です。

編集 削除
にしの  2006-02-09 17:20:27  No: 19956  IP: 192.*.*.*

普通にできますが、どのようにやったのでしょうか。
もしかして、
Label1.Caption := '';
for i := 0 to Memo1.Lines.Count - 1 do Label1.Caption := Label1.Caption + Memo1.Lines[i];
としていませんか?
Linesプロパティは、改行を含まない1行を返します。
もしこの方法を取るなら、Memo1.Lines[i] +#13#10;のように改行コードをつけないと改行されません。

単にMemo1の内容をLabelに移したいのであれば、
Label1.Caption := Memo1.Text;
でよろしいかと思います。
# 環境:Delphi7

編集 削除
カーク  2006-02-09 17:28:34  No: 19957  IP: 192.*.*.*

これでやったのですが、ダメでした
for i := 0 to MemoA.Lines.Count - 1 do
  LabelA.Caption := LabelA.Caption + MemoA.Lines[i] + @@@;

@@@=Chr(13)+chr(10)、#13#10、Chr($D)+Chr($A)

Label1.Caption := Memo1.Text;
これでは改行はされていませんでした。

# 環境:Delphi5

編集 削除
HOta  2006-02-09 21:47:39  No: 19958  IP: 192.*.*.*

Label1.Caption := Memo1.Text;
で問題ないですよ。

編集 削除
にしの  2006-02-09 21:52:25  No: 19959  IP: 192.*.*.*

あと考えられるのは、AutoSizeがFalseになっているとか?

編集 削除