| Class TStrEditForm (unit Sed) |
TForm
//.CAPTION Unit Sed // //.AUTOR Dmitry M.Ivlev //.COPYRIGHT DiSoft 1998. //.VERSION 1.2 // //.SHORT This unit contain property editors for TStrings and TComponents. //.DESC //. //. TStringsProperty - a good editor for TStrings components. //. Unlike standart one this editor dosn't break wrapped lines. //. It also more compact and has sizing border. //. //. TComponentProperty - a good editor for all component properties. //. With this editor can select control from list. When control already //. selected you can either edit selected component properties clicking plus //. sign or open properties in inspector box double clicking etitor. //. //. TFileNameProperty - calls standard OpenDialog for 'FileName' properties; //. It lets easy enter file name for existing files or search them. //. //. TString2Property - allow you insert multiline string to the strings //. properties. It's good for multiline Captions, Hints and many other cases. //. //. TShortCut2Property - lets you to enter ShortCut value simple pressing keys //. compination. I removed paValueList attribute from editor and now it doesn't //. shows drop down button but you can easy add it in GetAttributes function. // //.TITLE TStringsProperty //.TITLE TComponentProperty //.TITLE TFileNameProperty //.TITLE TString2Property //.TITLE TShortCut2Property
| Constructors |
| Functions |
procedure Cancel1Click(Sender: TObject);
procedure Cancel2Click(Sender: TObject);
procedure ClearAll1Click(Sender: TObject);
procedure Copy2Click(Sender: TObject);
procedure Cut1Click(Sender: TObject);
procedure Delete1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure JustifyClick(Sender: TObject);
procedure Load1Click(Sender: TObject);
procedure MemoChange(Sender: TObject);
procedure MemoKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure OkClick(Sender: TObject);
procedure Paste1Click(Sender: TObject);
procedure SelectAll1Click(Sender: TObject);
procedure Undo2Click(Sender: TObject);| Properties |
| Events |
| Variables |
Align1 : TMenuItem;
Cancel1 : TMenuItem;
Cancel2 : TMenuItem;
ClearAll1 : TMenuItem;
Copy2 : TMenuItem;
Cut1 : TMenuItem;
Delete1 : TMenuItem;
Edit2 : TMenuItem;
File1 : TMenuItem;
JustifyCenter1 : TMenuItem;
JustifyRight1 : TMenuItem;
Left1 : TMenuItem;
Load1 : TMenuItem;
MainMenu1 : TMainMenu;
Memo : TMemo;
N1 : TMenuItem;
N2 : TMenuItem;
N3 : TMenuItem;
Ok : TMenuItem;
OpenDialog : TOpenDialog;
OpenDialog1 : TOpenDialog;
Paste1 : TMenuItem;
SaveDialog : TSaveDialog;
SelectAll1 : TMenuItem;
Undo2 : TMenuItem;| Constructors |
| Functions |
procedure Cancel1Click(Sender: TObject);
procedure Cancel2Click(Sender: TObject);
procedure ClearAll1Click(Sender: TObject);
procedure Copy2Click(Sender: TObject);
procedure Cut1Click(Sender: TObject);
procedure Delete1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure JustifyClick(Sender: TObject);
procedure Load1Click(Sender: TObject);
procedure MemoChange(Sender: TObject);
procedure MemoKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure OkClick(Sender: TObject);
procedure Paste1Click(Sender: TObject);
procedure SelectAll1Click(Sender: TObject);
procedure Undo2Click(Sender: TObject);| Properties |
| Events |
| Variables |
Align1 : TMenuItem;
Cancel1 : TMenuItem;
Cancel2 : TMenuItem;
ClearAll1 : TMenuItem;
Copy2 : TMenuItem;
Cut1 : TMenuItem;
Delete1 : TMenuItem;
Edit2 : TMenuItem;
File1 : TMenuItem;
JustifyCenter1 : TMenuItem;
JustifyRight1 : TMenuItem;
Left1 : TMenuItem;
Load1 : TMenuItem;
MainMenu1 : TMainMenu;
Memo : TMemo;
N1 : TMenuItem;
N2 : TMenuItem;
N3 : TMenuItem;
Ok : TMenuItem;
OpenDialog : TOpenDialog;
OpenDialog1 : TOpenDialog;
Paste1 : TMenuItem;
SaveDialog : TSaveDialog;
SelectAll1 : TMenuItem;
Undo2 : TMenuItem;