📄 strsedit.hpp
字号:
// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved
// (DO NOT EDIT: machine generated header) 'StrsEdit.pas' rev: 6.00
#ifndef StrsEditHPP
#define StrsEditHPP
#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <PropEdit.hpp> // Pascal unit
#include <ComCtrls.hpp> // Pascal unit
#include <StdCtrls.hpp> // Pascal unit
#include <Dialogs.hpp> // Pascal unit
#include <Forms.hpp> // Pascal unit
#include <Controls.hpp> // Pascal unit
#include <Graphics.hpp> // Pascal unit
#include <Classes.hpp> // Pascal unit
#include <SysUtils.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 Strsedit
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TfrmStrings;
class PASCALIMPLEMENTATION TfrmStrings : public Forms::TForm
{
typedef Forms::TForm inherited;
__published:
Stdctrls::TLabel* lblCount;
Comctrls::TRichEdit* redStrings;
Stdctrls::TButton* btnOK;
Stdctrls::TButton* btnCancel;
Stdctrls::TButton* btnClear;
Classes::TStrings* __fastcall GetStrings(void);
void __fastcall redStringsChange(System::TObject* Sender);
void __fastcall btnClearClick(System::TObject* Sender);
public:
__property Classes::TStrings* Strings = {read=GetStrings};
public:
#pragma option push -w-inl
/* TCustomForm.Create */ inline __fastcall virtual TfrmStrings(Classes::TComponent* AOwner) : Forms::TForm(AOwner) { }
#pragma option pop
#pragma option push -w-inl
/* TCustomForm.CreateNew */ inline __fastcall virtual TfrmStrings(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(AOwner, Dummy) { }
#pragma option pop
#pragma option push -w-inl
/* TCustomForm.Destroy */ inline __fastcall virtual ~TfrmStrings(void) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TfrmStrings(HWND ParentWindow) : Forms::TForm(ParentWindow) { }
#pragma option pop
};
class DELPHICLASS TStringsPropertyEditor;
class PASCALIMPLEMENTATION TStringsPropertyEditor : public Propedit::TPropertyEditor
{
typedef Propedit::TPropertyEditor inherited;
public:
virtual bool __fastcall Execute(void);
public:
#pragma option push -w-inl
/* TPropertyEditor.Create */ inline __fastcall virtual TStringsPropertyEditor(Proplist::TProperty* AProp) : Propedit::TPropertyEditor(AProp) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TStringsPropertyEditor(void) { }
#pragma option pop
};
//-- var, const, procedure ---------------------------------------------------
} /* namespace Strsedit */
using namespace Strsedit;
#pragma option pop // -w-
#pragma option pop // -Vx
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // StrsEdit
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -