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

edit   Найти похожие ветки 

← →
ashnurov ©   (2004-05-24 11:23) [0]

Подскажите. Допустим у меня в edit есть строка C:\123\123.exe
как сделать чтобы при нажатии на кнопку оставалось только С:\123\

---

← →
Sandman25+1   (2004-05-24 11:25) [1]

ExtractFilePath

---

← →
PVOzerski ©   (2004-05-24 11:29) [2]

Edit1.Caption:=ExtractFilePath(Edit1.Caption);

---

← →
SergP ©   (2004-05-25 23:30) [3]

>  [2] PVOzerski ©   (24.05.04 11:29)


Наверное Edit1.Text....

---

← →
Fay ©   (2004-05-26 04:37) [4]

2SergP ©   (25.05.04 23:30) [3]

var
 Edit1 : TLabel;
begin
 Edit1 := Label1;
 Edit1.Caption:=ExtractFilePath(Edit1.Caption);  
end;

8)

---

← →
Глеб   (2004-05-26 04:40) [5]

ExtractFilePath или ExtractFileDir
:-)

---

← →
Fay ©   (2004-05-26 04:44) [6]

2Глеб   (26.05.04 04:40) [5]
ExtractFileDir подойдёт только когда вернёт корневой каталог, т.к. "оставалось только С:\123\"

---

← →
Anatoly Podgoretsky ©   (2004-05-26 09:33) [7]

ExtractFileDir не подойдёт

---

← →
Глеб   (2004-05-26 09:55) [8]

В каких-то случаях ExtractFileDir полезен

---

← →
PVOzerski ©   (2004-05-26 10:10) [9]

Естественно, я маленько ошибся: имея в виду text, написал caption :^) Хотя кто мне запретит обозвать, скажем, tlabel именем Edit1? :^)

---

← →
Anatoly Podgoretsky ©   (2004-05-26 11:02) [10]

Глеб   (26.05.04 09:55) [8]
Полезность не оспаривается, только то что результат будет совсем не тот, который просит автор.

---

← →
ashnurov ©   (2004-05-26 11:55) [11]

а как убрать ещё и последний слеш т.е. чтобы осталось C:\123

---

← →
Song ©   (2004-05-26 12:04) [12]

> а как убрать ещё и последний слеш т.е. чтобы осталось C:\123

ExtractFileDir

---

← →
Gero ©   (2004-05-26 12:11) [13]

> а как убрать ещё и последний слеш т.е. чтобы осталось C:\123

if Pos then Delete

---

← →
Fay ©   (2004-05-26 12:41) [14]

>> if Pos then Delete
Для примера : c:\program files\Borland\Delphi5\Source

---

← →
Gero ©   (2004-05-26 13:49) [15]

Тьфу, это у меня заскок, прошу прощения.
if S[Length(S)] = "\" then Delete(S, Length(S), 1);

---

← →
VMcL ©   (2004-05-26 15:17) [16]

>>Gero ©  (26.05.04 13:49) [15]

Велосипед уже придумали:
Во-первых, [12]. Во-вторых, ExcludeTrailingPathDelimiter() или ExcludeTrailingBackslash().

---

← →
Gero ©   (2004-05-26 16:35) [17]

> VMcL ©   (26.05.04 15:17)

Это существенно?

---

← →
YurikGl ©   (2004-05-26 16:39) [18]

По моему, проще руками написать.

---

← →
jack128 ©   (2004-05-26 16:41) [19]

> Во-вторых, ExcludeTrailingPathDelimiter() или ExcludeTrailingBackslash().

хе. Я уж год как пытаюсь запомнить - и никак :-)

---

← →
VMcL ©   (2004-05-26 16:43) [20]

>>jack128 ©  (26.05.04 16:41) [19]

<offtopic>
Ну вот видишь. Дяди из Борланда заботятся ещё и о том, чтобы заодно и твою память тренировать :)
</offtopic>

---

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

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



Память: 0.48 MB
Время: 0.021 c