-
Notifications
You must be signed in to change notification settings - Fork 3
/
Copy pathMSDATASRC_TLB.pas
96 lines (80 loc) · 4.32 KB
/
MSDATASRC_TLB.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
unit MSDATASRC_TLB;
// ************************************************************************ //
// WARNING
// -------
// The types declared in this file were generated from data read from a
// Type Library. If this type library is explicitly or indirectly (via
// another type library referring to this type library) re-imported, or the
// 'Refresh' command of the Type Library Editor activated while editing the
// Type Library, the contents of this file will be regenerated and all
// manual modifications will be lost.
// ************************************************************************ //
// PASTLWTR : $Revision: 1.130.1.0.1.0.1.6 $
// File generated on 23/03/2017 11:59:23 from Type Library described below.
// ************************************************************************ //
// Type Lib: C:\Windows\System32\msdatsrc.tlb (1)
// LIBID: {7C0FFAB0-CD84-11D0-949A-00A0C91110ED}
// LCID: 0
// Helpfile:
// DepndLst:
// (1) v2.0 stdole, (C:\Windows\SysWOW64\stdole2.tlb)
// (2) v4.0 StdVCL, (C:\Windows\SysWOW64\stdvcl40.dll)
// ************************************************************************ //
{$TYPEDADDRESS OFF} // Unit must be compiled without type-checked pointers.
{$WARN SYMBOL_PLATFORM OFF}
{$WRITEABLECONST ON}
{$VARPROPSETTER ON}
interface
uses Windows, ActiveX, Classes, Graphics, StdVCL, Variants;
// *********************************************************************//
// GUIDS declared in the TypeLibrary. Following prefixes are used:
// Type Libraries : LIBID_xxxx
// CoClasses : CLASS_xxxx
// DISPInterfaces : DIID_xxxx
// Non-DISP interfaces: IID_xxxx
// *********************************************************************//
const
// TypeLibrary Major and minor versions
MSDATASRCMajorVersion = 1;
MSDATASRCMinorVersion = 0;
LIBID_MSDATASRC: TGUID = '{7C0FFAB0-CD84-11D0-949A-00A0C91110ED}';
IID_DataSourceListener: TGUID = '{7C0FFAB2-CD84-11D0-949A-00A0C91110ED}';
IID_DataSource: TGUID = '{7C0FFAB3-CD84-11D0-949A-00A0C91110ED}';
type
// *********************************************************************//
// Forward declaration of types defined in TypeLibrary
// *********************************************************************//
DataSourceListener = interface;
DataSource = interface;
// *********************************************************************//
// Declaration of structures, unions and aliases.
// *********************************************************************//
PUserType1 = ^TGUID; {*}
DataMember = WideString;
// *********************************************************************//
// Interface: DataSourceListener
// Flags: (272) Hidden OleAutomation
// GUID: {7C0FFAB2-CD84-11D0-949A-00A0C91110ED}
// *********************************************************************//
DataSourceListener = interface(IUnknown)
['{7C0FFAB2-CD84-11D0-949A-00A0C91110ED}']
function dataMemberChanged(const bstrDM: DataMember): HResult; stdcall;
function dataMemberAdded(const bstrDM: DataMember): HResult; stdcall;
function dataMemberRemoved(const bstrDM: DataMember): HResult; stdcall;
end;
// *********************************************************************//
// Interface: DataSource
// Flags: (256) OleAutomation
// GUID: {7C0FFAB3-CD84-11D0-949A-00A0C91110ED}
// *********************************************************************//
DataSource = interface(IUnknown)
['{7C0FFAB3-CD84-11D0-949A-00A0C91110ED}']
function getDataMember(const bstrDM: DataMember; var riid: TGUID; out ppunk: IUnknown): HResult; stdcall;
function getDataMemberName(lIndex: Integer; out pbstrDM: DataMember): HResult; stdcall;
function getDataMemberCount(out plCount: Integer): HResult; stdcall;
function addDataSourceListener(const pDSL: DataSourceListener): HResult; stdcall;
function removeDataSourceListener(const pDSL: DataSourceListener): HResult; stdcall;
end;
implementation
uses ComObj;
end.