Hallo, bitte kann mir da jemand helfen ?
In unit1 (OptiNumericComm)deklariert als public:
TOptiNumericComm = class(TObject)
private
comPort : TComPort;
susiAPI : TSusiAPI;
public
OutInt : integer;
InpType : byte;
sim_on :boolean;
constructor Create;
function initOptiNumericComm(ComNo : integer) : boolean;
function checkCommActive : boolean;
procedure receiveMessage(sim_on:boolean;var Itype: byte);
function transmitMessage(OutType : Byte; var MldgOK:boolean ) : boolean;
end;
In
unit 2 aufgerufen :
if TOptiNumericComm.checkCommActive then
WriteXY(32,25,'CNC Schnittstelle inaktiv') //Fehler Balken
else WriteXY(32,25,'CNC Schnittstelle aktiv');
In unit2 (MenueRefMan) als uses ist OptiNumericCom deklariert
Fehler :
[Fehler] MenueRefMan.pas(152): Diese Form des Methodenaufrufs ist nur für Klassenmethoden erlaubt
checkCommActive ist ja klassenmethode !
Was ist da falsch ??
Danke für voraus