Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.20;
Скачать: CL | DM;

Вниз

ChangeFileExt не работает но и не ругаеться   Найти похожие ветки 

 
hfa ©   (2004-01-09 10:53) [0]

Не в какую не работает ChangeFileExt пишу так
ChangeFileExt("c:\test.txt",".BMP") но ничего не получаеться кто-нибудь объяснит почему и что делать?


 
Тимохов ©   (2004-01-09 10:55) [1]

Можно подробнее, что ты пишешь?


 
Тимохов ©   (2004-01-09 10:57) [2]

Что у тебя будет в сообщении в таком коде?

procedure TForm2.Button1Click(Sender: TObject);
begin
showmessage(ChangeFileExt("c:\test.txt",".BMP"))
end;

у меня все работает.


 
hfa ©   (2004-01-09 11:01) [3]

Мне нужно поменять расширение файла допустим с txt на bmp
Вот я пишу функцию для смены расширения файла! ChangeFileExt("c:\test.txt",".BMP") но не работает почему-то а хотя должно:(


 
hfa ©   (2004-01-09 11:02) [4]

будет c:\test.bmp


 
Плохиш_   (2004-01-09 11:03) [5]

>hfa © (09.01.04 11:01) [3]

В справке по делфи написано, что функцию ChangeFileExt нужно использовать так:

s:= ChangeFileExt(OpenDialog1.FileName,".BMP");


 
TUser ©   (2004-01-09 11:04) [6]

ChangeFileExt просто изменяет строку. Для переименовывания файла - ReanameFile.


 
Тимохов ©   (2004-01-09 11:04) [7]

hfa © (09.01.04 11:01) [3]
Товарищ!
Очените ответ номер 2. Вернее не очените, а ответьте не мне, так себе на вопрос поставленный там. Функция работает. Также оцените ответ номер 1, с просьбой о вашем коде. Иначе не ясно на что отвечать...


 
Плохиш_   (2004-01-09 11:04) [8]

>hfa © (09.01.04 11:02) [4]

Ну вот видишь. Всё прекрасно работает.


 
Тимохов ©   (2004-01-09 11:05) [9]

TUser © (09.01.04 11:04) [6]
Ценю талант медиума. Как вы догадались, что он хочет на диске поменять расширение файла, а не имя файла в виде строки?


 
hfa ©   (2004-01-09 11:07) [10]

как на что отвечать! как поменять это чертово расширение файла в дельфи если стандартная функция ChangeFileExt не работает по неизвестным причинам


 
Тимохов ©   (2004-01-09 11:08) [11]

Гражданин.
Буде добры объяснить вашу задачу. Популярно.
Вообще есть подозрение что TUser вам уже ответил.


 
Плохиш_   (2004-01-09 11:09) [12]

>Тимохов © (09.01.04 11:05) [9]
:-))
Автор оказывается первую строчку из хелпа дословно перевёл ;-) а дальшь читать уже времени/силёнок не хватило :-)


 
Тимохов ©   (2004-01-09 11:11) [13]

Попробуй написать так. Может получится

renamefile("c:\test.txt", ChangeFileExt("c:\test.txt", ".bmp"));


 
Плохиш_   (2004-01-09 11:12) [14]

Кстати, орешник давно не обновлялся :-))


 
hfa ©   (2004-01-09 11:12) [15]

все сделал так

var
NewFile:string;
NewFile:=ChangeFileExt("c:\test.txt",".BMP");
RenameFile("c:\test.txt",NewFile)
работает! но почему <Тимохов © /B>работает без всяких там renameFile а у меня нет! странно


 
TUser ©   (2004-01-09 11:12) [16]


> Тимохов © (09.01.04 11:05) [9]

Просто иначе вопрос бы вряд ли возник. Код наподобии [2] у него заработал бы.


 
Плохиш_   (2004-01-09 11:13) [17]

>hfa © (09.01.04 11:12) [15]

Орех растёт прямо на глазах :-)


 
Тимохов ©   (2004-01-09 11:14) [18]

Плохиш_ (09.01.04 11:12) [14]

Какие же упертые бывают личности.
Говорит - не работает. Ты ему - что ты хочешь сделать. Он - НЕ РАБОТАЕТ!!! Ты ему - селать то что надо и т.д...
Прикол, чессо слово.


 
Тимохов ©   (2004-01-09 11:15) [19]

TUser © (09.01.04 11:12) [16]
Да сразу ясно, что ему надо. Но нужно же учиться хотя бы вопросы ставить четко. Это тоже талант.


 
hfa ©   (2004-01-09 11:15) [20]

но вообщето интересно то что не задолго до этого мне приходилось ее использовать и все нормально работало!


 
hfa ©   (2004-01-09 11:17) [21]

всем спасибо.......



Страницы: 1 вся ветка

Текущий архив: 2004.01.20;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.018 c
1-63157
афвуд
2004-01-06 18:51
2004.01.20
TNotifyEvent


6-63272
Magical
2003-11-15 19:47
2004.01.20
Как в Delphi 7 можно вернуть сокеты


1-63101
Unknown
2004-01-10 22:42
2004.01.20
TWinControl


1-63195
DSP
2004-01-08 19:14
2004.01.20
как определить ТОЧНО, что файл редактируется


4-63452
lex
2003-09-11 11:10
2004.01.20
Блокировать отключение монитора