Показать сообщение отдельно
Старый 24.07.2008, 08:38   #9
Рыцарь
 
Аватар для QaK
 
Регистрация: 28.09.2007
Сообщений: 1,558
Сказал Спасибо: 71
Имеет 351 спасибок в 244 сообщенях
QaK пока неопределено
По умолчанию

В CallMethod добавить
delphi Код:
if MethodName = 'STRTOHEX' then Result:=StringToHex(Params[0],'') else
В RefreshPrecompile добавить
delphi Код:
fsScript.AddMethod('function StrToHex(Str:String):String',CallMethod);

Последний раз редактировалось QaK, 24.07.2008 в 12:53.
QaK вне форума   Ответить с цитированием