THTMLTreeview Text Left Position

//THTMLTreeview Text Left Position

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls, htmltv;

type
  TForm1 = class(TForm)
    HTMLTreeview1: THTMLTreeview;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
HTMLTreeview1.Items.Clear;
HTMLTreeview1.Items.Add(nil,'<FONT face="Arial" size="7" color="clblack"><B>SomeText1</B> SomeText2</FONT>');
HTMLTreeview1.Items.AddChild(HTMLTreeview1.Items[0],'<FONT face="Arial" size="7" color="clblack"><B>SomeText3</B> SomeText4</FONT>');
HTMLTreeview1.Items.AddChild(HTMLTreeview1.Items[1],'<FONT face="Arial" size="7" color="clblack"><B>SomeText5</B> SomeText6</FONT>');
HTMLTreeview1.ItemHeight:=18;
HTMLTreeview1.FullExpand;
// I need to know on wich position (Left) is SomeText2 (Its first word S) and
// I need to know on wich position (Left) is SomeText6 (Its first word S)
// 1st - in screen
// 2nd - in control
// Thanks.
end;

end.
ghjlkAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
vbmnConnect With a Mentor Commented:
That is not recomanded. Use some special object for obtain informations.

Thanks.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.