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

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

← →
Adios ©   (2006-05-26 18:26) [0]

как можно посчитать количество символов в строке включая пробелы?
как узать запущенали программа из корня диска?

---

← →
Ega23 ©   (2006-05-26 18:28) [1]

> как можно посчитать количество символов в строке включая
> пробелы?


Length(aString);


> как узать запущенали программа из корня диска?


Что такое "корень диска"?

---

← →
Adios ©   (2006-05-26 18:30) [2]

корень диска это "C:\моя программа"

---

← →
umbra ©   (2006-05-26 18:31) [3]

> как узать запущенали программа из корня диска?
>

if Length(ExtractFilePath(Application.ExeName)) = 3 then
       //программа запущена из корня диска

---

← →
Ega23 ©   (2006-05-26 18:34) [4]

> корень диска это "C:\моя программа"


Вот, предположим, у меня есть директория E:\Temp\.
И, предположим, букву диска C: я заменил на K:
Теперь запускаю в cmd-shell команду subst c: e:\temp
И появляется у меня логический диск C. Который, на самом деле, и вовсе не С, а E:\Temp.

Так что ты уж определись...

---

← →
Ega23 ©   (2006-05-26 18:35) [5]

>
> if Length(ExtractFilePath(Application.ExeName)) = 3 then
>        //программа запущена из корня диска


Ага. И запускалась программа  \\DBSrv1\Share\myprog.exe

---

← →
Ega23 ©   (2006-05-26 18:36) [6]

> Ага. И запускалась программа  \\DBSrv1\Share\myprog.exe


Точнее, \\DBSrv1\C$\myprog.exe

---

← →
umbra ©   (2006-05-26 18:45) [7]

2 Ega23 ©   (26.05.06 18:36) [6]

ExtractFilePath(\\DBSrv1\C$\myprog.exe) = \\DBSrv1\C$\

---

← →
Ega23 ©   (2006-05-26 18:52) [8]

> ExtractFilePath(\\DBSrv1\C$\myprog.exe) = \\DBSrv1\C$\


А запустил - из корня.  :о)

---

← →
umbra ©   (2006-05-26 19:05) [9]

а правда запускали? или чисто теоретически? когда я запустил на своем компе прогу, зайдя через сетевое окружение, то она мне показала локальный путь, а не сетевой.

---

← →
Ega23 ©   (2006-05-26 19:15) [10]

> а правда запускали? или чисто теоретически? когда я запустил
> на своем компе прогу, зайдя через сетевое окружение, то
> она мне показала локальный путь, а не сетевой.


Только что проверил. Чисто сетевой. И ShowMessage(ParamStr(0)) и ShowMessage(Application.exeName)

---

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

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



Память: 0.47 MB
Время: 0.036 c