typen- inkopatibilität (boolean und integer)

[Virchov]

Moin! hat jemand 'ne Idee, wie man in diesem Fall Typen-Inkopatibilität bekämpfen kann?
Danke schön!

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

  result:= (iX1-iX2) or (iY1-iY2);
  exit;
end;

[Dragon27]

Zitat von Virchov:

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

  result:= (iX1-iX2) or (iY1-iY2);
  exit;
end;

hi,

du ich glaub da is ein denkfehler drin!

du kannst nicht einfach einem result ein or zuweisen des geht nur bei if und bei until!

Und dann musst du hald erst eine If abfrage machen und wenn etwas eintritt dann result:=true else result:=false

Gruß

Andy

[Virchov]

jut. Dacht ich uch

Vielen Dank!

[Tyrael Y.]

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

  result:= (iX1-iX2) or (iY1-iY2);
  exit;
end;

Was bezweckts du damit?
Ein Boolean-Wert als Zahl kann nur 0 oder 1 sein aber bei dir z.B.

iX1 = 10
iX2 = 5
iY1 = 128
iY2 = 28

pos_not_reached(10, 5, 128, 28) = Fehler falls du aber prüfen möchtest ob iX1 gleich iX2 oder iY1 gleich iY2 ist

dann..

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

  result:= (iX1=iX2) or (iY1=iY2);
  exit;
end;

Nachtrag: ..dies würde wenn (iX1=iX2) oder (iY1=iY2) WAHR ist WAHR ergeben

wenn du aber prüfen willst ob beide WAHR sind dann

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

  result:= (iX1=iX2) AND (iY1=iY2);
  exit;
end;

Schreib mal was du überhaupt bezweckst...

Nochn Nachtrag :

oder

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

  result:= (iX1-iX2 = 0) OR bzw. AND (iY1-iY2 = 0);
  exit;
end;

ohne das man weiß was du bezweckst kann ich nicht mehr sagen

[Dragon27]

also ich würde das so machen:

Delphi-Quellcode:

function pos_not_reached (iX1,iX2,iY1,iY2 : integer) : boolean;

begin

if (ix1-ix20=0) or (iy1-iy2=0)
then result:= true
else result:=false;
  exit;
end;

ich weiß natürlich nicht was du da vergleichen willst oder machen willst!

gruß

Andy

[Sharky]

Hai Virchov,

was möchtest Du denn erreichen?

Code:

(iX1-iX2) or (iY1-iY2);

Wir vom Compiler als Binäroperation angesehen.

[Virchov]

Danke, Ihr Beide!
Genau den Abgleich möcht ich machen, ganz recht!
Die Variante mit result:= (iX1=iX2) or (iY1=iY2); begnügte den Compiler durchaus

[Virchov]

ich meinte, Danke, Ihr drei