Скачать: CL | DM;

Вопрос по динамическим структурам данных   Найти похожие ветки 

← →
Sergey1982 ©   (2007-05-10 17:07) [0]

Здравствуйте! Я не особо силён в 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) [1]

s: string;
PRec: PTRec32C;

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c