我现在遇到个问题,如我在调用某个事件自带参数时候,我怎么得到它? 谢谢帮忙!
例如这个控件TComPort,我自定义了事件(他本身也有)ComPortRxChar(Sender: TObject; Count: Integer)过程;我在别的过程中要调用这个ComPortRxChar(Sender: TObject; Count: Integer),那我在调用的时候Count的参数怎么设置呢?能得到她吗?谢谢帮忙
原代码:
procedure TRS485.ComPortRxChar(Sender: TObject; Count: Integer);
Var
Temp_receive : array of byte;
I,rec_len : byte;
Calculate_crc,rec_crc,reg,reg_value : word;
Str:String;
Begin
RcvStr := '';
ComPort.ReadStr(RcvStr, Count);
end;
Procedure TRS485.WrieMachine;
begin
ComPortRxChar(self,‘’);//读端口
RcvStatus := true;
end
上面的ComPortRxChar中的参数怎么写?
例如这个控件TComPort,我自定义了事件(他本身也有)ComPortRxChar(Sender: TObject; Count: Integer)过程;我在别的过程中要调用这个ComPortRxChar(Sender: TObject; Count: Integer),那我在调用的时候Count的参数怎么设置呢?能得到她吗?谢谢帮忙
原代码:
procedure TRS485.ComPortRxChar(Sender: TObject; Count: Integer);
Var
Temp_receive : array of byte;
I,rec_len : byte;
Calculate_crc,rec_crc,reg,reg_value : word;
Str:String;
Begin
RcvStr := '';
ComPort.ReadStr(RcvStr, Count);
end;
Procedure TRS485.WrieMachine;
begin
ComPortRxChar(self,‘’);//读端口
RcvStatus := true;
end
上面的ComPortRxChar中的参数怎么写?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货