หน้าแรก>การเขียนโปรแกรมที่เกี่ยวข้อง>ซอร์สโค้ดเดลฟี
ดาวน์โหลด

NC-Paslib

ห้องสมุดยูทิลิตี้พื้นฐาน (ไม่ใช่ GUI) สำหรับ Pascal (Delphi/Pascal/Lazarus ฟรี)

tncthread - คลาสยูทิลิตี้สำหรับเธรด 

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

ส่งการดำเนินการของวิธีการหรือการเรียกขั้นตอนไปยังคิวเธรดหลัก 

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

รับรองการดำเนินการของวิธีการหรือการโทรขั้นตอนภายในเธรดหลัก หากเธรดปัจจุบันเป็นเธรดหลักวิธีการหรือขั้นตอนจะถูกดำเนินการโดยตรงโดยไม่ต้องเข้าคิว

TNCDELAY - คลาสยูทิลิตี้สำหรับการทำงานล่าช้า 

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

ดำเนินการวิธีการหรือขั้นตอน ในเธรดหลัก หลังจากการหน่วงเวลา (มิลลิวินาที) 

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

ยกเลิกการดำเนินการของวิธี/ขั้นตอนที่ระบุหรือวิธีการ/ขั้นตอนทั้งหมดในคิวการหน่วงเวลา 

 procedure begin_disable();
procedure end_disable();

ไม่ยอมรับการร้องขอความล่าช้าใด ๆ ระหว่าง begin_disable() และ end_disable()

TNCanimateGroup - รันแอนิเมชั่นตามลำดับสำหรับการควบคุมเดียว 

 constructor Create(const control : TControl); reintroduce;

พารามิเตอร์ของคอนสตรัคเตอร์ระบุการควบคุมเพื่อดำเนินการแอนิเมชั่น 

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

เพิ่มเอฟเฟกต์ภาพเคลื่อนไหวสำหรับแต่ละขั้นตอนสนับสนุนการเปลี่ยนแปลงขนาดการขยายไปทางซ้ายการเคลื่อนไหวและการเปลี่ยนแปลง (ในขนาดและตำแหน่ง) 

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

เริ่มดำเนินการเคลื่อนไหว

tncanimateasyncGroup - เรียกใช้แอนิเมชั่นแบบอะซิงโครนัส (พร้อมกัน) สำหรับการควบคุมหลายตัว 

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

เพิ่มเอฟเฟกต์ภาพเคลื่อนไหวรองรับการเปลี่ยนแปลงขนาดการขยายไปทางซ้ายการเคลื่อนไหวและการเปลี่ยนแปลง (ในขนาดและตำแหน่ง) 

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

เพิ่มเอฟเฟกต์ภาพเคลื่อนไหวสำหรับการเปลี่ยนค่าอัลฟ่าของฟอร์ม 

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

เริ่มดำเนินการเคลื่อนไหว

ขยาย
ข้อมูลเพิ่มเติม
แอปที่เกี่ยวข้อง
แนะนำสำหรับคุณ
ข้อมูลที่เกี่ยวข้อง ทั้งหมด