Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Klaus01**

Dies Konstrukt funktioniert bei mir ohne Probleme:

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

begin

  ShellTreeView1.root:='D:\';

 if ShellTreeView1.Root = ShellTreeView1.Path then

   begin

     ShowMessage('gleich');

   end;

Grüße
Klaus

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.771 Beiträge Delphi 10.4 Sydney	#13 Re: Unterordnernamen auslesen 13. Jun 2007, 11:21 Dies Konstrukt funktioniert bei mir ohne Probleme: markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); begin ShellTreeView1.root:='D:\'; if ShellTreeView1.Root = ShellTreeView1.Path then begin ShowMessage('gleich'); end; Grüße Klaus Klaus
	Zitat

Einzelnen Beitrag anzeigen

Re: Unterordnernamen auslesen