Форум: "Прочее";
Текущий архив: 2006.03.05;
Скачать: [xml.tar.bz2];

Вниз

Доступ по сети.   Найти похожие ветки 

← →
PARUS ©   (2006-02-10 19:11) [0]

Тут такой вопросик:
Как можно через Дельфи сделать папку
(переvенная Papka: А тип Какой надо сделать?)
Доступной по сети(локальной) полностью(!)
Windows XP
Заранее благодарен!

---

← →
Kerk ©   (2006-02-10 19:13) [1]

RTFM

---

← →
PARUS ©   (2006-02-10 19:14) [2]

Пожалуста поподробнее и с коментариями!

---

← →
Kerk ©   (2006-02-10 19:15) [3]

MSDN

---

← →
PARUS ©   (2006-02-10 19:19) [4]

как использовать исходник давай что-ли.

---

← →
Kerk ©   (2006-02-10 19:20) [5]

PARUS ©   (10.02.06 19:19) [4]
исходник давай что-ли.

$20

---

← →
Zeqfreed ©   (2006-02-10 19:30) [6]

program ReadManuals;

uses
Head, Body, Computer, Misc;

begin
 with THomeComputer.Create() do begin
  try
   PowerOn("Windows XP Home Edition");
   while not PoweredOn do Misc.DrinkACupOfCoffee();

   if OpenBrowser("http://msdn.microsoft.com") then begin
    Head.TryToFigureThisOut(nil);
   end else begin
    raise Exception.Create("Shit happens, you are dismissed, soz");
   end;

   ShutDown();
   Body.GoSleep();
   Head.TurnOff();
  finally
   Free;
  end
 end;
end;

$19; Kerk, извини, мне нужнее :)

---

← →
Рамиль ©   (2006-02-10 19:45) [7]

> Zeqfreed ©   (10.02.06 19:30) [6]

И не лень было писать :)

---

← →
Zeqfreed ©   (2006-02-10 19:48) [8]

[7] Рамиль ©   (10.02.06 19:45)

> И не лень было писать :)

Сижу отдыхаю, делать нечего :)

---

← →
PARUS ©   (2006-02-11 15:31) [9]

Расплачусь 100 лет в инет дам(Б\У).

---

← →
Anatoly Podgoretsky ©   (2006-02-11 15:38) [10]

Кому нужен подержанный Инет

---

← →
kaZaNoVa ©   (2006-02-11 15:51) [11]

PARUS ©   (10.02.06 19:11)
Доступной по сети(локальной) полностью(!)
Права на запись есть?

---

← →
Prohodil Mimo ©   (2006-02-11 15:52) [12]

PARUS ©   (10.02.06 19:11)
(переvенная Papka: А тип Какой надо сделать?)
TFolder :o)

---

← →
kaZaNoVa ©   (2006-02-11 15:53) [13]

попробуй такое:

function CreateDir(const Dir: string): Boolean;
begin
 Result := CreateDirectory(PChar(Dir), nil);
end;


---

← →
Alarm ©   (2006-02-11 16:48) [14]

> PARUS ©  
См. kaZaNoVa ©   (11.02.06 15:53) [13]
+ http://www.delphimaster.ru/articles/netmon/index.html

---

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

Форум: "Прочее";
Текущий архив: 2006.03.05;
Скачать: [xml.tar.bz2];

Наверх

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