`Hallo,
bekomme immer einen Compiler Error: (Incompatible Types)
WIes0? (Delphi XE6)

zusammenfalten · markieren

Delphi-Quellcode:

..


interface

uses
  System.SysUtils, System.Classes,System.SyncObjs,Generics.Collections,System.DateUtils,System.Types
  {$IFDEF ANDROID}
   ,android.hardware.usb.HID
  {$ENDIF}
  ;
..

  // das richte Type is in android.usb.HID TRichtung = (UP=1, DOWN=2, NONE=0);

  TUSB=class
  private

    function FReadReportRichtung(board:word):android.hardware.usb.HID.TRichtung;
    function FMyReSetReportRichtung(board:word):android.hardware.usb.HID.TRichtung;

    property ReadReportRichtung[board: word]: android.hardware.usb.HID.TRichtung read FReadReportRichtung write FMyReSetReportRichtung ;
    property ReadReportValid[board: word]: boolean read FReadReportValid;

    
   // function AllReadReportData(board: word; wert: double; richtung: TRichtung; valid: boolean): string ;
    
  end;

und dann weiter unten die Routine:

markieren

Delphi-Quellcode:

function TUSB.FMyReSetReportRichtung(board:word):android.hardware.usb.HID.TRichtung;

begin

   Result:=android.hardware.usb.HID.TRichtung(None);


end;

Kann man nur string oder intergers in eine Property schreiben? Mein Typ is TRICHTUNG.
DANKE für die HIlfe
mfg
walter

Hallo,
nimm mal das TRichtung weg.


Heiko

Moin...
@TE: Warum nur mußte ich deinen Beitrag mehrfach lesen?
Vieleicht zeigst du uns mal die entsprechende Codestelle (Deklarationen). Dann wird alles viel klarer.

Moin...

markieren

Delphi-Quellcode:

function TUSB.FMyReSetReportRichtung(board:word):android.hardware.usb.HID.TRichtung;
begin
  Result:=android.hardware.usb.HID.TRichtung(None);
end;

...ein Setter ist eine procedure und hat kein Result.

Nimm mal deine Getter und Setter Funktionen weg, setze den Cursor in diese Zeile property ReadReportRichtung[board: word]: android.hardware.usb.HID.TRichtung read FReadReportRichtung write FMyReSetReportRichtung ; und drücke SHIFT+CTRL+C
Damit werden die korrekten Prozedurrümpfe erstellt.

PS: Ich habe mit der Delphi-Referenz Suche auf die Schnelle keinen Eintrag für TRichtung gefunden. Was ist das? Ich glaube eher du brauchst nur eine "Standard" Property ohne Getter und Setter und ohne Index.

markieren

Delphi-Quellcode:

FReadReportRichtung: TRichtung;
.
.
property ReadReportRichtung: TRichtung read FReadReportRichtung write FReadReportRichtung ;

Wenn man sich an die Naming-Conventions hält, dann kann man sich von der IDE sehr schön unter die Arme greifen lassen:

markieren

Delphi-Quellcode:

TUSB=class
  private
    property ReadReportRichtung[board: word]: android.hardware.usb.HID.TRichtung read GetReadReportRichtung write SetReadReportRichtung;
  end;

Jetzt noch innerhalb der Klassen-Deklaration ein beherztes SHIFT-STRG-C und die Setter- und Getter-Methoden werden von der IDE perfekt deklariert und auch gleich als leere Methodenrümpfe implementiert. Ausfüllen, fertig.

Weniger Arbeit, weniger Fehler, mehr Zeit für den Abwasch (TomatoBrotomat)