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

Вниз

Папка верхнего уровня   Найти похожие ветки 

 
webpauk ©   (2007-11-30 15:49) [0]

Как из строки C:\Program Files\Common Files\ папку верхнего уровня получить C:\Program Files\


 
Sergey13 ©   (2007-11-30 15:52) [1]

cd ..


 
webpauk ©   (2007-11-30 16:01) [2]


> Sergey13 ©   (30.11.07 15:52) [1]


var
S: String;
begin
S:="C:\Program Files\Common Files\";
S(new):=???


 
Рамиль ©   (2007-11-30 16:04) [3]

"C:\Program Files\Common Files\.."


 
{RASkov} ©   (2007-11-30 16:06) [4]

> [2] webpauk ©   (30.11.07 16:01)

Copy, LastDelimeter
?


 
homm ©   (2007-11-30 16:10) [5]

> [0] webpauk ©   (30.11.07 15:49)
> Как из строки C:\Program Files\Common Files\ папку верхнего
> уровня получить C:\Program Files\

Папку верхнего уровня C:\


 
Reindeer Moss Eater ©   (2007-11-30 16:10) [6]

Если нет слэша на конце
ShowMessage(ExtractFileDir("C:\Program Files\Common Files"));

Если есть и если нет слэша
ShowMessage(ExpandFileName("C:\Program Files\Common Files\.."));


 
{RASkov} ©   (2007-11-30 16:20) [7]

function GetUpDir(const SPath: String): String;
begin
 if SPath[Length(SPath)]=PathDelim then Result:=Copy(SPath, 1, Length(SPath)-1)
  else Result:=SPath;
 Result:=Copy(Result, 1, LastDelimiter(PathDelim, Result));
end;

const TxtPath = "C:\Program Files\Common Files\";
begin
ShowMessage(GetUpDir(TXtPath));

)


 
webpauk ©   (2007-11-30 16:53) [8]


> {RASkov} ©   (30.11.07 16:20) [7]

спсб



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
15-1195867805
SerJaNT
2007-11-24 04:30
2007.12.23
Помогите составить SQL-запрос


2-1196154909
Quart
2007-11-27 12:15
2007.12.23
массив


2-1195909606
Servelat
2007-11-24 16:06
2007.12.23
Приведение типов


2-1196059598
nika
2007-11-26 09:46
2007.12.23
createprocess


2-1196486249
Ravshan
2007-12-01 08:17
2007.12.23
Как можна скопировать структуру и данные из формата dbf на Oracle