Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

OPEN FOLDER [D6, WinXP]

BIG BROTHER © (2002-09-23 20:34:00)
Не могли бы вы подсказать мне решение к такой проблеме:
Создал кнопку, хотелось бы чтобы при нажатии на нее открылась опеделенная папка(напр.WINDOWS). Что мне прописать на событие кнопки OnClick ????

France (2002-09-30 13:54:00) [1]
> AL2002 © (28.09.02 01:33)

Удалено модератором

хе-хе! Правильно, АЛ. Так ему и надо!

Севостьянов Игорь (2002-09-30 13:10:00) [2]
Есть такая функция function SelectDirectory(const Caption: string; const Root: WideString; out Directory: string): Boolean;
возьми и поставь ей Root := FolderName

... uses FileCtrl; ... procedure TfrmMain.Button1Click(Sender: TObject); var Directory: string; begin if SelectDirectory("Caption", "C:\WinNT", Directory) then ShowMessage(Directory) end;

Dot (2002-09-28 10:14:00) [3]
Remarks

Win32-based applications should use the CreateProcess function rather than this function. The WinExec function exists in Win32 to provide compatibility with earlier versions of Windows. For more information about how the WinExec function is implemented, see the Remarks section of the LoadModule function.
In Win32, the WinExec function returns when the started process calls the GetMessage function or a time-out limit is reached. To avoid waiting for the time out delay, call the GetMessage function as soon as possible in any process started by a call to WinExec.

люди не опускайтесь до уровня micro$oft

Guerrillero (2002-09-28 09:53:00) [4]
ShellExecute(Handle,"Explore","C:\",nil,nil,SW_NORMAL);

alena.svt (2002-09-28 08:28:00) [5]
Вы о чём?

AL2002 (2002-09-28 01:36:00) [6]
>GetWindowsDirectory я никогда не юзал но знал про неё а в хелпе
>прочитал чито на возвращает путь к папке Windows
SSize: array[0..1023] of Char;
SetString(Result, SSize, GetWindowsDirectory(Sizeof(SSize)-1,SSize));

Chlavik (2002-09-28 01:34:00) [7]
Короче
WinExec(Pchar(explorer.exe "+ path), SW_maximize);
реально пашет......

AL2002 (2002-09-28 01:33:00) [8]
Удалено модератором

Chlavik (2002-09-28 01:16:00) [9]
Ну извините просто GetWindowsDirectory я никогда не юзал но знал про неё а в хелпе прочитал чито на возвращает путь к папке Windows.............
Да и вообще её там не надо просто explore и всё!

AL2002 (2002-09-28 01:03:00) [10]
>Chlavik © (28.09.02 00:59)
Сами вы...

Chlavik (2002-09-28 00:59:00) [11]
Меня тоже волнует такой вопросик в принципе я понял что тот юзер посоветовал

используй такой оператор
WinExec(Pchar(GetWindowsDirectory + "\explorer.exe"+" "+path), SW_RESTORE);
Где Path:string;- папка которую нужно открыть

Я сам Учюсь програмить но коечто знаю
Есть еще процедуры напимер

CreateProcess её синтаксис (параметры) глянь в Helpe
Если что тебе покруче и попроще посоветуют мыльни мне Ok ?
Всё давай......

AL2002 (2002-09-28 00:57:00) [12]
StrExec:="explorer ";
FolderName:="Edit1.Text";

ShellExecute(0, nil, PChar(StrExec+FolderName) ,nil,nil,1);

BIG BROTHER (2002-09-28 00:33:00) [13]
Звучит легко но не для меня нельзя ли по подробнее про explrer?? PLZ

AL2002 (2002-09-23 20:39:00) [14]
запустить explorer с параметром диск:\имя_папки\..ит.д.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »