事件错误

欧阳易幽 · 发表于 2009-9-27 07:43:29

新建了一个KOL项目，只是添加按键，编译---》成功！

倘若双击赋予button，点击事件，出现错误！到底怎样解决，现在连一个hello wold都写不出！

猫工 · 发表于 2009-9-27 09:25:53

你查看一下错误信息，是在代码的哪个地方出现的错误

欧阳易幽 · 发表于 2009-9-27 12:09:29

引用第1楼猫工于2009-09-27 09:25发表的 :
你查看一下错误信息，是在代码的哪个地方出现的错误

我什么都没写！

{ KOL MCK } /// Do not remove this line!
{$DEFINE KOL_MCK}
{$ifdef FPC} {$mode delphi} {$endif}
unit Unit1;
interface
uses Windows, Messages, KOL {place your units here->}
{$IFDEF LAZIDE_MCK}, Forms, mirror, Classes, Controls, mckCtrls, mckObjs,
Graphics, StdCtrls;
{$ELSE} ; {$ENDIF}
type
{ TForm1 }
{$I MCKfakeClasses.inc}
{$IFDEF KOLCLASSES} TForm1 = class; PForm1 = TForm1; {$ELSE OBJECTS} PForm1 = ^TForm1; {$ENDIF CLASSES/OBJECTS}
TForm1 = {$IFDEF KOLCLASSES}class{$ELSE}object{$ENDIF}({$IFDEF LAZIDE_MCK}TForm{$ELSE}TObj{$ENDIF})
Button2: TKOLButton;
Form: PControl;
KOLForm1: TKOLForm;
KOLProject: TKOLProject;
private
{$IFNDEF KOL_MCK}Button1: TButton;{$ENDIF} {<-- It is a VCL control}
{$IFNDEF KOL_MCK}Button1: TButton;{$ENDIF} {<-- It is a VCL control}
{ private declarations }
public
{ public declarations }
end;
var
Form1 {$IFDEF KOL_MCK} : PForm1 {$ELSE} : TForm1 {$ENDIF} ;
{$IFDEF KOL_MCK}
procedure NewForm1( var Result: PForm1; AParent: PControl );
{$ENDIF}
implementation
{$IFDEF KOL_MCK}
{$I Unit1_1.inc}
{$ENDIF}
initialization
{$IFNDEF KOL_MCK} {$I unit1.lrs} {$ENDIF}
end.

复制代码

欧阳易幽 · 发表于 2009-9-27 12:20:38

不知道猫工版主是使用哪一个版本的KOL-ce，以及lzarus?

可否共享一下

tjcfeng · 发表于 2009-9-27 12:59:25

估计安装的问题，重新安装就好了。

下载地址在News里有

欧阳易幽 · 发表于 2009-9-27 13:01:05

我都安装了N次，都是同样问题

下渔舟 · 发表于 2009-10-17 14:22:49

可以按照传统的办法试试，
新建lcl的项目-》保存起来-》加入kolproject-》修改 projectname-》加入 kolform-》保存
-》关闭-》打开kol工程的lpr

mzb0620 · 发表于 2009-10-30 15:01:58

我是重装了系统后再安装就好了。呵呵

mypanlong · 发表于 2009-11-3 13:38:25

我的是如果新建KOL工程后不保存时，点击事件没有问题，如果保存后就有问题了。

tsp_1030 · 发表于 2009-11-10 16:17:49

劝你还是不要用kol，要用就用原生态

		自动登录	找回密码
密码			立即注册（注册审核可向QQ群索取）