Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

tstringlist не находит файл! [WinXP]


Galiaf ©   (2005-07-04 22:43:00) 

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


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

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

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


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

> Galiaf   (05.07.05 01:52) [13]

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

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


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

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


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

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


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

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


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

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


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

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


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

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

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

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


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

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

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


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

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


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

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


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

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


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

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

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:00) [14]

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


Anatoly Podgoretsky   (2005-07-04 22:52:00) [15]

Приведи код


Наверх

Титульная страница Поиск, карта сайта Написать письмо