Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.11.2010, 15:28   #1
Dima DDM
Форумчанин
 
Аватар для Dima DDM
 
Регистрация: 09.11.2010
Сообщений: 134
Восклицание Сохранение путей и символов

Люди мне очень нужна ваша помощь по 2 вопросам!
1)как сделать так чтоб в Edit1 сохранялось введенное значение(имя например). То есть после перезапуска проги оно осталось!
2)У меня есть кнопка на form'e 2 я хочу чтоб по нажатию нужно было указать путь к файлу (допустим xxx.exe) и по нажатию на кнопке на Form'e 1 у меня запускался xxx.exe (запускать можно через WinExec )
Заранее СПС!
http://ddmsite.ucoz.ru Мой сайт.
Бесплатный Блокировщик рекламы
http://download.adguard.ru/d/1656/adguardInstaller.exe
Dima DDM вне форума Ответить с цитированием
Старый 21.11.2010, 15:35   #2
grafgrial
Просто хороший
Форумчанин
 
Аватар для grafgrial
 
Регистрация: 26.03.2010
Сообщений: 562
По умолчанию

На первое и второе. Поищи про сохранение в файле *.INI
Помог, нажми весы слева
grafgrial вне форума Ответить с цитированием
Старый 21.11.2010, 15:44   #3
Dima DDM
Форумчанин
 
Аватар для Dima DDM
 
Регистрация: 09.11.2010
Сообщений: 134
По умолчанию

а можно без ini !?
http://ddmsite.ucoz.ru Мой сайт.
Бесплатный Блокировщик рекламы
http://download.adguard.ru/d/1656/adguardInstaller.exe
Dima DDM вне форума Ответить с цитированием
Старый 21.11.2010, 16:10   #4
grafgrial
Просто хороший
Форумчанин
 
Аватар для grafgrial
 
Регистрация: 26.03.2010
Сообщений: 562
По умолчанию

Не бойся использовать, во первых легко, во вторых очень удобно
Код:
uses inifiles;
Загрузка
Код:
var
Ini: Tinifile;
begin
if FileExists(ExtractFilePath(Application.ExeName) +'setting.ini') then
begin
Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'setting.ini');
Edit1.text:=ini.ReadInteger('Setting', 'Eto_sohraneno_iz_edit1',60 );
end;
Сохранение
Код:
var
  Ini: Tinifile;
begin
if FileExists(ExtractFilePath(Application.ExeName) +'setting.ini') then
begin
 Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'setting.ini');
 Ini.WriteInteger('Setting', 'Eto_sohraneno_iz_edit1', edit1.text);
Если не хочешь чтобы мелькал файл *.ini то переименуй к примеру setting.hjj
Помог, нажми весы слева
grafgrial вне форума Ответить с цитированием
Старый 21.11.2010, 16:32   #5
Dima DDM
Форумчанин
 
Аватар для Dima DDM
 
Регистрация: 09.11.2010
Сообщений: 134
По умолчанию

спс за пример



НЕ РАБОТАЕТ пишет incompatible types string and integer
http://ddmsite.ucoz.ru Мой сайт.
Бесплатный Блокировщик рекламы
http://download.adguard.ru/d/1656/adguardInstaller.exe

Последний раз редактировалось Dima DDM; 21.11.2010 в 16:37.
Dima DDM вне форума Ответить с цитированием
Старый 21.11.2010, 16:51   #6
grafgrial
Просто хороший
Форумчанин
 
Аватар для grafgrial
 
Регистрация: 26.03.2010
Сообщений: 562
По умолчанию

найди и поменяй строчку вот на эту
Код:
Edit1.text:=ini.ReadString('Setting', 'Eto_sohraneno_iz_edit1',Edit1.text);
и замени все
ini.ReadInteger на ini.ReadString
Ini.WriteInteger на Ini.WriteString
Помог, нажми весы слева
grafgrial вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Автодобавление разделов и путей к файлу KWN, lnc Общие вопросы Delphi 1 03.02.2010 06:22
Установка путей в RadASM Ivan_32 Софт 0 10.06.2009 04:44
Извлечение путей и копирование файлов neo4511 Общие вопросы Delphi 7 16.01.2009 15:25
Получение системных путей BOBAH13 Win Api 6 15.01.2009 23:16
Поиск возможных путей графа RammFan Общие вопросы Delphi 2 19.06.2008 10:45