Alter

Как сделать очередь, подобной Dоwnlоаd Маstеr?
Например:
_всего(Max) активных потоков разрешено ~5
_на запуск потоков всего ~15
_как освободилось место, запускаются следующие потоки, пока не закончатся те, которые отмечены на закачку

В реальном модуле потока используется sslHTTPCLi или idHTTP.
Интересует только очередь.

(читать всё…)

doktor255

var f: TextFile;

i, k: integer;

begin

  AssignFile(f,'c:\file.txt');

  Rewrite(f);

  for i:=1 to 15 do begin

    k := Random(5)-2;

    WriteLn(f, IntToStr(k));

  end;

  CloseFile(f);

тема на форуме

Создаю алгоритм перебора всех вариантов расположения букв в Edit1.text, только не могу домыслить его.

Суть такая, есть Edit1 и в нём текст «1234». Надо вывести в Memo1 все варианты перебора символов, например:
1234
4123
3412
2341
1324
1342
…

Подскажите пожалуйста =) как сделать такой перебор, чтобы все возможные варианты он перебрал. Сам ломаю голову второй день.. (читать всё…)

Arrasir

Как и многие программисты я интроверт.

Не секрет, что интроверты реже добиваются успехов в карьере — молчаливые люди, которые мало общаются и не умеют «заливаться соловьем» о своих успехах, редко замечаются начальством.

Как начать говорить?
Кто нибудь сталкивался с этим. Как справлялись?

(читать всё…)

Stilet

Ребята, расскажите мне что это за фича такая в роутере, и можно ли ее отключить как-то? В интернете конкретно ничего не нашел по своей проблеме, кто говорит что помогла перепрошивка, кто говорит что нужно настроить правила…
А по настоящему зачем сделали это на аппаратном уровне, и можно ли его отключить без перепрошивки?
И может ли он влиять на следующую ситуацию: Комп, который выходит через этот роутер пингует остальные хосты в VPN без проблем, а на него с других хостов не пинга, не зайти нельзя (используя такие вещи как RADmin или удаленный стол). В общем как я понимаю он в одну сторону работает, и режет все входящие.

(читать всё…)

подсчитать кол-во секций в инифайле можно с помощью http://docwiki.embarcadero.com/Libraries/XE5/en/System.IniFiles.TCustomIniFile.ReadSections
Что-то типа (читать всё…)

ImmortalAlexSan

Кто как поступает?
Сегодня, придя домой, посмотрел фотографии прошлых лет, увидел людей, которые тогда вызывали у меня фееричную эйфорию и которых сейчас в моей жизни нет. На мгновение пришло осознание того, что это прошлое, которое меня больше не тяготит. В это же время я понял, что меня не тяготят настоящие эмоции, и что они и есть прошлое. Такая забавная аналогия проскользнула в голове.

(читать всё…)

Berlioz

Всех приветствую! Имеется в наличии контроллер Arduino с USB(FT232).
Проблема: нужно организовать двусторонний обмен с ним в системе DOS. Где можно найти документацию по моему случаю?

P.S. Почему именно DOS сказать не могу — конфиденциальная информация
P.S.2 Понимаю, что задача нетривиальная

(читать всё…)

Diana-64

Меня интересует, как в Delphi 7, можно получить имена и адреса подключенных дисков (флешек, съемных жестких дисков, ets)?

(читать всё…)

(читать всё…)