nc paslib

NC-Paslib

Una biblioteca de utilidades base (no GUI) para Pascal (Delphi/Free Pascal/Lazarus).

Tncthread: una clase de utilidad para enhebrar

 class procedure dispatch_to_main_thread(const proc : TProcedure); overload;
class procedure dispatch_to_main_thread(const proc_method : TThreadMethod); overload;

Envía la ejecución de un método o una llamada de procedimiento a la cola de subproceso principal.

 class procedure ensure_in_main_thread(const proc : TProcedure); overload;
class procedure ensure_in_main_thread(const proc_method : TThreadMethod); overload;

Asegura la ejecución de un método o una llamada de procedimiento dentro del hilo principal. Si el hilo actual es el hilo principal, el método o el procedimiento se ejecutarán directamente sin hacer cola.

Tncdelay: una clase de utilidad para la ejecución del retraso

 procedure run(const proc : TProcedure; const after_ms : UInt64); overload;
procedure run(const proc_method : TThreadMethod; const after_ms : UInt64); overload;

Ejecuta un método o un procedimiento en el hilo principal después de un retraso (milisegundos).

 procedure cancel(); overload;
procedure cancel(const proc : TProcedure); overload;
procedure cancel(const proc_method : TThreadMethod); overload;

Cancela la ejecución de un método/procedimiento especificado o todos los métodos/procedimientos en la cola de retraso.

 procedure begin_disable();
procedure end_disable();

Temporalmente no acepta ninguna solicitud de ejecución de retraso entre begin_disable() y end_disable() .

TNCanimateGroup - Ejecutar animaciones en secuencia para un solo control

 constructor Create(const control : TControl); reintroduce;

El parámetro del constructor especifica el control para realizar la animación.

 procedure add_size_animate(const w, h : Integer; const keep_center : Boolean; const duration : Cardinal);
procedure add_expand_to_left_animate(const w : Integer; const duration : Cardinal);
procedure add_move_animate(const x, y : Integer; const duration : Cardinal);
procedure add_change_animate(const x, y, w, h : Integer; const duration : Cardinal);

Agregue los efectos de animación para cada paso, admitiendo cambios de tamaño, expansión a la izquierda, movimiento y cambios (en tamaño y posición).

 procedure run(); overload;
procedure run(const progress_callback : TncAnimateProgressEvent); overload;

Comience a ejecutar las animaciones.

TncanimateAsyncGroup - Ejecute animaciones asíncronamente (simultáneamente) para múltiples controles

 procedure add_size_animate(const control : TControl; const w, h : Integer; const keep_center : Boolean; const duration : Cardinal);
procedure add_expand_to_left_animate(const control : TControl; const w : Integer; const duration : Cardinal);
procedure add_move_animate(const control : TControl; const x, y : Integer; const duration : Cardinal);
procedure add_change_animate(const control : TControl; const x, y, w, h : Integer; const duration : Cardinal);

Agregue los efectos de animación, que respalde cambios en el tamaño, expansión a la izquierda, movimiento y cambios (en tamaño y posición).

 procedure add_alpha_animate(const form : TForm; const a : Integer; const duration : Cardinal);

Agregue el efecto de animación para cambiar el valor alfa de la formación.

 procedure run(); overload;
procedure run(const progress_callback : TncAnimateProgressEvent); overload;

Comience a ejecutar las animaciones.