Einzelnen Beitrag anzeigen

Waldteufel
(Gast)

n/a Beiträge
 
#2

Re: WErteübergabe zwischen 2 Klassen

  Alt 1. Mai 2005, 18:01
Hi.

Du kannst auf das Feld hClient nicht zugreifen, da es als private deklariert ist. Verschiebe es einfach nach public oder richte eine property ein, dann funktioniert es.

Delphi-Quellcode:
TRcvThread = class(TThread)
  private
    hRcvNet: HCANNet;
    msg: TCANMsg;
    rcvtime: TCANTimestamp;
    procedure NachrichtAusgeben;
  protected
    procedure Execute; override;
  public
    hClient: Byte;
  end;
oder

Delphi-Quellcode:
TRcvThread = class(TThread)
  private
    hClient: Byte;
    hRcvNet: HCANNet;
    msg: TCANMsg;
    rcvtime: TCANTimestamp;
    procedure NachrichtAusgeben;
  protected
    procedure Execute; override;
  public
    property Client: Byte read hClient write hClient;
  end;
  Mit Zitat antworten Zitat