RE: please how could i !!!

Something like storing the filename and path in the data property of the
node followed by opening it i.e. using Shellexecute or some other method

 

procedure TForm8.FormCreate(Sender: TObject);

var

  S: String ;

begin

  with TreeView1,Items do

  begin

    Add(nil,'test') ;

    S := 'YourFileName.ext' ;

    AddChildObjectFirst(GetFirstNode,'file two',Pointer(S)) ;

    S := 'YourFileName1.ext' ;

    AddChildObjectFirst(GetFirstNode,'file one',Pointer(S)) ;

  end ;

end;

 

procedure TForm8.TreeView1Click(Sender: TObject);

begin

  if TreeView1.Selected.Data = nil then

    Caption := 'No filename stored'

  else

    Caption := 'Open --> ' + String(TreeView1.Selected.Data) + ' you
method';

end;

 

 

-----Original Message-----
From: boussaid mohamed [mailto:[email protected]] 
Sent: Sunday, July 27, 2003 6:45 AM
To: [email protected]
Subject: [Delphi] please how could i !!!

 

Hi gents, i would like 2 know how could i make the
TreeView operational i mean : i made my App a TreeView
is included but i didn't know how to make the Nodes
linked to some resources ( i.e ) each Node represents
a Data in a precised file so i want to click on this
Node and the file will be opened so how 2 do it 
really i tried a lot but i was unlucky  so please i
need a help 

Thnx a lot 

mohfa

___________________________________________________________
Do You Yahoo!? -- Une adresse @yahoo.fr gratuite et en français !
Yahoo! Mail : http://fr.mail.yahoo.com <http://fr.mail.yahoo.com> 





Yahoo! Groups Sponsor



ADVERTISEMENT
 
<http://rd.yahoo.com/M=244522.3512152.4794593.1261774/D=egroupweb/S=17051153
62:HM/A=1595054/R=0/SIG=124f8kfa7/*http:/ashnin.com/clk/muryutaitakenattogyo
?YH=3512152&yhad=1595054> Click Here!


 
<http://us.adserver.yahoo.com/l?M=244522.3512152.4794593.1261774/D=egroupmai
l/S=:HM/A=1595054/rand=678600355> 


CodeCoffer - new Delphi code protection Tool!
http://www.delphicollection.com/public/CodeCoffer.htm
<http://www.delphicollection.com/public/CodeCoffer.htm> 
---------------------------------------------------------------
Unsubscribe:[email protected]
List owner:[email protected]
--------------------------------------------------------------- 

Your use of Yahoo! Groups is subject to the Yahoo!
<http://docs.yahoo.com/info/terms/>  Terms of Service. 



[Non-text portions of this message have been removed]


------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Toner for Your Printer or Fax at LaserTonerSuperstore.com-Save 55%!
We have your brand: HP, IBM, Canon, Xerox, Apple and many more for less!
http://www.LaserTonerSuperstore.com
http://us.click.yahoo.com/YmQqWC/qicGAA/ySSFAA/i7folB/TM
---------------------------------------------------------------------~->

CodeCoffer - new Delphi code protection Tool!
http://www.delphicollection.com/public/CodeCoffer.htm
---------------------------------------------------------------
Unsubscribe:[email protected]
List owner:[email protected]
--------------------------------------------------------------- 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/