HiAsm

Разработчик

Ответов: 26322

Рейтинг: 2147

#1: 2011-03-10 19:09:45 ЛС | профиль | цитата

Ivann, а на строковые данные не вариант перевести, с выходом на событие и на нижнюю точку

Те сделать так, как сделаны компоненты Криптогафии
------------ Дoбавленo в 19.09:
Тааак. Память выделяем


procedure Initialize(AKey: string);
begin
 GetMem(KeyPtr, KeySize);
 FillChar(KeyPtr^, KeySize, #0);
 Key := AKey;

 InvolveKey;
end;

А освобождаем где

карма: 22