Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вопрос по динамическим структурам данных [Delphi, Windows]


Sergey1982 ©   (2007-05-10 17:07:00) 

Здравствуйте! Я не особо силён в Delphi. Возникла задача написать плагин для программы Venta fax. Плагин представляет собой DLL, функция из которой будет вызываться по окончании каждой сессии. Вот вид функции function AfterSession(R : TRec32C): LongInt; stdcall; export;

Описание структуры TRec32C.
-----------------------------------

 TDaTi = record
   Year  : word;
   Month : word;
   Day   : word;
   Hour  : word;
   Min   : word;
   Sec   : word;
 end;

 PTRec32C = ^TRec32C;
 TRec32C = Record
   Phone : array[0..63] of char;
   Company  : array[0..63] of char;
   ToAbonent : array[0..73] of char;
   FileName : array[0..255] of char;
   DocName : array[0..73] of char;
   Result, Speed, Quality : word;
   Date : TDaTi;
   Min, Sec : word;
   Pages : word;
   LastPage : word;
   NBlock   : longint;
   NBadBlock: longint;
   Attr : word;
   ExtData : array[0..63] of char;
   CSI : array[0..21] of char;
   NCF : array[0..63] of char;
   RecId : longint;
   AbId : longint;
   CompName: array[0..31] of char;
   Reserve : array[0..63] of char;
 end;

Мне нужно сделать чтобы значения некоторых элементов структуры TRec32C записывались в текстовый файл после каждой сессии. Каким образом мне получить доступ например к TRec32C.phone ? Пожалуйста подскажите написав небольшой пример. С уважением, Сергей.


MBo   (2007-05-10 17:12:00) [1]

s: string;
PRec: PTRec32C;

s:= PRec^.Phone;
Writeln(ATextFile, s);//или другой метод записи в файл


Наверх

Титульная страница Поиск, карта сайта Написать письмо