Class TStrEditForm (unit Sed)

Inherits from

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;