С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Денис abu
0 / 0 / 0
Регистрация: 29.05.2011
Сообщений: 6
1

Вставка Массива string в мемо

29.05.2011, 18:21. Просмотров 1074. Ответов 2
Метки нет (Все метки)

Мне дан массив фамилий участников и их результаты. как вставить массив фамилий в мемо и прявязать его к результатам
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.05.2011, 18:21
Ответы с готовыми решениями:

подскажите пожалуйста как сделать заполнение одного мемо количеством строк равных другому мемо?
Подскажите пожалуйста есть 2 memo в одному допустим 20 строк а в другом 5 как...

по нажатию кнопки программа вставляет с первого мемо строку с вызываемым номером во второй мемо на первое место
по нажатию кнопки программа вставляет с первого мемо строку с вызываемым...

Остаток массива в Мемо
Всем привет...пишу программку..есть функция, которая запускается по таймеру,...

Не выводит данные из мемо в мемо: почему?
Пишу тестовую оболочку. Нашла некоторые исходники. Исходя из моей логики - все...

Вывести элементы массива в Мемо
Как вывести НЕКОТОРЫЕ элементы массива в мемо? У меня получается, что...

2
i8085
1977 / 1369 / 264
Регистрация: 11.09.2009
Сообщений: 4,824
29.05.2011, 18:44 2
Денис abu, вставьте в StringGrid - сразу будет и привязка. Простейшая - по индексу.
Если надо, чтобы выглядело как сплошное текстовое поле - в "Инспекторе объектов" уберите линии у таблицы.
1
Mawrat
12834 / 5742 / 1700
Регистрация: 19.09.2009
Сообщений: 8,807
29.05.2011, 18:53 3
Лучший ответ Сообщение было отмечено Денис abu как решение

Решение

Массив строк в Мемо хранится в поле, тип которого является наследником класса TStrings: TMemo.Lines. А все наследники класса TStrings хранят пары: строка + объект. Объект - это элемент типа TObject, представляет собой во внутреннем представлении указатель. Поэтому можно через этот указатель привязывать к каждой строке из набора TMemo.Lines дополнительные данные.
Пример добавления пары строка-объект в Мемо.Lines:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
type
  TData = record
    Field1 : <Type1>;
    Field2 : <Type2>;
    ...
  end;
  TPData = ^TData;
...
var
  PData : TPData;
  S : String;
begin
  S := ...
  New(PData);
  PData^.Field1 := ...;
  PData^.Field2 := ...;
  ...
  Memo1.Lines.AddObject(S, TObject(PData));
  ...
end;
Пример извлечения пары строка-объект.
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
var
  PData : TPData;
  S : String;
  i : Integer;
begin
  for i := 0 to Memo1.Lines.Count - 1 do begin
    S := Memo1.Lines[i];
    PData := TPData(Memo1.Lines.Objects[i]);
    ...
  end;
  ...
end;
Перед удалением элементов из Memo1.Lines необходимо удалить из памяти прикреплённые к ним данные:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
var
  PData : TPData;
  i : Integer;
begin
  for i := 0 to Memo1.Lines.Count - 1 do begin
    PData := TPData(Memo1.Lines.Objects[i]);
    if PData <> nil then Dispose(PData);
  end;
  //Только теперь можно удалить элементы из Memo1.Lines:
  Memo1.Clear;
  ...
end;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.05.2011, 18:53

как перевести информацию из Мемо в фаил txt и обратно из txt в мемо
Подскажите пожалуйста, как перевести информацию из Мемо в фаил txt и обратно из...

Как из массива строк вывести текст в мемо, одной операцией, не выводя построчно?
Задача в следущем. Есть файл с байтами. После их раскодирования получаем...

вставка массива А в В
Заданы массивы целых: упорядоченный за не наростанием чисел A(n+m),...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru