Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Разное
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 09.09.2006, 13:42
Kristofer Kristofer вне форума
Начинающий
 
Регистрация: 10.07.2006
Сообщения: 110
Репутация: 10
Смущение Edit+text=Name File

Господа!
подскажите не разумному, мозговой шторм имеющему
как имея в наличии Edit на форме и имя файла
изменить его имя, пользуя Edit
Ответить с цитированием
  #2  
Старый 09.09.2006, 14:44
Аватар для Decoding
Decoding Decoding вне форума
Местный
 
Регистрация: 03.06.2006
Адрес: Почту найдете на моем сайте
Сообщения: 576
Версия Delphi: D10.2
Репутация: 214
По умолчанию

Код:
RenameFile( 'C:\1.txt', Edit1.Text )

Edit1.Text = 'C:\2.txt'
Ответить с цитированием
  #3  
Старый 09.09.2006, 15:30
Kristofer Kristofer вне форума
Начинающий
 
Регистрация: 10.07.2006
Сообщения: 110
Репутация: 10
По умолчанию

Господи! неужели все так просто?
ААААААААААААААААААААААААААА!!!


спасибо! пойду внесу сию строку в свои скрижали
Ответить с цитированием
  #4  
Старый 11.09.2006, 15:24
Kristofer Kristofer вне форума
Начинающий
 
Регистрация: 10.07.2006
Сообщения: 110
Репутация: 10
По умолчанию

мдя, была проблема, появилась еще одна
файл копируется и переименовывается - все в норме
но моя гадость (программа) создает около себя пустой файлик
с используемым именем (т.е пустой аналог) который не удаляется
при работе программы
как избежать?
Ответить с цитированием
  #5  
Старый 11.09.2006, 16:33
Аватар для Decoding
Decoding Decoding вне форума
Местный
 
Регистрация: 03.06.2006
Адрес: Почту найдете на моем сайте
Сообщения: 576
Версия Delphi: D10.2
Репутация: 214
По умолчанию

Покажи код.
Ответить с цитированием
  #6  
Старый 12.09.2006, 11:39
Kristofer Kristofer вне форума
Начинающий
 
Регистрация: 10.07.2006
Сообщения: 110
Репутация: 10
По умолчанию

//смотрим, есть ли файл
CopyFileEx('C:\...\txt.txt','A:\txt.txt',nil,nil,n il,COPY_FILE_RESTARTABLE);
Rename('A:\txt.txt','A:\'+Edit1.text);

копирует на ура, переименовывает соответственно
все замчательно работает, но вот этот пустой аналог в корне программы...
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:14.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025