|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Помогите с переименованием файла
Вообщем нужно что бы создавался тхт файл с именем Edit1.Text
Код:
AssignFile(f,GetCurrentDir + '\БД\Резюме\newresume.txt'); Rewrite(f); writeln(f,'Фамилия:'+Edit1.text); Append(f); writeln(f,'Имя:'+Edit2.text); CloseFile(f); Помогите пожалуйста |
#2
|
||||
|
||||
Код:
AssignFile(f,GetCurrentDir + '\БД\Резюме\' + Edit1.Text + '.txt'); Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы... ICQ: 593977748 Nick: Marvel Последний раз редактировалось Marvel, 21.06.2010 в 19:23. |
#3
|
||||
|
||||
почти, только еще расширение .txt
|
#4
|
||||
|
||||
поправил код, смотри выше
Коли навчався в школі я - в мені росли мозгЫ. КудИж вони поділися? гы-гы гы-гы гы-гы... ICQ: 593977748 Nick: Marvel |
#5
|
||||
|
||||
чет я туплю, спасибо тебе большое))
|