diff options
| author | Alexey Kulakov <panda75@bk.ru> | 2014-03-08 13:10:05 +0000 |
|---|---|---|
| committer | Alexey Kulakov <panda75@bk.ru> | 2014-03-08 13:10:05 +0000 |
| commit | d83baeb842ea828eaee90a0cd6575872a95240e8 (patch) | |
| tree | 8d775bb8920446118011093658caf7d9c0d61ed4 /include/delphi/m_contacts.inc | |
| parent | 0da38f608c271216398052dc0030b901951143ec (diff) | |
Pascal-style type correction
Letter case correction
small fixes
Actman UA part dialog slightly changed
git-svn-id: http://svn.miranda-ng.org/main/trunk@8473 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'include/delphi/m_contacts.inc')
| -rw-r--r-- | include/delphi/m_contacts.inc | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/include/delphi/m_contacts.inc b/include/delphi/m_contacts.inc index 8b39de0230..614492eede 100644 --- a/include/delphi/m_contacts.inc +++ b/include/delphi/m_contacts.inc @@ -22,17 +22,17 @@ type PCONTACTINFO = ^TCONTACTINFO;
TCONTACTINFO = record
cbSize : int;
- dwFlag : Byte;
- hContact: MCONTACT;
+ dwFlag : byte;
+ hContact: TMCONTACT;
szProto : PAnsiChar;
- _type : Byte;
+ _type : byte;
retval: record // in C this is a nameless union
case longint of
- 0: (bVal : Byte);
- 1: (wVal : WORD);
- 2: (dVal : DWORD);
+ 0: (bVal : byte);
+ 1: (wVal : word);
+ 2: (dVal : dword);
3: (szVal : TChar);
- 4: (cchVal: Word);
+ 4: (cchVal: word);
end;
end;
|