TVirtualStringTree Zelle selektieren

[stalkingwolf]

Moin,

Kunden hatten den Wunsch das in den TVirtualStringTree auch Zellen selektiert werden können wenn man nicht direkt auf den Text in der Zelle klickt.
Wenn ich das korrekt sehe, dann kann das Element dies nicht.

Also habe ich versucht dies bei ColumnClick selber zu machen.
Allerdings ist damit nicht die gesamte Zelle markiert, sondern nur der Text in der Zelle. Schaut nicht so toll aus.

Jemand eine Idee wie das gehen könnte oder schon einmal selber gemacht?

Hier mein Code.

Code:

procedure TFMain.vtColumnClick(
  Sender: TBaseVirtualTree; Column: TColumnIndex; Shift: TShiftState);
var p:TPoint;
    node:PVirtualNode;
    hitInfo:THitInfo;
begin

    GetCursorPos(p);
    Windows.ScreenToClient(vt.Handle, p);
    vt.GetHitTestInfoAt(p.X, p.Y,true,hitInfo);

    if ((hitInfo.HitColumn >= _MINCOL) and (hitInfo.HitColumn <= _MAXCOL)) then begin

        node:=hitinfo.HitNode;
        if node = nil then exit;

        vt.FocusedColumn  := 3;
        vtLieferListvtSelected[node] := TRUE;
    end;
end;

[bcvs]

Zitat von stalkingwolf:

Kunden hatten den Wunsch das in den TVirtualStringTree auch Zellen selektiert werden können wenn man nicht direkt auf den Text in der Zelle klickt.
Wenn ich das korrekt sehe, dann kann das Element dies nicht.

Doch das geht schon. Ich nehme an, du benutzt den VirtualStringTree als Grid. Dann schalte mal TreeOptions.MiscOptions.toGridExtension ein. Evtl. auch toReportMode

[stalkingwolf]

Zitat von bcvs:

Zitat von stalkingwolf:

Kunden hatten den Wunsch das in den TVirtualStringTree auch Zellen selektiert werden können wenn man nicht direkt auf den Text in der Zelle klickt.
Wenn ich das korrekt sehe, dann kann das Element dies nicht.

Doch das geht schon. Ich nehme an, du benutzt den VirtualStringTree als Grid. Dann schalte mal TreeOptions.MiscOptions.toGridExtension ein. Evtl. auch toReportMode

tja so einfach war das über toGridExtension
Vielen Dank.