Memo

← →
PanDron (2002-03-29 11:51) [0]

Можно ли в Memo2 добавить все строки из Memo1 без операторов for i:=0 to ...?

← →
gek (2002-03-29 12:00) [1]

Memo1.Text:=Memo2.Text

← →
Andrews © (2002-03-29 12:01) [2]

Не знаю как у Memo, а ListBox`ами проходит такая операция ListBox1.Items := ListBox2.Items;

← →
Кулюкин Олег © (2002-03-29 12:03) [3]

Memo2.Lines.AddStrings(Memo1.Lines)

Только внутри метода AddStrings все сведется к for i:=0 to ...

← →
arhelon © (2002-03-29 12:15) [4]

memo1.lines:=memo2.lines

← →
Song © (2002-03-29 12:28) [5]

arhelon © (29.03.02 12:15)
Однако при таком присваивании, если memo2 будет уничтожен либо его Lines изменится, такие же изменения произойдут и в Memo1, потому что так мы только ссылаемся на динамическую область памяти. Поэтому, для безопасности лучше использовать Assign

>Song © (29.03.02 12:28)
Неправда ваша :)
Как раз Assign в этом случае и срабатывает (см. property Lines: TStrings read FLines write SetLines;
<.....>
procedure TCustomMemo.SetLines(Value: TStrings);
begin
FLines.Assign(Value);
end;
)

>Song © (29.03.02 12:28)
А Ты не когда не пробовал писать что-то типа
...
var q.TQuery;
begin
q:=Tq..Create(self);
q.sql:=memo1.lines;
...

И что после того как я поменяю memo1 в q у мня чё бордак будет???

А ежли наоборот хочю проверить
Memo1.Lines:=q.sql;
q.Free;
Что у мня в Memo1 ничё не останется ???
Или могет Ты не прав ???

Memo Найти похожие ветки