| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вин дир [D6, D7, Win95/98, WinXP]
Opera © (2003-03-12 15:54:00)помогите мастера!
Мне нужно копировать файл в папку windows
Я не знаю ни диск ни название папки
Как это можно сделать програмно?
Vladus (2003-03-12 21:00:00) [1]Всё же проще из getWindowsDirectory
Пример:
Var
DirPchar: array[0..255] of Char;
DirStr: String;
begin
GetWindowsDirectory(DirPchar, 255);
// в DirPchar уже полный путь виндусовской директории
DirStr := DirPchar;
А Ежели нужна системная виндусовская директория, то:
GetSystemDirectory(DirPchar, 255);
// в DirPchar уже полный путь системной директории
DirStr := DirPchar;
Nic_B (2003-03-12 18:33:00) [2]Возможно этот код подойдет (где-то нарыл - не помню) но работает
var
buf: UINT;
_WinDir: pchar;
WinDir: string;
...
GetMem(_WinDir, 1);
buf:= GetWindowsDirectory(_WinDir, 1);
GetMem(_WinDir, buf);
GetWindowsDirectory(_WinDir, buf);
WinDir:= StrPas(_WinDir);
FreeMem(_WinDir, buf);
y-soft (2003-03-12 15:55:00) [3]GetWindowsDirectory
| |
