Zitat von
himitsu:
[...]dann erkennt man vielleicht sogar noch 'ne Gesetzmäßigkeit in den Werten?
Durch eine minimale Verschiebung der Grenze zwischen den beiden ersten Bereichen kann man sie erzwingen:
Delphi-Quellcode:
function WebSafeVal (aValue: Byte): Byte;
begin
Result := 51 * ((aValue + 25) div 51);
end;
Gruß Hawkeye