Hallo,
SetFocus wird vom VST leider nicht unterstützt. Habe mal 'Showmessage('i')' -Zeile mit SetFocus habe ich weggelassen- eingefügt und bekomme eine EAccessViolation. Das gleiche, bis jetzt ungelöstes Problem, hatte ich auch schon mit einer Combobox in Verbindung mit dem VST.
Die Inkrementelle Suche habe ich mit folgendem Code ausprobiert -stammt aus dem VST-Handbuch-
Delphi-Quellcode:
procedure TMF.VSTIncrementalSearch(Sender: TBaseVirtualTree;
Node: PVirtualNode;
const SearchText: WideString;
var Result: Integer);
var
S, PropText:
string;
begin
// Note: This code requires a proper Unicode/WideString comparison routine which I did not want to link here for
// size and clarity reasons. For now strings are (implicitly) converted to ANSI to make the comparison work.
// Search is not case sensitive.
S := Text;
if Node.Parent = Sender.RootNode
then
begin
// root nodes
if Node.
Index = 0
then
PropText := '
Description'
else
PropText := '
Origin';
end
else
begin
PropText :=PropertyTexts[Node.Parent.
Index, Node.
Index, ptkText];
end;
Hier bezeichnet der Compiler 'PropertyTexts' als undefinierten Bezeichner.
IncrementalSearch steht auf isAll. Wenn ich aber einen Node anklicke, mit F2 in den Editiermodus wechsel, und ein Wort eingebe, passiert eigentlich nichts.
Gruß
U.