Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi VirtuelStringTree und ComboBox, Wie ??? (https://www.delphipraxis.net/125131-virtuelstringtree-und-combobox-wie.html)

edmu 1. Dez 2008 10:12


VirtuelStringTree und ComboBox, Wie ???
 
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.
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

SauberMann 1. Dez 2008 16:48

Re: VirtuelStringTree und ComboBox, Wie ???
 
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.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz