Показать сообщение отдельно
Старый 24.06.2011, 22:00   #40
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

ресет разве не трет все регистрелангвиджи и регистерхеадеры ?

delphi Код:
fPaxCompiler:=TPaxCompiler.Create(nil); fPaxPascalLanguage:=TPaxPascalLanguage.Create(nil); fPaxCompiler.Reset; fPaxCompiler.RegisterLanguage(fPaxPascalLanguage); //рега языка после ресета fPaxCompiler.RegisterHeader(0, 'procedure WriteStr(s : string);', @PaxWriteStr); //рега ф-й после реги языка. fPaxCompiler.AddModule('mainmodule',fPaxPascalLanguage.LanguageName); //код fPaxCompiler.AddCodeFromFile('mainmodule', filname); result:=fPaxCompiler.Compile(PaxProgram1); scriptloaded:=result;
ну и paxProgram.Run; гдето.

кстати, учитывай еще такой интересный факт. что после компиляции тебе нужно вызвать run если ты планируешь юзать ф.и. из пакса. т.е. компильяция - запуск (даже если тело программы пустое) и только потом вызов всяких там "onxxx"
в противном случае будут сюрпризы )
__________________
L2Ext - project closed.

Последний раз редактировалось alexteam, 24.06.2011 в 22:09.
alexteam вне форума   Ответить с цитированием
За это сообщение alexteam нажился спасибкой от: