summaryrefslogtreecommitdiff
path: root/include/delphi/m_protocols.inc
diff options
context:
space:
mode:
authorGeorge Hazan <george.hazan@gmail.com>2014-08-14 12:12:35 +0000
committerGeorge Hazan <george.hazan@gmail.com>2014-08-14 12:12:35 +0000
commit0a1ec91589a265b41210068b8d21fa469e750a08 (patch)
tree2d439bc1241b12ccadd66660d08f7b325d459ebd /include/delphi/m_protocols.inc
parent9f478bb53be99c6ad5cf69c1a61cc14900cf72b8 (diff)
account creation code extracted to the separate service function, MS_PROTO_CREATEACCOUNT
git-svn-id: http://svn.miranda-ng.org/main/trunk@10181 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'include/delphi/m_protocols.inc')
-rw-r--r--include/delphi/m_protocols.inc25
1 files changed, 17 insertions, 8 deletions
diff --git a/include/delphi/m_protocols.inc b/include/delphi/m_protocols.inc
index 9cf6007b4f..ef17ae9dff 100644
--- a/include/delphi/m_protocols.inc
+++ b/include/delphi/m_protocols.inc
@@ -273,20 +273,29 @@ type
end;
tagACCOUNT = TPROTOACCOUNT;
-const
//account enumeration service
//wParam=(WPARAM)(int)piNumAccounts
//lParam=(LPARAM)(PROTOACCOUNT**)paAccounts
+const
MS_PROTO_ENUMACCOUNTS:PAnsiChar = 'Proto/EnumAccounts';
- MS_PROTO_ENUMPROTOS :PAnsiChar = 'Proto/EnumProtos'; // MIRANDA_VER >= $800
-// MS_PROTO_ENUMPROTOCOLS:PAnsiChar = 'Proto/EnumProtocols';// MIRANDA_VER < $800
+ MS_PROTO_ENUMPROTOS:PAnsiChar = 'Proto/EnumProtos'; // MIRANDA_VER >= $800
+
+type
+ PACC_CREATE = ^ACC_CREATE;
+ ACC_CREATE = record
+ pszBaseProto :PAnsiChar;
+ pszInternal :PAnsiChar;
+ ptszAccountName:PWideChar;
+ end;
+
+const
+// creates new account
+// wParam = 0
+// lParam = (LPARAM)(ACC_CREATE*) account definition
+// return value = PROTOACCOUNT* or NULL
+ MS_PROTO_CREATEACCOUNT:PAnsiChar = 'Proto/CreateAccount';
-(*
-__inline int ProtoEnumAccounts( int* accNumber, PROTOACCOUNT*** accArray )
-{ return CallService( MS_PROTO_ENUMACCOUNTS, ( WPARAM )accNumber, (LPARAM)accArray );
-}
-*)
//retrieves an account's interface by its physical name (database module)
//wParam=0
//lParam=(LPARAM)(AnsiChar*)szAccountName