TCL TK

[Lavisa]

Создание кнопки "Browse". Существует ли уже готовый скрипт, и где его поискать? Может, в каком-то расширении tcl/tk? Если такого нет, то как подступиться к созданию этого чуда? Допустим, кнопку я создам, и даже напишу на ней "Обзор", но вот как перейти к выбору объекта файловой системы совершенно не представляю. Работать все это должно под Windows.

[Terran]

Используйте компонент OpenDialog.
К примеру:

Procedure TForm1.Button1Click(Sender: TObject);
Begin
If OpenDialog1.Execute Then
Begin
...
End;
End;