Der Unterschied von TCustomEdit und TEdit ist nur, dass bei TEdit bereits alle benötigten Properties published wurden. Das kannst du ja bei der eigens abgeleiteten Komponente noch machen.
Hallo,
danke ja. Erst Quellcode lesen, dann hier posten
Er hat da ja auch eine Klasse für drin
Seine
Unit funktioniert schon recht gut, ich habe aber trotzdem noch
etwas verändert. Ich habe die Längenprüfung in der ClipboardContentIsAcceptable Methode ausgebaut,
weil man dann an beliebiger Stelle den Clipboard Inhalt überschreibend einfügen kann, auch wenn
dann ggf. ein teil davon abgeschnitten wird, weil MaxLength überschritten würde.
Dafür habe ich die WM_Paste abgeändert:
Delphi-Quellcode:
procedure TPBCustomFilteredEdit.WMPaste(var Message: TWMPaste);
begin
if ClipboardContentIsAcceptable then begin
if PasteReplacesAll then
SelectAll
else
begin
// This allows to select only parts of the text in the edit. That selected
// part only will be replaced by the text pasted.
if SelLength <= 1 then
SelLength := Clipboard.AsText.Length;
end;
inherited;
end;
end;
Damit kann ich auch Teile des Edit textes die selektiert sind überschreiben, wobei dann
nur der selektierte Teil überschrieben wird.
Man könnte überlegen, ob man diese Komponente (natürlich nach Zustimmung von Peter Below)
nicht bei der JVCL einbringt.
Grüße
TurboMagic