|
Registriert seit: 17. Nov 2005
Ort: Hamburg
1.077 Beiträge
Delphi XE2 Professional
|
AW: Prüfen ob sich Bereiche überlappen
4. Feb 2011, 23:02
Delphi-Quellcode:
FUNCTION Overlaps(min1,max1,min2,max2:integer):boolean;
begin
result:=(max2>=min1) and (min2<=max1);
end;
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
|