Unitis, external Proceduren deklarieren, oder wie auch immer

[Osse]

Jo Super, Funktioniert

Vielen Dank

Für alle anderen, die auch mal ein Problem damit haben sollten.

Delphi-Quellcode:

Unit main.pas

public
   CAN_Controller : TCAN_Controller;          // Can Controller einstellungen und eingenschaften,
                                // Klasse deklariert in der Controller.pas

....

//Funktionsaufruf
CAN_Controller.Initalisierung_CANController( 5 , m_hHardware,  CAN_BAUD_500K  , 'Testnet' , 'Oliver' , m_hClient  );

In der Anderen Unit:

Delphi-Quellcode:

unit Controller;

interface

uses
  Windows,WinTypes, Winprocs, Messages, SysUtils, Classes, Graphics, Controls,
  Forms, Dialogs, StdCtrls, CanApi2, ExtCtrls, ComCtrls, Menus, SyncObjs, Grids;

type
//allgemeine Controlerbezeichnung
   TController = CLASS
       m_hClient: HCANClient;      // Typ 'Client-Handle' Byte Variable aus Unit CANAPI2 eigentlich eine Byte Variable
      m_hNet : HCANNet;         // Typ 'Net-Handle' Byte Variable aus Unit CANAPI2 eigentlich eine Byte Variable
    m_hHardware : HCANHw;     // Typ 'Hardware-Handle' Byte Variable aus Unit CANAPI2 eigentlich eine Byte Variable
   END ;

  TCAN_Controller = CLASS(TController)
         procedure Initalisierung_CANController(Netz : HCANNet ; Hardware : HCANHw ;
      Baudrate : Integer ; Netzname : String ;  Clientname : String ;  var Client : HCANClient);
    end;


implementation

procedure TCAN_Controller.Initalisierung_CANController(Netz : HCANNet ; Hardware : HCANHw ;
    Baudrate : Integer ; Netzname : String ;  Clientname : String ;  var Client : HCANClient);

Nochmal vielen Dank an alle