В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Delphi & Lazarus

449 membersпожаловаться на группу
2020 May 18

AS

Alexey Shumkin in Delphi & Lazarus
Sergey Bodrov
Меня смущает, что github проприетарный, собственность Майкроофт. И они могут в любой момент прикрыть репозиторий с примерами кода по любому поводу. Как дополнительный инструмент - да.
но при этом это распределённое хранилище

а чем твой сайт не такой?
ты забыл оплатить домен - и всё )
источник
12:42пожаловаться#1

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
но при этом это распределённое хранилище

а чем твой сайт не такой?
ты забыл оплатить домен - и всё )
Да и любой код можешь прикрыть по своим причинам)
источник
12:43пожаловаться#2

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
Да и любой код можешь прикрыть по своим причинам)
ну, Git-репу (или gist) легко и просто клонировать...
источник
12:46пожаловаться#3

VA

Viktor Akselrod in Delphi & Lazarus
Геннадий Малинин
HGM.Common.Download.pas
(4.07 Кб)
Работает сокращенно так: 
TDownload.CreateAndStart('https:\\vk.com', 'D:\tmp.html');
   FileClose(FileCreate(FileName));
   Mem := TFileStream.Create(FileName, fmOpenWrite);

колдуешь? 🙂
источник
12:48пожаловаться#4

ГМ

Геннадий Малинин... in Delphi & Lazarus
Viktor Akselrod
   FileClose(FileCreate(FileName));
   Mem := TFileStream.Create(FileName, fmOpenWrite);

колдуешь? 🙂
Да, как-то давно так делал) Так и осталось
источник
12:48пожаловаться#5

ГМ

Геннадий Малинин... in Delphi & Lazarus
Viktor Akselrod
   FileClose(FileCreate(FileName));
   Mem := TFileStream.Create(FileName, fmOpenWrite);

колдуешь? 🙂
Об 
fmCreate
узнал позже)
источник
12:50пожаловаться#6

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
Я писал вот такую загружалку. В нескольких проекта без проблем работает. С отображением прогресса.
except пустой - ай-яй-яй
источник
12:50пожаловаться#7

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
except пустой - ай-яй-яй
Ошибка не важна и не нужна была
источник
12:51пожаловаться#8

ГМ

Геннадий Малинин... in Delphi & Lazarus
Главное результат. Положительный или отрицательный
источник
12:51пожаловаться#9

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
except пустой - ай-яй-яй
Вот так было написано раньше 😁
источник
12:52пожаловаться#10

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
HGM.Common.Download.pas
(4.07 Кб)
Работает сокращенно так: 
TDownload.CreateAndStart('https:\\vk.com', 'D:\tmp.html');
class function Get  дублирует Execute?
зачем она вообще?
синхронная
источник
12:52пожаловаться#11

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
Вот так было написано раньше 😁
не должно, если... ну-ну )
источник
12:53пожаловаться#12

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
Вот так было написано раньше 😁
OOM не принимается в расчёт?
ошибка прав доступа?
неверное имя файла?
источник
12:54пожаловаться#13

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
class function Get  дублирует Execute?
зачем она вообще?
синхронная
И синхронные иногда нужны. Например выполнять внутри собственного потока
источник
12:54пожаловаться#14

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
OOM не принимается в расчёт?
ошибка прав доступа?
неверное имя файла?
Ты лучше не смотри туда. Код там переписан. Ну и очевидно же, что не брались в расчет)
источник
12:55пожаловаться#15

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
class function Get  дублирует Execute?
зачем она вообще?
синхронная
А дублирует, потому что код который в Execute выполняется с настроенным иначе HTTP клиентом. Там колбеки
источник
12:56пожаловаться#16

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
А дублирует, потому что код который в Execute выполняется с настроенным иначе HTTP клиентом. Там колбеки
но дублирует? )
и Get может работать иначе, чем в потоке ))
источник
12:57пожаловаться#17

AS

Alexey Shumkin in Delphi & Lazarus
Геннадий Малинин
Ты лучше не смотри туда. Код там переписан. Ну и очевидно же, что не брались в расчет)
дык, смотрю туда, что кинул )))
источник
12:57пожаловаться#18

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
дык, смотрю туда, что кинул )))
Скопировал что было
источник
12:58пожаловаться#19

ГМ

Геннадий Малинин... in Delphi & Lazarus
Alexey Shumkin
но дублирует? )
и Get может работать иначе, чем в потоке ))
?
источник
12:58пожаловаться#20