Форум: "Основная";
Поиск по всему сайту: 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.71 MB
Время: 0.035 c
3-42372           TSV                   2001-12-12 12:39  2002.01.14  
Скроллинг мыши в DBGrid - продолжение


6-42536           Beginer               2001-10-18 06:32  2002.01.14  
Как прочитать значение IP адреса


14-42548          apav                  2001-11-13 18:31  2002.01.14  
ABC


3-42393           Sharm                 2001-12-10 17:38  2002.01.14  
Поиск по русским символам


14-42570          anod                  2001-11-09 20:39  2002.01.14  
Настройки Делфи