Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Вниз

Путь к каталогу   Найти похожие ветки 

 
Лана Розанова   (2001-10-11 12:07) [0]

Как узнать полный путь к файлу?


 
Dimka Maslov   (2001-10-11 12:15) [1]

В каком смысле полный путь?


 
@andrew   (2001-10-11 12:17) [2]

Не совсем понятен вопрос, но я попробую.

Если речь идет о том, что есть в текущем каталоге программы файл, то
GetCurrentDir
возвратит имя текущей директории, к которому можно добавить имя файла
и получить собственно все имя.

Плюс есть всякие функции типа ExtractFileName, ExtractFileExt ....FileDir и т.д. Смотри help на них


 
Anatoly Podgoretsky   (2001-10-11 21:58) [3]

В общем случае - никак, а в конкретном нужно уточнение, согласно Dimka Maslov


 
Вадим   (2001-10-11 23:19) [4]

>GetCurrentDir
Она может вернуть другую папку.

Возможно ParamStr(0) или Application.ExeName, что одно и то же


 
Anatoly Podgoretsky   (2001-10-13 00:39) [5]

кто спрашивал про текущий каталог или про каталог с программой, есть фопрос про ФАЙЛ, например readme.txt неизвестно где расположенный. Можешь ответить на этот вопрос?


 
Ketmar   (2001-10-13 07:29) [6]

запросто :-) делаем поиск по всему диску. для дополнительной аутентичности можно сравнивать размеры/время/CRC/MD5.

Satanas Nobiscum!


 
foks   (2001-10-13 13:25) [7]

Можете попробовать данный пример
Суть в перетаскивании файла на форму и в переменной FileName окажется весь путь и имя файла.

Первое, что вы должны сделать, - сообщить системе Windows о том, что ваша программа готова обрабатывать файлы, перемещенные из другого приложения с помощью мыши. Для этого достаточно включить в обработчик события OnCreate формы следующее выражение:

DragAcceptFiles(Handle,True);

Кроме того вы должны указать модель ShellAPI в директиве uses.



Для любого окна, в котором была вызвана процедура DragAcceptFiles, справедливо следующее. Когда вы перетаскиваете имя файла на ваше приложение и отпускаете кнопку мыши, Windows посылает этому окну сообщение wm_DropFiles. Сооьщение сопровождается именем файла. Обработчик этого сообщения нужно включитьв защищенный раздел класса формы. например, в объявлении класса формы между ключвыми словами private и public добавьте следующие строки:

protected
procedure WMDropFiles (var Msg: TMessage);
message wm_DropFiles;



И наконец-то пример самой процедуры, при помощи которой будет происходить обработка файла:

procedure TForm1.WMDropFiles(var Msg: TMessage);
Var
Filename: array[0..256] of char;
begin

DragQueryFile(THandle(Msg.WParam),0,Filename,SizeOf(Filename));
{Теперь в переменной Filename будет находиться путь
к перетаскиваемому файлу. Далее вы можете выполнять с этим файлом, зная
его путь, все что угодно.}


 
alexcom14   (2001-10-16 20:24) [8]

А чем этот файл определяется? Только именем? Кто на него
указывает.



Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.004 c
1-90326
Satrap
2002-01-06 11:56
2002.01.28
особенности WndProc


6-90332
Star
2001-11-06 09:14
2002.01.28
Как определить комп, наиболее активно загружающий сеть?


1-90245
LakeMan
2002-01-09 12:00
2002.01.28
компонент TCrpe. Помогите пожалуйста


4-90434
a-leksey
2001-11-26 11:39
2002.01.28
Нужно на время и конкретно отключить клавиатуру и мышь


1-90315
Shein
2002-01-11 10:19
2002.01.28
Есть проблемка с оболочкой Дельфей





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский