JSoftware : thank you
in fact this is a c++ 1k OGL+shader , with delphi this would be 1~2 kb