blob: b428869e875c23e774aab8cbb2b8ceef62b1d797 (
plain) (
blame)
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
|
// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved
// (DO NOT EDIT: machine generated header) 'TntControls.pas' rev: 5.00
#ifndef TntControlsHPP
#define TntControlsHPP
#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <TntClasses.hpp> // Pascal unit
#include <TntForms.hpp> // Pascal unit
#include <Forms.hpp> // Pascal unit
#include <Controls.hpp> // Pascal unit
#include <Classes.hpp> // Pascal unit
#include <Messages.hpp> // Pascal unit
#include <Windows.hpp> // Pascal unit
#include <SysInit.hpp> // Pascal unit
#include <System.hpp> // Pascal unit
//-- user supplied -----------------------------------------------------------
namespace Tntcontrols
{
//-- type declarations -------------------------------------------------------
//-- var, const, procedure ---------------------------------------------------
#define UNICODE_CLASS_EXT ".UnicodeClass"
extern PACKAGE bool __fastcall IsTextMessage(unsigned Msg);
extern PACKAGE void __fastcall MakeWMCharMsgSafeForAnsi(Messages::TMessage &Message);
extern PACKAGE void __fastcall RestoreWMCharMsg(Messages::TMessage &Message);
extern PACKAGE wchar_t __fastcall GetWideCharFromWMCharMsg(const Messages::TWMKey &Message);
extern PACKAGE void __fastcall SetWideCharForWMCharMsg(Messages::TWMKey &Message, wchar_t Ch);
extern PACKAGE bool __fastcall HandleIMEComposition(unsigned hWnd, const Messages::TMessage &Message
);
extern PACKAGE void __fastcall SubClassUnicodeControl(Controls::TWinControl* Control);
extern PACKAGE void __fastcall CreateUnicodeHandle(Controls::TWinControl* Control, const Controls::TCreateParams
&Params, const WideString SubClass);
extern PACKAGE WideString __fastcall WideGetWindowText(Controls::TWinControl* Control);
extern PACKAGE void __fastcall WideSetWindowText(Controls::TWinControl* Control, const WideString Text
);
extern PACKAGE WideString __fastcall TntAdjustLineBreaks(const WideString S);
} /* namespace Tntcontrols */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Tntcontrols;
#endif
#pragma option pop // -w-
#pragma option pop // -Vx
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // TntControls
|
