TVirtualDrawtree

[mia]

yes mrmarman you are correct with this logic , and about my attitude iam always feel terrifying before asking questions , i maybe ask this question in wong way too , i didn't mean my selected item i mean the item that will be show as stream to others , i dont know if you have delphi right now with you but i will give you the project to check up what i mean , check on stream button on click event , and the startstream command handler

[mrmarman]

First you created the panel different space...

You can test it by (at the design time, not runtime) clicking first to the ListView and press ESC button on the keyboard. This will skip the focused component one level up. This means you will know the ListView parent.

The Panel must be in the same parent space.. Check this out.

Why do you need this ? Because ListView's left value begins it's parents offset. Not the form or parents parent... Do you copy that..

[mia]

so i have to place the panel to the exact position that i want to show ?

[mrmarman]

This is an example how to track...

First, you need to place Panel2 to the ListView's parent space...
(1) Select Panel2
(2) press CTRL+X to cut to clipboard
(3) Click ListView1
(4) press ESC key once
(5) press CTRL+V to paste from clipboard. Now you did Panel2 is the same parent space with ListView1

And now, this ise the placement...
Global Variables...

Kod: Tümünü seç

  xSelItemLeft   : Integer = 0;
  xSelItemTop    : Integer = 0;
  xSelItemWidth  : Integer = 0;
  xSelItemHeight : Integer = 0;

// ListView1DrawItem

Kod: Tümünü seç

    if Item.Selected then
    begin
      xSelItemLeft   := Rect.Left   + sender.Left + sender.Column[0].Width;
      xSelItemTop    := Rect.Bottom + sender.Top;
      xSelItemWidth  := sender.Column[1].Width;
      xSelItemHeight := ImageList1.Height;
    end;

// And the streaming button

Kod: Tümünü seç

if stream.Caption = 'stream' then
begin
  Panel2.Left := xSelItemLeft;
  Panel2.Top  := xSelItemTop;
  Panel2.Width := xSelItemWidth;
  Panel2.Height := xSelItemHeight;
  panel2.Visible := true;
...
...

[mia]

hmmm , now the panel is completely invisible not only wrong position

[mrmarman]

it is design time, you may place where would you like...

Click the Panel2 from left side Structure Panel and change the values Left and Top for design time. This will be change automatically runtime

[mia]

i dont think top value have any involve with the issue but i do same as in image same result panel not visible and i dont mean its not visible in ide i mean in the application when its work, have you tested the application mrmarman ?

[mrmarman]

if you press more then once to Escape then you may skipped the mainpanel.. Please check by below screen cap.
Please also check the panel Width and Height values. They may be wrong.

Be sure the ListView1 and Panel2 under the mainpanel tree.

[mia]

design run time is very easy to be navigated , i dont mean its not visible in ide i mean in the application when its work, have you tested the application mrmarman ?

[mrmarman]

Your panel may be visible but color may same with backgroud.

Place a shape to the panel and chang color to the clBlue... tray again.

[mia]

changed the t shape to different color place same as what you say here is the project to see what i done

[mrmarman]

I didn't change anything and RUN
The result is below...

[mia]

here is the clue you click first on item to show the panel , that will circel back to the problem if you remember the animated image before of example that i want achieve they press on talk then panel has been rected and located to the bottom of the user item height what ever the item height is it imagen if you change the height of form , and see the position on the image after too many clicks its going down and down

[mrmarman]

Kod: Tümünü seç

xSelItemTop    := Rect.Bottom + sender.Top;

value ise what defines the panel top. You just change this to to

Kod: Tümünü seç

 xSelItemTop    := sender.Top + ImageList1.Height;

will do static place...

[mia]

i have to sitdown with this for a while and understand some staff and will come back to you with result