Скачать: CL | DM;

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

---

← →
Alx2 ©   (2002-03-29 12:35) [6]

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

---

← →
arhelon ©   (2002-03-29 13:20) [7]

>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 ничё не останется ???
Или могет Ты не прав ???

---

← →
Song ©   (2002-03-29 17:21) [8]

arhelon © (29.03.02 13:20)
Что у мня в Memo1 ничё не останется ???

Именно так.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c