捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  粤ICP备10103342号-1 DELPHI盒子 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 盒子检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
盒子资源分类
全部展开 - 全部合拢
盒子资源分类大树
在 Lua 中使用 VCL 组件
关键字：VCL LuaPas ADOQuery 脚本
来　自：转载,http://luaforge.net/projects/vclua/
平　台：Win2k/XP/NT,Win2003 下载所需：0 火柴
深浅度：高级 完成时间：2006/11/20
发布者：zbluecn 发布时间：2006/11/20
编辑器：DELPHI7 语　　种：ENGLISH
分　类：工具 下载浏览：1020/12914
加入到我的收藏
下载错误报错
登陆以后才能下载
 用户名：
 密　码：
自动登陆(30天有效)
无图片
原始程序在 http://luaforge.net/projects/vclua/

1.添加的ADOQUERY和ADOConnect的支持
2.修改Lua的基本单元, 使用的是按照Lua提供都头文件翻译过来的头文件

没有怎么改动很小, 主要是luaADOQuery,luaADOConnect

-LuaPas
-LuaUtils

+luaADOConnect
+luaADOQuery
+LuaObject
+lauxlib.pas
+Lua.pas
+LuaConf.pas
+lualib.pas
+LuaUtils.pas

*LuaProperties
Google
 
本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！
龙脉加密锁 15元起 Grid++Report 报表 申请支付@网
　相关文章
在 Lua 中使用 VCL 组件
zbluecn 2006/11/20 下+1020/浏+12915 评+13
LuaEdit v2.5 和Lua在Delphi中的应用
xukehg 2006/11/3 下+2546/浏+17559 评+10
相关评论
共有评论13条 当前显示最后6条评论
zbluecn 2006/11/22 10:39:52
我是这样写的
但是记得要带包编译.
Lua

--print(type(VCL))
frm=VCL.Form('LuafrmMain')
frm:Show()

DelphiAPP
function luaopen_vcl(L: Plua_State): Integer; cdecl external 'vcl.dll';

//function luaopen_vclByDelphi(App: TApplication; Scr: TScreen; L: Plua_State): Integer; cdecl; external 'vcl.dll';

function LuaPrint(L: Plua_State): Integer; cdecl;
var
  I, N: Integer;
  sResult: string;
begin
  N := lua_gettop(L);
  for I := 1 to N do
    sResult := sResult + '|' + (lua_tostring(L, I)) + '|';
  ShowMessage(sResult);
  Result := 0;
end;

procedure TfrmMain.FormCreate(Sender: TObject);
begin
  L := lua_open;
  luaL_openlibs(L);
  lua_settop(L, 0);
  luaopen_vcl(L);
 // luaopen_vclByDelphi(Application, Screen, L);
  lua_settop(L, 0);
  Lua_Register(L, 'print', LuaPrint);
end;

procedure TfrmMain.btn1Click(Sender: TObject);
begin
  LuaLoadBufferFromFile(l, 'luaapp.lua', 'code');
  LuaPCall(L, 0, 0, 0);
end;
zhude 2006/11/22 23:20:53
请问一下楼上
你用的
 LuaLoadBufferFromFile(l, 'luaapp.lua', 'code');
  LuaPCall(L, 0, 0, 0);
和 

lua_dofile(MYL,'luaapp.lua');

有什么不同,谁更加好一些????????
zbluecn 2006/11/23 8:45:31
这个是在lua 中的定义
#define luaL_dofile(L, fn)      (luaL_loadfile(L, fn) || lua_pcall(L, 0, 0, 0))

呵呵 没有什么不同

我写的比较复杂
zhude 2006/11/24 1:08:43
再问一下楼主~~有没有什么手段能直接从指定的行开始执行脚本
比如说 
A.LUA
print("1");
print("2");
print("3");
print("4");

能不能通过什么手段直接从 print("2"); 开始  而不是从头执行
zbluecn 2006/11/24 9:51:53
呵呵 载入的时候 把那些行去掉就可以了啊 

LuaLoadBufferFromFile 这个的 使用的是 TStringList

这个方法比较笨, 暂时还没有想到其他的方法
zhude 2006/11/24 11:50:38
谢谢 楼主
我要发表评论 查看全部评论
 
  DELPHI盒子版权所有 技术支持:深圳市麟瑞科技有限公司 1999-2024 V4.01 粤ICP备10103342号-1 更新RSS列表