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

Вниз

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

 
Тест   (2005-10-14 22:57) [0]

Не подскажите как текст из memo1 и memo 2 поместить в memo3


 
Виталька2005   (2005-10-14 23:14) [1]

Если правильно понял вопрос, то
memo3.text:=memo1.ttext+memo2.text


 
Eraser ©   (2005-10-14 23:18) [2]


> Тест   (14.10.05 22:57)

m3.Lines.AddStrings(m1.Lines);
m3.Lines.AddStrings(m2.Lines);


 
Тест   (2005-10-14 23:47) [3]

Спасибо !!!

А как получившееся упорядочить по Алфавиту ?

var  List:TStringList;
begin
List:=TStringList.Create;
try
  List.AddStrings(Memo1.Lines);
  List.Sort;
  Memo2.Lines:=List;
finally
  List.Free;
end;
end;

Нашел этот код здесь на форуме можно ли сделать попроще?


 
Eraser ©   (2005-10-14 23:52) [4]


> Тест   (14.10.05 23:47) [3]

Непонятно ЧТО требуется от этого кода... опиши словами.


 
Тест   (2005-10-15 00:51) [5]

Вообще мне нужно получившиеся в memo3 упорядочить алфавиту...


 
Германн ©   (2005-10-15 01:34) [6]

2 Тест   (14.10.05 23:47) [3]

> можно ли сделать попроще?

А что тут можно "упростить"?
Если имеется в виду замена строк "найденного кода" на "установку некоего параметра в Инспекторе Объектов, то никак. :(
Не, ну можно, но ...


 
Eraser ©   (2005-10-15 11:44) [7]


> Тест   (15.10.05 00:51) [5]

Можно методом пузырька, к примеру.



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

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

Наверх




Память: 0.45 MB
Время: 0.052 c
2-1129476362
_WWW
2005-10-16 19:26
2005.11.06
WebBrowser


11-1110634509
Watcher
2005-03-12 16:35
2005.11.06
Transparent


6-1122268035
joisy
2005-07-25 09:07
2005.11.06
Контроль и Сохранение Веб Страниц


6-1121237106
Vadik
2005-07-13 10:45
2005.11.06
TSocket (client and server)


2-1129186502
Monk
2005-10-13 10:55
2005.11.06
Вопрос по SQL





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский