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




Вниз

TMemo 


$Hic0   (2001-12-26 20:11) [0]

Имеется текстовый файл... из которого считывается информация и заполняются поля массива Inbox описанного ранее типа TMailBox
TMailBox = Record
MFrom : String[80];
MTo : String[80];
MSubject : String[80];
MHeader : TMemo;
MBody : TMemo;
end;
....
Var
InBox : Array[1..1000] of TMailBox;
.....
Считывание вроде происходит без всяких ошибок. Считваю я не бог весть как, в кратце. Нахожу ключевое слово в файле и начинаю считывать строки до тех пор пока не дойду до другого ключевого слова. Так вот в каждом элементе массива InBox имеется два поля TMemo. Заношу инфу в них я так:
Условие Начало
ReadLn(InboxF,s);
Memo2.Lines.Add(s);
Конец
Inbox[MessagesCount].MHeader:=Memo2;
Вроде заносит, по крайней мере в Memo2 все отображается...
Теперь я пытаюсь считать из этого массива поле какого-либо элемента:
If CheckBox1.Checked then Memo1.Text:=InBox[ListView1.Selected.Index+1].MHeader.Text+InBox[ListView1.Selected.Index+1].MBody.Text else
Memo1.Text:=InBox[ListView1.Selected.Index].MBody.Text;
Выдается ошибка. Без номера просто Аксес виолатион по адресу
В чем трабла? Помогите плиз :)
Заранее спасибо
Shico



SergVlad   (2001-12-26 21:28) [1]

Вместо
Inbox[MessagesCount].MHeader:=Memo2;
надо
Inbox[MessagesCount].MHeader.Lines.Assign(Memo2.Lines);
или
Inbox[MessagesCount].MHeader.Lines.AddStrings(Memo2.Lines);





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




Наверх





Память: 0.72 MB
Время: 0.015 c
1-42507           Dim!S                 2001-12-26 07:32  2002.01.14  
Подключение htmlhelp


1-42475           Snake2000             2001-12-24 17:11  2002.01.14  
Производная


4-42636           Xeon                  2001-11-10 19:57  2002.01.14  
Программа и ОЗУ


1-42483           катерина              2001-12-25 16:17  2002.01.14  
ну,кто-нибудь!.... :-(


6-42522           Polevi                2001-10-17 11:45  2002.01.14  
С мольбой о помощи взываю!!!