RichEdit-ы

← →
floxi © (2005-11-23 19:29) [0]

Добрый вечер!

Есть два RichEditа. В первом выдаётся информация из файла с помощью диалога OpenDialog1.FileName. Надо, чтобы инфа из RichEdit1 передалась в RichEdit2, но плюс ещё какая-нибудь информация, т.е.:

type
{Запись файла}
TFiles=record
Otdel: string [10]; {Код отделения}
Laba: string [10]; {Код лаборатории}
Nomer: string [10]; {Номер сотрудника}
Data: string [10]; {Дата}
Nachislenie: string [10]; {Код начисления}
Summa: string [10]; {Сумма начисления}
end;

var
st: string [30];
rec: TFiles; {запись, прочитанная из файла}
f: file of TFiles; {файл записей}
begin
...
// открытие файла
...
st:=rec.Otdel + " " + rec.Laba + " " + rec.Nomer + " " + rec.Data +
" " + rec.Nachislenie + " " + rec.Summa;
RichEdit1.Lines.Add(st);

Теперь нужно записать в RichEdit2 выборочные данные из RichEdit1: Otdel, Nomer, Laba и плюс номер по порядку, например. :0)

← →
Virgo_Style © (2005-11-23 20:43) [1]

А где вопрос?

P.S. imho, при более-менее большом количестве записей все это просится в БД.

← →
floxi © (2005-11-23 21:09) [2]

Как взять отдельный элемент из строчки?
Т.е. в RichEdit1 видны записи в столбиках (в 3 строчки например):
Otdel Nomer Laba Data
----------------------------------
23 67 34 12.05.2005
34 31 78 03.12.2003
45 12 05 16.07.2004
----------------------------------
Нужно взять и переписать в RichEdit2 только 1-й и 3-й столбик, а не всю строчку (только rec.Otdel, rec.Nomer, rec.Laba).

P.s. Может это и нельзя воспроизвести... много хочу от Delphi... задали задание, пользоваться БД не написано, просто "Работа с файлами".

Если работа с файлами, то стоит ли возиться с RichEdit"ами, или проще вывести во второй точно так же, как в первый - но без ненужного?
Или это в задании указано, что источник - первый RichEdit?

RichEdit-ы Найти похожие ветки