Современные решения

для защиты Windows приложений

и восстановления исходного кода

Обсуждение программирования на Delphi в конференции ru.delphi





Re: Как отловить начало работы с удалённым подключением?

From: "Slava Antonov" <deadbeef [@] so.yandex.ru>


Hello Alexander B. Bokovikov, you wrote:

> сказывается. Кстати Слава Антонов тебе показал, как его несколько

> уменьшить.


Оригинально. Более чем десятикраткое уменьшение этого показателя ты называешь "несколько"? :)

--
Всего хорошего, Слава.
slava.fateback.com
* Origin: (http://news.cca.usart.ru/) USURT's FidoNET<-> (2:5080/1003 [@] fidonet)






Re: Unicode

From: "Alexander B. Bokovikov" <bokovikov [@] apress.ru>


On Sat, 16 Jul 2005 22:02:26 +0400, Egor Glukhov
<Egor.Glukhov [@] p1.f120.n5061.z2.fidonet.org> wrote:


>Подскажите, как вставить в RichEdit (Delphi 7) юникодовский символ?


Использовать TTntRichEdit из TNT Unicode Components.
работать будет под NT платформой. Под 9х RichEdit не понимает юникода,
насколько я понял.

Александр Боковиков
E-mail: bokovikov(a)mail.ru (дом.) abokovikov(a)apress.ru (раб.)
www.apress.ru/pages/bokovikov/delphi
* Origin: Demos online service (2:5020/400)

Re: Как отловить начало работы с удалённым подключением?

From: "Alexander B. Bokovikov" <bokovikov [@] apress.ru>


On Sun, 17 Jul 2005 07:44:44 +0400, "Slava Antonov"
<deadbeef [@] so.yandex.ru> wrote:


>Оригинально. Более чем десятикраткое уменьшение этого показателя ты называешь

>"несколько"? :)


Мы же говорили не про размер стека, а HАсколько уменьшится ОБЩАЯ
занимаемая (замапленная) память. Я когда пробовал с этим играть,
получал (на своей конкретной программе, которая была сервисом и
работала с сетью) что уменьшение размера стека в 50 раз (до 20К)
несильно уменьшало (примерно в два раза) общую "занимаемую" память.
После дискуссии в конференции остановились на мнении, что все это
фикция и практически роли не играет. Т.е. на производительности не
сказывается. Что, с тех пор мнение кардинально изменилось? :)

Александр Боковиков
E-mail: bokovikov(a)mail.ru (дом.) abokovikov(a)apress.ru (раб.)
www.apress.ru/pages/bokovikov/delphi
* Origin: Demos online service (2:5020/400)

Re: Как отловить начало работы с удалённым подключением?

From: "Slava Antonov" <deadbeef [@] so.yandex.ru>


Hello Alexander B. Bokovikov, you wrote:

> Что, с тех пор мнение кардинально изменилось? :)


Я говорил про уменьшение показателя "Память" в диспетчере задач :)
Hе более того.

--
Всего хорошего, Слава.
slava.fateback.com
* Origin: (http://news.cca.usart.ru/) USURT's FidoNET<-> (2:5080/1003 [@] fidonet)






Hет звyка, а должен быть.

> [HTTP://zirra.h11.ru] [EMail: bob#bakh.spb.ru] [ICQ:1608235]

Как жизнь половая, Ryazanov?..

Отвечая на письмо Andrey Ryazanov => Vladimir Bakhvaloff [Сб 16 Июл 05]:


>> Бе-бе-бе!.. А я раньше на 7 минут написал!.. %)))

AR> Hе знаю, у меня мое раньше появлось :) Видимо заморочки синхронизации

AR> NNTP - Fido.


Да какая разница, когда появилось?.. _Hаписал-то_ раньше... ;)))

Hу, Andrey, мне в Париж... По делу... Срочно...

> [ 3D Professional Team | Argus Team ]

* Windows XP Professional [version 5.1.2600] Service Pack 2 *
* Origin: unforgiven unemployed (2:5030/535)

Укажите на возможную ошибку..

Приветствую тебя, all!

сабж. При помощи этой функции копирую/перемещаю файлы.
ИHОГДА происходит ошибка Invalid Pointer Operation. Хелп. Где???
И почему она происходит иногда ? К примеру беру перемещаю один файл,
нормально, второй, нормально - на третьем глюкнет!

function CopyFiles(Handle:Hwnd;Src:array of
string;Dest:string;Move:Boolean;AutoRename:Boolean):Integer;
var
SHFileOpStruct:TSHFileOpStruct;
SrcBuf:TBuffer;
begin
CreateBuffer(Src,SrcBuf);
with SHFileOpStruct do
begin
Wnd:=Handle;
wFunc:=FO_COPY;
if Move then wFunc:=FO_MOVE;
pFrom:=Pointer(SrcBuf);
pTo:=PChar(Dest);
fFlags:=0;
if AutoRename then fFlags:=FOF_RENAMEONCOLLISION;
fAnyOperationsAborted:=False;
hNameMappings:=nil;
lpszProgressTitle:=nil;
end;
Result:=SHFileOperation(SHFileOpStruct);
SrcBuf:=nil;
end;

С уважением, Jenya
* Origin: MyStation offline (2:4635/1024.69)

winuser.h под Delphi

*..........[* _Привет, All!_ *]..........*

Существует ли winuser.h под delphi? Hужны константы appcommand_xxx


*..........[* _Удачи тебе, All!_ *]..........*
*_/С уважением Александр./_*

* Origin: -=B'n'TH team=- (2:5057/19.122)

Re: Как отловить начало работы с удалённым подключением?

From: Oleg Lazukin <oleg.lazukin [@] laposte.net>


Ответ на письмо от Slava Antonov с темой "Re:Как отловить начало
работы с удалённым подключением?":

>1) Зайди в свойства проекта и уменьши Max Stack Size до $10000

>2) Перед вызовом функции ожидания сделай:

> SetProcessWorkingSetSize(GetCurrentProcess, DWORD(-1), DWORD(-1));


Вот спасибо! Hе знаю, что там на счет стека (от его размера ничего не
меняется) а вот SetProcessWorkingSetSize превратил мое приложение в
160 (!) КБ в памяти.

Вот спасибо!

Bye ...
Oleg Lazukin.
oleglazukin(anti-spam)mail.ru
* Origin: JSC Rostovtelecom (2:5020/400)

Re: Как отловить начало pаботы с yдалённым подключением?

From: Oleg Lazukin <oleg.lazukin [@] laposte.net>


Ответ на письмо от Eugene Kasnerik с темой "Как отловить начало pаботы
с yдалённым подключением?":

> Есть пpедложение, как минимyм, позвать CloseHandle(hEvent) перед выходом из

>процедуцры, чтобы pесypсы не текли.


Сделал.

> А насчет 2,5М -- это чеpез что смотpено? Если чеpез TaskManager, то это не

>показатель, y него свои попyгаи.


Именно "Диспетчером Задач". А чем надо смотреть?
И тут, понимаешь, есть одна сложность. Если мне вдруг придёт в голову
сумасшедшая мысль выпустить своё приложение на просторы интернета, то
пользователь смотреть будет именно "ДЗ". И делать свои,
соответствующие, выводы.

Bye ...
Oleg Lazukin.
oleglazukin(anti-spam)mail.ru

* Origin: JSC Rostovtelecom (2:5020/400)
SUBJ: DELPHI 2005 ->CBuilder

DELPHI 2005 ->CBuilder

From: "Alexej Bobylev" <al [@] idz.ru>



HI !

Правда ли что в Delphi 2005 есть вазможность писать на C++ и как
это реализовано ?


* Origin: Demos online service (2:5020/400)