![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]() |
![]() |
![]() |
![]() |
#12 |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]()
Закомментировал строчку
Код:
|
![]() |
![]() |
![]() |
#13 |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
![]()
Что бы не заморачиваться с кодом если самый большой файл не превышает 200мг то зайдите в Delphi в меню Tools -> EditorOption в закладке General в UndoLimit поставьте значение примерно 200767 это ресурс памяти в Delphi.
И запустите свой старый проект, проблемы с памятью должны исчезнуть |
![]() |
![]() |
![]() |
#14 | |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]() Цитата:
|
|
![]() |
![]() |
![]() |
#15 |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
![]()
Увеличьте этот лимит до 2гб могут быть тормоза, т.к файл подкачки работать будет
Последний раз редактировалось Aliens_wolfs; 20.11.2017 в 19:00. |
![]() |
![]() |
![]() |
#16 |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]() |
![]() |
![]() |
![]() |
#17 | |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]() Цитата:
Код:
|
|
![]() |
![]() |
![]() |
#18 |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]()
Причём ошибка идет из
except Synchronize(MemoryEXP); А не из if Pos('size',list.DataString)<>0 then Synchronize(Sync) else Synchronize(Async); |
![]() |
![]() |
![]() |
#19 | |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
![]() Цитата:
Почитай про TidHTTP интересное чтиво http://www.webdelphi.ru/2011/07/bibl...-httpsend-pas/ там в середине есть интересный пример, для отправки файлов Из этого чтиво найди функцию по отправки procedure TForm8.btnSendClick(Sender: TObject); Да и вообще много интересного в этом чтиве Последний раз редактировалось Aliens_wolfs; 20.11.2017 в 22:25. |
|
![]() |
![]() |
![]() |
#20 | |
Пользователь
Регистрация: 19.11.2017
Сообщений: 18
|
![]() Цитата:
|
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Delphi срочно помощь | dasf51 | Фриланс | 8 | 07.09.2017 12:53 |
Срочно! Помощь с циклами в Delphi | Raikerock | Помощь студентам | 3 | 14.09.2014 09:27 |
Нужна помощь с пакетной передачей | anghela | Помощь студентам | 18 | 01.12.2013 13:08 |
ПРоблема с передачей и сохранением файлов с помощью indi компонентов | albatros | Работа с сетью в Delphi | 4 | 18.02.2009 22:39 |
Нужна помощь с передачей даных в процедуру | programer_tang | Общие вопросы Delphi | 5 | 28.08.2008 10:14 |