nc paslib

NC-PASLIB

Perpustakaan utilitas dasar (non-GUI) untuk Pascal (Delphi/Pascal Free/Lazarus).

Tncthread - kelas utilitas untuk threading

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

Mengirimkan eksekusi metode atau panggilan prosedur ke antrian utas utama.

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

Memastikan pelaksanaan metode atau panggilan prosedur di dalam utas utama. Jika utas saat ini adalah utas utama, metode atau prosedur akan dieksekusi secara langsung tanpa mengantri.

Tncdelay - kelas utilitas untuk penundaan berjalan

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

Menjalankan metode atau prosedur di utas utama setelah penundaan (milidetik).

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

Membatalkan pelaksanaan metode/prosedur yang ditentukan atau semua metode/prosedur dalam antrian tunda.

 procedure begin_disable();
procedure end_disable();

Sementara tidak menerima permintaan lari keterlambatan antara begin_disable() dan end_disable() .

TnCanIateGroup - Jalankan animasi secara berurutan untuk satu kontrol

 constructor Create(const control : TControl); reintroduce;

Parameter konstruktor menentukan kontrol untuk melakukan animasi.

 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);

Tambahkan efek animasi untuk setiap langkah, mendukung perubahan ukuran, ekspansi ke kiri, gerakan, dan perubahan (dalam ukuran dan posisi).

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

Mulailah mengeksekusi animasi.

Tncanimateasyncgroup - run animations secara asinkron (secara bersamaan) untuk beberapa kontrol

 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);

Tambahkan efek animasi, mendukung perubahan ukuran, ekspansi ke kiri, gerakan, dan perubahan (dalam ukuran dan posisi).

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

Tambahkan efek animasi untuk mengubah nilai alfa formulir.

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

Mulailah mengeksekusi animasi.