Вниз
Скачать: CL | DM;

To slash or not to slash? :-)   Найти похожие ветки 

← →
WhiteGuy   (2005-01-05 00:24) [0]

Здорово, мужики!
Такой трабл:
мне нужно разрезать файл, записать его и т.п. и т.д.
В общем, куски этого файла надо записать в папку - edit2.text. Прикол в том, что если в конце пути не прописать слэш (\), то файл запишется неизвестно  куда... короче как мне сделать так, чтоб моя прога проверяла, есть ли в конце \ или нет.. Сначала я думал просто сделать edit2.text:=edit2.text+"\" - работает, ЕСЛИ юзверь не поставит САМ этот слэш... Можно peace of code, плиз? 8-)


← →
sniknik ©   (2005-01-05 00:31) [1]

if edit2.text <> "" then
 if edit2.text[length(edit2.text)] <> "\" then edit2.text:=edit2.text+"\";


← →
Andrewp ©   (2005-01-05 00:33) [2]

так можно получить последний символ в строке:
path[length(path)]
где path путь


← →
iskatel   (2005-01-05 00:33) [3]

extern PACKAGE AnsiString __fastcall IncludeTrailingPathDelimiter(const AnsiString S);

Description

IncludeTrailingPathDelimiter ensures that a path name ends with a trailing path delimiter ("\"). If S already ends with a trailing delimiter character, it is returned unchanged; otherwise S with appended delimiter character is returned.

Note: IncludeTrailingPathDelimiter works with multibyte character sets.

ну на дельфях мож синтаксис другой :-)


← →
iskatel   (2005-01-05 00:36) [4]

ЗЫ

IncludeTrailingBackslash()

для старых версий :-)


← →
WhiteGuy   (2005-01-05 00:50) [5]

Спасиб, мужики! Не успел написать вопрос - как уже натайпали ответ! Вы что, телепаты? :-)


← →
WhiteGuy   (2005-01-05 01:05) [6]

Верняк, работает! Даж не знаю, как блягодарить! Короче, с меня причитается! 8-)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
9-1097322125
Delphis
2004-10-09 15:42
2005.01.23
На весь экран


4-1101285115
Users
2004-11-24 11:31
2005.01.23
Переход по TAB на API


3-1103633684
den_777
2004-12-21 15:54
2005.01.23
Частое изменение метаданных в INTERBASE


1-1105435193
k@rt
2005-01-11 12:19
2005.01.23
Ассоциация файлов с Delphi


1-1105606735
TUser
2005-01-13 11:58
2005.01.23
Self в потоке




   Наверх