Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
 
Рейтинг: Рейтинг темы: голосов - 64, средняя оценка - 4.83
pupushecka
29 / 29 / 0
Регистрация: 13.06.2011
Сообщений: 165
#1

Запись в файл из edit - Delphi

27.04.2012, 12:39. Просмотров 10643. Ответов 26
Метки нет (Все метки)

HELLO! Помогите записать в файл информацию из поля Edit.
Примерно пишу вот так, но не хочет:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 procedure TForm1.Button1Click(Sender: TObject);
var fi:Textfile;               //задаем файловую переменную
s:string;                      //задаем перем. для хранения строки
begin
s:='23';
 assignfile(fi,'C:\11.txt');  //связываем переменную  fi  с файлом  11.txt
 reset(fi);                   //открываем файл для чтения
 readln(fi,s);
  //Rewrite(fi);
 //Writeln(fi);
// write(fi,s);
  // closefile(fi);
 
end;
 end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.04.2012, 12:39
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Запись в файл из edit (Delphi):

Запись edit в файл - Delphi
Допустим у нас есть 3 edit'a c данными : сумма вклада (VKLAD), месячная процентная ставка (PROZENT) и срок (SROK) в месяцах. Нужно сделать...

Запись данных в типизированный файл из edit - Delphi
Необходимо взять данные из edit и сохранить в файл: var f:file of integer; i:integer; mas:array of integer; begin if...

Запись в текстовый файл текста с нескольких Edit - Delphi
Помогите, пожалуйста! Есть форма Как сделать так что бы при нажатии на кнопку добавить программа создавала текстовый файл с именем...

Запись в Edit - Delphi
Подскажите пожалуйста. На форме четыре кнопки, и edit . Нажимая на первую, вводится в edit цыфра 1, нажимая на вторую -цыфра 2 , но не...

Запись из edit в memo - Delphi
В edit через запятую вводятся названия столбцов : a1, a2, a3, a4 итд. Нужно считать и дать названия столбцам в memo.

Запись из Edit в Stringgrid - Delphi
Вобщем вопрос такой: на форме имеется Edit в нем запись :001111000(примерно такая),нужно чтобы в первый столбец грида вывелось по одному...

26
Puporev
Модератор
54023 / 41656 / 14733
Регистрация: 18.05.2008
Сообщений: 97,933
27.04.2012, 14:42 #16
pupushecka, Так это же не текстовый файл, а бинарный, в нем информация зашифрована и ее прочитать можно только программно.
1
pupushecka
29 / 29 / 0
Регистрация: 13.06.2011
Сообщений: 165
27.04.2012, 14:45  [ТС] #17
а их убрать ни как нельзя
0
Puporev
Модератор
54023 / 41656 / 14733
Регистрация: 18.05.2008
Сообщений: 97,933
27.04.2012, 14:47 #18
Цитата Сообщение от pupushecka Посмотреть сообщение
а их убрать ни как нельзя
А зачем записывали?
1
pupushecka
29 / 29 / 0
Регистрация: 13.06.2011
Сообщений: 165
27.04.2012, 14:52  [ТС] #19
я их не записывала, они сами записались.
например: я записала Memo1, открываю файл там есть мое Memo1 и внизу после Memo1 всякая кракозябра.
0
Puporev
Модератор
54023 / 41656 / 14733
Регистрация: 18.05.2008
Сообщений: 97,933
27.04.2012, 14:56 #20
pupushecka, Нужно вопросы корректно ставить и полностью, а не по одному слову. Зачем Вам нужно было что-то писать в файл без расширения, если это был текстовый файл? Откройте файл и просто удалите все что лишнее записали.
1
Night_Chaser
0 / 0 / 0
Регистрация: 28.10.2015
Сообщений: 31
07.10.2016, 23:26 #21
Доброе времени суток, а не подскажите ли Вы, как записать txt файл в директории с exe?
0
TimKruz
141 / 39 / 11
Регистрация: 16.06.2016
Сообщений: 239
07.10.2016, 23:32 #22
Цитата Сообщение от Night_Chaser Посмотреть сообщение
в директории с exe?
Delphi
1
ExtractFileDir(Application.ExeName);
Эта функция вернёт полный путь до папки с exe-файлом.

После старта указатель файловой системы уже находится в этой папке, т.е. для AssignFile() папку менять не нужно.

А если заблудились в файловой системе, делаем так:
Delphi
1
SetCurrentDir(ExtractFileDir(Application.ExeName));
После этого все относительные пути будут указывать на папку с exe-файлом.
1
northener
пофигист широкого профиля
3244 / 2296 / 496
Регистрация: 15.07.2013
Сообщений: 13,541
08.10.2016, 01:02 #23
Цитата Сообщение от TimKruz Посмотреть сообщение
Эта функция вернёт полный путь до папки с exe-файлом.
Уточню. Эта функция вернет полное имя папки/каталога, в которой/котором содержится тот самый исполняемый файл. Не больше и не меньше.
0
D1973
Модератор
3222 / 2270 / 918
Регистрация: 21.01.2014
Сообщений: 9,404
Записей в блоге: 3
Завершенные тесты: 1
08.10.2016, 07:31 #24
Вместо этого:
Delphi
1
ExtractFileDir(Application.ExeName);
ИМХО, лучше использовать
Delphi
1
ExtractFilePath(ParamStr(0));
Преимущества: будет работать не только в GUI-приложениях, но и в консоли, без необходимости подтягивать в свое приложение класс TApplication
0
droider
Universal
Эксперт Pascal/Delphi
4381 / 2429 / 518
Регистрация: 04.10.2012
Сообщений: 8,835
08.10.2016, 07:51 #25
Цитата Сообщение от D1973 Посмотреть сообщение
лучше использовать
+1.
0
MyEternity
96 / 96 / 20
Регистрация: 25.04.2016
Сообщений: 525
08.10.2016, 21:37 #26
А еще лучше использовать:
Delphi
1
ChangeFileExt(ParamStr(0), '.txt');
0
D1973
Модератор
3222 / 2270 / 918
Регистрация: 21.01.2014
Сообщений: 9,404
Записей в блоге: 3
Завершенные тесты: 1
08.10.2016, 21:49 #27
MyEternity, только в том случае, если необходимо получить ТХТ-файл с тем же именем, что и само приложение...
0
08.10.2016, 21:49
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.10.2016, 21:49
Привет! Вот еще темы с ответами:

Запись даты в edit - Delphi
Всем привет есть такой вопрос.Как сделать так чтобы я ввёл в эдит 12032016 а получилось 12,03,2016?

Запись с Edit в Excel - Delphi
Подскажите тему или фрагмент кода, где осуществлена запись в файл Excel с поля Edit. Нужно чтобы при вводе записи в поле Edit и нажатии...

Запись из файла в label и edit - Delphi
доброго времени суток! записана инфа из label и edit в файл. procedure TMain.SpeedButton7Click(Sender: TObject); Var F : TextFile; ...

Запись record в массив из edit - Delphi
Всем привет, мне нужна помощь. Вообще есть задача: список людей стоящих в очереди на получение квартиры. В списке указаны порядковый номер,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
27
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru