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

Вниз

tstringlist не находит файл!   Найти похожие ветки 

 
Galiaf   (2005-07-04 22:43) [0]

Сдравствуйте. Уменя описана переменная f: tstringlist и когда я хочу F.loadfromfile("xxx") или f.savetofile("xxx"), то очень часто натыкаюсь на ошибки, а ошибки говорят что файл не найден хотя он там есть 100%. Я пробовал и Fileexists но это чудо то его находит то ненаходит, причём чаще всего ненаходит, прошу помощи ато счас сума сойду (если не сошёл). И ещё, как я заметил эти "глюки" бывают только если прога запускаеться не из  делфи, а если запускать из делфи, то я не помню таких "глюков".


 
Anatoly Podgoretsky ©   (2005-07-04 22:52) [1]

Приведи код


 
Nes ©   (2005-07-05 00:30) [2]

Чёт я таких глюков вообще не помню

f:TstringList.Create
if fileexists("my_txt.txt") then f.loadfromfile("my_txt.txt"") else
showmessage("File Not Found");
{или сохраняешь пустые строки,чтобы файл создался}


 
Nes ©   (2005-07-05 00:30) [3]

*** Упустил=) : f:=TstringList.Create;


 
Nes ©   (2005-07-05 00:34) [4]

"Я пробовал и Fileexists но это чудо то его находит то ненаходит, причём чаще всего ненаходит" - хмм, странно вообще, может ты не в той директории ищешь, по идее в [2] всё должно быть без таких фокусов или тогда уж [1]


 
alex-drob   (2005-07-05 00:36) [5]

У меня такое было не знаю почему.
Удалось исправить когда указал полный путь к файлу.


 
Anatoly Podgoretsky ©   (2005-07-05 00:36) [6]

Твой код полурабочий, но это твой, а интересен код автора.


 
Galiaf   (2005-07-05 01:29) [7]

В событии onformcreate пишу
 f:=tstringlist.Create;
 f.LoadFromFile("GalChat.txt");

и ещё, у меня прога в автозапуске может по этому? Раньше я писал в событии onformclose тоже самое. Я уже ваще запутался. Это должно работать в маленьком чате что бы сохранять все разговоры но у меня процентов 20 только сохраняется, а остальные 80 это ошибка типа файл не найден. Если я пишу "GalChat.txt", то насколько я знаю ищет в папке с программой, или я не прав?


 
Юрий Зотов ©   (2005-07-05 01:32) [8]

> Если я пишу "GalChat.txt", то насколько я знаю ищет в папке с
> программой

Ищет в текущем каталоге. С программой он, или еще какой - неважно.

Пишите
ExtractFilePath(ParamStr(0)) + "GalChat.txt"
тогда точно будет искать в папке с програмой.


 
Galiaf   (2005-07-05 01:36) [9]

Спасибо но можно поточнее? Напишите пример с тойже переменной f.


 
Германн ©   (2005-07-05 01:46) [10]

Теоретически, "поточнее" можно. Но только если точно сформулировать задачу!


 
Юрий Зотов ©   (2005-07-05 01:48) [11]

F := TStringList.Create;
F.LoadFromFile(ExtractFilePath(ParamStr(0)) + "GalChat.txt");


 
Galiaf   (2005-07-05 01:49) [12]

как я понял, я должен записать так: f.loadfromfile(ExtractFilePath(ParamStr(0)) + "GalChat.txt")
Правильно или я ваще уже того?


 
Galiaf   (2005-07-05 01:52) [13]

Бесконечно благодарен, завтра с утра пораньше буду разбираться, надеюсь теперь проблем не будет. Сложно теперь таким фанатикам самоучкам как я. =:-)


 
Юрий Зотов ©   (2005-07-05 02:07) [14]

> Galiaf   (05.07.05 01:52) [13]

> Сложно теперь таким фанатикам самоучкам как я. =:-)

Почему "теперь"? Самоучкам всегда было сложно. Но существуют книжки и сейчас с ними намного проще, чем было раньше. Поэтому "теперь" стало как раз наоборот - намного легче.


 
Германн ©   (2005-07-05 02:12) [15]

Некие "грамотеи", однажды, вместо того чтобы поместить на рабочий стол ярлык, поместили там копию программы. После этого было немеряно вопросов "Что", "Как", "Почему" и "Как жить дальше!"

2 Galiaf
Самое главное - ты должен уяснить "где должен быть расположен файл "GalChat.txt" и искать его именно там!



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

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

Наверх




Память: 0.48 MB
Время: 0.01 c
6-1113413845
Дельфин
2005-04-13 21:37
2005.07.25
Интернетовский IP-адрес


1-1120582450
Vovkin 3
2005-07-05 20:54
2005.07.25
Как одиночные Enter удалить, а в двойных оставить только один?


14-1118339701
Piter
2005-06-09 21:55
2005.07.25
Теперь и FAQ не работает


3-1118485403
_vvv_
2005-06-11 14:23
2005.07.25
SQL generator


1-1120630131
Demidoff
2005-07-06 10:08
2005.07.25
Как произвести обработку архива в автономном режиме?





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