VirtualStringTree und Feldlänge

[Trille]

Hallo allerseits, ich habe einen VirtualStringTree, in dem ich alle Knoten editieren kann. Wie kann ich nun beispielsweise bewerkstelligen, dass der Benutzer einen zu lngen Text (Länge größer als 40 Zeichen) eingeben kann? Die Abfrage der Länge bei onNewText ist zu spät. Ich möchte von vornherein verhindern, dass man zuviele Zeichen eingeben kann.

[generic]

du hast doch dazu bestimmt ein edithandler geschrieben, welche ein tedit erzeugt?
dann setz doch einfach das maxlength in dem edit.

[Trille]

Zitat von generic:

du hast doch dazu bestimmt ein edithandler geschrieben, welche ein tedit erzeugt?
dann setz doch einfach das maxlength in dem edit.

Das habe ich eben nicht getan. Ich hab einfach ganz normal das ding auf Edutable gesetzt und noch ein bisschen Schnickschnack drumherum. wie bewerkstellige ich denn sowas?

[generic]

easy

oncreateeditor einfach mit folgenden implementieren

Delphi-Quellcode:

procedure Tform1.vstCreateEditor(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; out EditLink: IVTEditLink);
var
  x: TStringEditLink;
begin
  x:=TStringEditLink.Create;
  x.Edit.MaxLength:=40;
  EditLink:=x;
end;

[Trille]

Zitat von generic:

easy

oncreateeditor einfach mit folgenden implementieren

Delphi-Quellcode:

procedure Tform1.vstCreateEditor(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; out EditLink: IVTEditLink);
var
  x: TStringEditLink;
begin
  x:=TStringEditLink.Create;
  x.Edit.MaxLength:=40;
  EditLink:=x;
end;

Sehr schön, danke

[Trille]

Zum gleichen Thema habe ich auch noch eine Frage. Ich habe das Verhalten so implementiert, dass ich mit den Pfeiltasten durch den Baum navigieren kann (links, rechts, oben, unten), halt genau wie in Excel. Wenn ich mich jetzt im Editiermodus befinde, möchte ich aber auch gern mit den Pfeiltasten weiterwechseln können. Das Problem daran ist, dass der Baum ja nicht auf Keyevents reagiert, wenn er im Editiermodus ist. Wie kann ich das bewerkstelligen?