Steema Central

tom

Hi, The reason this happens is because files downloaded off the Internet - including ZIP files and files cotained in those zip files - are marked as potentially malicious and so do not get full browsing rights on the local machine – they can’t access local content, which is exactly what help topics ...

tom

There is no need for interating through each branch, as all shapes are also available through the shapes property of TTree.
If you use eg

Code: Select all

node := Tree1.Shapes.Find('TreeNode', true)

it wil provide the first node in the tree which contains 'TreeNode' inside it's text.

Regards,
Tom

tom

There is no method to retrieve nodes as such, however, you can implement this on a relatively easy way. The Shapes property contains all the nodes in the tree, so you can iterate these and perform your match on every node, as in: procedure TForm2.FindNodesClick(Sender: TObject); var t: integer; begi...

tom

Hi,

We've problems to mimic this behavior. We've created a tree with 5000 nodes, each having one child. Vert & Horz scrollbar are set to automatic. Expanding/Collapsing the root node, does not give a black canvas.

Could you provide us a source code example?

Thanks in advance,
tom

tom

Hi Bruce, You can use the DblClickShape event for this purpose. The Sender argument contains a reference to the clicked shape. The level property of a TTreeNodeShape provides information where the node is positioned in the tree (0 equals root level). References of parent(s) are provided through the ...

tom

Hi Keith,

Thanks for letting us know.

Regards,
Tom.

tom

Hi, Unfortunately, there is no functionality in GridShape which supports your request. As it it implemented now, you can't assign custom widths or heights. At the moment it works as follows: Changing the width/height of a cell has no effect, since it is automatically calculated: 1) AutoSize off: The...

tom

hi,

can you provide me an example from which I can produce this problem? I'm probably missing something, since I can't produce the error.

Thanks,
tom @ steema.com

tom

Hi,

drop TeeSVGCanvas in your uses list and try the following code:

Code: Select all

procedure TForm2.Button38Click(Sender: TObject);
var
  tmp: TSVGExportFormat;
begin
  TeeSaveToSVGFile(Tree1, 'c:\test.svg', 100,100);
end;

This should result in a part (100 by 100) image of your tree.

Regards,
Tom.

tom

Hi, TeeTree was developed not only as a Tree substitute, therefor it doesn't always behaves as a Tree would. To make all child nodes invisible, you can recursively iterate all childs by yourself, e.g.: procedure TForm2.HideClick(Sender: TObject); procedure Hide(Node: TTreeNodeShape; Recursive: Boole...

tom

Hi okra, The advantage of using the global array of images is that when several nodes share the same image, the image is allocated into memory only once. You can add your own images to the image pool, using following code: customIndex:= TreeImagePool.Add( Image1.Picture ); The performance will also ...

tom

Hi iamjoosy

Thanks for letting us know.

Regards,
Tom.

tom

Unfortunately, with the current design this is not possible. To achieve this, you need to modify the method SetNewTreeSettings in TreeEd.pas

tom

Weird, I don't see this behavior when zooming to e.g. 50%. Can you provide me an example?

Thanks,
tom.

tom

Hi Keith,

Do you mean zoom/unzoom the panel or really re-sizing all shapes?

Thanks,
Tom.

Search found 211 matches

Re: Tutorial is broken methinks

Re: Isn't this code a bit too simple??

Re: Repeatedly find items that contain the same string