Hallo zusammen

ich bin gerade dabei mit einem VirtuelStringTree zu tüfteln.
ich möchte in einer Zelle eine ComboBox darstellen, aber die ComboBox wird immer
nur oben links dargestellt.

Mein Ziel:
Bei Click auf eine Zelle soll die ComboBox dargestellt werden und nach verlassen der
Zelle wird nur ein normaler String angezeigt.

hat jemand von Euch eine Ahnung, wie man soetwas macht?

dieser Quellcode stellt eine Combobox oben links dar.

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode;
  Column: TColumnIndex; TextType: TVSTTextType; var CellText: WideString);
var Data : PTreeData;
    FEdit: TWinControl; // One of the property editor classes.
begin
  Data := VST.GetNodeData(Node);

  case Column of
    0 : CellText := Data.FCaption;
    1 : CellText := Data.FWert ;
  end;
end;

  if column = 1 then begin
    FEdit := TComboBox.Create(nil);
        with FEdit as TComboBox do
        begin
          Visible := true;
          Parent := vst;
          Text := 'hallo';
        end;
  end;

mfg edmu

Nur weil du die ComboBox zum Zeitpunkt erstellst, wenn deine entsprechende Zelle gezeichnet wird, heißt das nicht, das sie an dieser Position sitzt.

Bei den VST-Demos ist eine Editor-Demo dabei.