Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.006 c
14-32945
Yaro
2002-01-27 07:55
2002.04.11
Кто в какой ОС работает?


14-32982
Merlin
2002-02-20 14:15
2002.04.11
Объявить МАТ


1-32806
sammy
2002-04-01 08:07
2002.04.11
GetWinFlags


1-32846
PEC
2002-03-29 10:05
2002.04.11
Привет народ !


7-32987
Serghei
2002-01-18 09:47
2002.04.11
Volume Serial Number для дискеты???





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский