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
