Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.26;
Скачать: CL | DM;

Вниз

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

 
Raki   (2003-06-10 14:40) [0]

Помогите ламеру!
Когда я связываюсь с файлом я не указываю полный путь к нему:AssignFile(f,"faces.dat");Reset(f,1). В Delphi 6 у меня было все в порядке,но в Delphi 7 идет сообщение File not found (но файл faces.dat находится в каталоге с исполняемым exe).Где нужно указать,чтобы компилятор использовал относительные пути?


 
Sandman25   (2003-06-10 14:43) [1]

Я не знаю ответа на вопрос, но нужно делать так:
AssignFile(f,ExtractFilePath(Application.ExeName)+"faces.dat");


 
Palladin   (2003-06-10 14:44) [2]

причем тут компилятор?
если ты не указываешь полный путь то чтение идет из текущей директории...
сделай
Application.MessageBox(PChar(GetCurrentDir),"CurrentDir");
и посмотри что у тебя там


 
Vulko   (2003-06-10 14:54) [3]


> Palladin ©

Твой вариант может и несработать, если он сделал SetCurrentDir на левую папку.

Лучше использовать первый вариант:

> Я не знаю ответа на вопрос, но нужно делать так:
> AssignFile(f,ExtractFilePath(Application.ExeName)+"faces.dat");




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

Текущий архив: 2003.06.26;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.039 c
14-84743
Сатир
2003-06-02 13:18
2003.06.26
Не верьте гороскопам


1-84204
me2
2003-06-12 10:58
2003.06.26
Работа с QuickReport


14-84739
™OxygeN™
2003-06-06 04:06
2003.06.26
exBK наше !!!! (Те кто играют в БК) И не только!!!


3-83896
Grey_g
2003-06-03 06:47
2003.06.26
BDE dll


14-84674
Pump
2003-06-10 16:09
2003.06.26
Как перебирая файлы и папки директории узнать...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский