Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Ini-файл, Memo мешает работаь с Ini-файлом 
:(
    Опции темы
Slawanix
  Дата 14.8.2004, 16:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 29.7.2004
Где: г. Великие Луки

Репутация: нет
Всего: 1



Если я в своей апликашке загружаю некую инфу в Memo из любого файла
Код
Form1.MemoPathFolder.Lines.LoadFromFile(Form1.OpenDialog1.FileName);

то не удается работать с INI-файлами (создание, запись, чтение).
Код

procedure TfmPerfer.BtnPerfApplyClick(Sender: TObject);
var IniFile:TIniFile;
begin
  IniFile := TIniFile.Create(GetCurrentDir+'\Param.INI');
   if ChBoxMembForm.Checked=True then
    IniFile.WriteBool('Perferens','ChBoxMembForm',True)else
    IniFile.WriteBool('Perferens','ChBoxMembForm',False);
   if ChBoxLastProf.Checked=True then
    IniFile.WriteBool('Perferens','ChBoxLastProf',True)else
    IniFile.WriteBool('Perferens','ChBoxLastProf',False);
   IniFile.Free;
end;

Если Memo не трогаю, то все намано. Подскажите, пожалуста, как эту бяку вылечить можно. butbut.gif butbut.gif
--------------------
моск кипит    
PM MAIL WWW   Вверх
Chuck
Дата 14.8.2004, 18:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Сушня
**


Профиль
Группа: Эксперт
Сообщений: 442
Регистрация: 12.12.2003
Где: Узбекистан, Ташке нт

Репутация: 1
Всего: 9



Цитата
то не удается работать с INI-файлами (создание, запись, чтение).

Ошибку в студию!!!


Хехех, директория меняется при выборе файла для загрузки в мемо!
Код

procedure TfmPerfer.BtnPerfApplyClick(Sender: TObject);
var IniFile:TIniFile;
begin
[b] IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName) +'\Param.INI');[/b]
  if ChBoxMembForm.Checked=True then
   IniFile.WriteBool('Perferens','ChBoxMembForm',True)else
   IniFile.WriteBool('Perferens','ChBoxMembForm',False);
  if ChBoxLastProf.Checked=True then
   IniFile.WriteBool('Perferens','ChBoxLastProf',True)else
   IniFile.WriteBool('Perferens','ChBoxLastProf',False);
  IniFile.Free;
end;


PM MAIL WWW GTalk   Вверх
Slawanix
Дата 14.8.2004, 20:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 29.7.2004
Где: г. Великие Луки

Репутация: нет
Всего: 1



Chuck , Спасибо тебе, сейчас у меня все заработало; и как я сам не дотумкал. Кстати, нашел в другом каталоге тот самый Ini, в него-то все и записывалось. Удачи.
С уважением, Slawanix.
smile.gif smile.gif smile.gif

--------------------
моск кипит    
PM MAIL WWW   Вверх
The MASTER
Дата 1.9.2004, 11:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Old master)
**


Профиль
Группа: Участник
Сообщений: 862
Регистрация: 19.7.2004
Где: Санкт-Петербург

Репутация: 2
Всего: 5



[Флеймовое сообщение удалено модератором.]
PM MAIL WWW ICQ   Вверх
The MASTER
Дата 26.9.2004, 20:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Old master)
**


Профиль
Группа: Участник
Сообщений: 862
Регистрация: 19.7.2004
Где: Санкт-Петербург

Репутация: 2
Всего: 5



Подожтите а, что здесь Флеймового а?
М
 
Вот это ^



Это сообщение отредактировал(а) Pegas - 28.9.2004, 00:15
PM MAIL WWW ICQ   Вверх
The MASTER
Дата 27.9.2004, 14:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Old master)
**


Профиль
Группа: Участник
Сообщений: 862
Регистрация: 19.7.2004
Где: Санкт-Петербург

Репутация: 2
Всего: 5



Если ты хочешь сохранить ini в папку с твои проектом то пишешь следующие!

Memo1.lines.savetofiles(ExtractFilePath(paramstr(0))+'file.ini');

И он 100% сохранит в папку с проектом!
PM MAIL WWW ICQ   Вверх
Slawanix
Дата 27.9.2004, 16:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 29.7.2004
Где: г. Великие Луки

Репутация: нет
Всего: 1



Поняно, благодарю! wink.gif
--------------------
моск кипит    
PM MAIL WWW   Вверх
RideX
Дата 28.9.2004, 08:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Awaiting Authorisation
Сообщений: 94
Регистрация: 8.9.2004

Репутация: 4
Всего: 7



Slawanix
А вот так, IMHO, красивее smile.gif
Код

IniFile := TIniFile.Create(ChangeFileExt(Application.ExeName, '.ini'));

PM   Вверх
The MASTER
  Дата 28.9.2004, 19:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Old master)
**


Профиль
Группа: Участник
Сообщений: 862
Регистрация: 19.7.2004
Где: Санкт-Петербург

Репутация: 2
Всего: 5



М
 
Флейм, оффтоп


Это сообщение отредактировал(а) p0s0l - 28.9.2004, 21:07
PM MAIL WWW ICQ   Вверх
Slawanix
Дата 28.9.2004, 22:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 29.7.2004
Где: г. Великие Луки

Репутация: нет
Всего: 1



Цитата
А вот так, IMHO, красивее

Согласен, имхо так сама прога управляет файлом, независимо от Мемо. cool.gif

Это сообщение отредактировал(а) Slawanix - 28.9.2004, 22:24
--------------------
моск кипит    
PM MAIL WWW   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.1099 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.