Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Tree: 90744753b9
Branches Tags
freepascal.comp...
/
packages
/
extra
/
ptc
/
c_api
/
surfaced.inc

surfaced.inc 2.1 KB
History Raw

123456789101112131415161718192021222324252627282930313233343536373839404142 
  1. { setup }
    2. 

  2. Function ptc_surface_create(width, height : Integer; format : TPTC_FORMAT) : TPTC_SURFACE;
    3. 

  3. Procedure ptc_surface_destroy(obj : TPTC_SURFACE);
    4. 

  4. 

  5. { copy to surface }
    6. 

  6. Procedure ptc_surface_copy(obj : TPTC_SURFACE; surface : TPTC_SURFACE);
    7. 

  7. Procedure ptc_surface_copy_area(obj : TPTC_SURFACE; surface : TPTC_SURFACE; source, destination : TPTC_AREA);
    8. 

  8. 

  9. { memory access }
    10. 

  10. Function ptc_surface_lock(obj : TPTC_SURFACE) : Pointer;
    11. 

  11. Procedure ptc_surface_unlock(obj : TPTC_SURFACE);
    12. 

  12. 

  13. { load pixels to surface }
    14. 

  14. Procedure ptc_surface_load(obj : TPTC_SURFACE; pixels : Pointer; width, height, pitch : Integer; format : TPTC_FORMAT; palette : TPTC_PALETTE);
    15. 

  15. Procedure ptc_surface_load_area(obj : TPTC_SURFACE; pixels : Pointer; width, height, pitch : Integer; format : TPTC_FORMAT; palette : TPTC_PALETTE; source, destination : TPTC_AREA);
    16. 

  16. 

  17. { save surface pixels }
    18. 

  18. Procedure ptc_surface_save(obj : TPTC_SURFACE; pixels : Pointer; width, height, pitch : Integer; format : TPTC_FORMAT; palette : TPTC_PALETTE);
    19. 

  19. Procedure ptc_surface_save_area(obj : TPTC_SURFACE; pixels : Pointer; width, height, pitch : Integer; format : TPTC_FORMAT; palette : TPTC_PALETTE; source, destination : TPTC_AREA);
    20. 

  20. 

  21. { clear surface }
    22. 

  22. Procedure ptc_surface_clear(obj : TPTC_SURFACE);
    23. 

  23. Procedure ptc_surface_clear_color(obj : TPTC_SURFACE; color : TPTC_COLOR);
    24. 

  24. Procedure ptc_surface_clear_color_area(obj : TPTC_SURFACE; color : TPTC_COLOR; area : TPTC_AREA);
    25. 

  25. 

  26. { surface palette }
    27. 

  27. Procedure ptc_surface_palette_set(obj : TPTC_SURFACE; palette : TPTC_PALETTE);
    28. 

  28. Function ptc_surface_palette_get(obj : TPTC_SURFACE) : TPTC_PALETTE;
    29. 

  29. 

  30. { surface clip area }
    31. 

  31. Procedure ptc_surface_clip_set(obj : TPTC_SURFACE; area : TPTC_AREA);
    32. 

  32. 

  33. { data access }
    34. 

  34. Function ptc_surface_width(obj : TPTC_SURFACE) : Integer;
    35. 

  35. Function ptc_surface_height(obj : TPTC_SURFACE) : Integer;
    36. 

  36. Function ptc_surface_pitch(obj : TPTC_SURFACE) : Integer;
    37. 

  37. Function ptc_surface_area(obj : TPTC_SURFACE) : TPTC_AREA;
    38. 

  38. Function ptc_surface_clip(obj : TPTC_SURFACE) : TPTC_AREA;
    39. 

  39. Function ptc_surface_format(obj : TPTC_SURFACE) : TPTC_FORMAT;
    40. 

  40. 

  41. { surface option string }
    42. 

  42. Function ptc_surface_option(obj : TPTC_SURFACE; _option : String) : Boolean;
    43.