การใช้ Macros Delphi สามารถทำงานได้ง่ายมาก
แมโครเริ่มต้นด้วย ctrl + shift + r จบลงด้วย ctrl + shift + r และเล่นกับ ctrl + shift + p.
หลังจากที่คุณเริ่มบันทึกมาโครคุณสามารถเห็นคำว่า 'การบันทึก' ในแถบสถานะ
ต่อไปนี้เป็นตัวอย่างของการกำหนด
ดังนี้มีตัวแปรมากมายในชั้นเรียนของเรา
DNO: String [20];
dworker: สตริง [4];
ddate: tdatetime;
DTRADE_S: สตริง [10];
dtrade_e: สตริง [10];
dmoney_sale: จริง;
dmoney_last: จริง;
dmoney_ss: จริง;
DMAN: String [2];
dmoney_sk: จริง;
dmoney_zl: จริง;
money_mode: จริง;
Ticket_mode: จริง;
CZK_MODE: จริง;
MZK_MODE: จริง;
Bank_mode: จริง;
DCARD_ZK: String [20];
dcard_hl: สตริง [20];
dsubshop: สตริง [4];
Dsalesman: String [4];
เราต้องการกำหนดค่าให้กับค่าที่สอดคล้องกันของวัตถุ asource ในการกำหนดดังนี้
ตัวอย่างเช่น:
ขั้นตอน tmasterdata.assignvalue (asource: tmasterdata);
เริ่ม
// ฉันต้องการรับผลลัพธ์ต่อไปนี้
dno: = asource.dno;
dworker: = asource.dworker;
ddate: = asource.ddate;
dtrade_s: = asource.dtrade_s;
dtrade_e: = asource.dtrade_e;
dmoney_sale: = asource.dmoney_sale;
dmoney_last: = asource.dmoney_last;
เราควรทำอย่างไร?
ขั้นตอน tmasterdata.assignvalue (asource: tmasterdata);
เริ่ม
DNO: String [20];
dworker: สตริง [4];
ddate: tdatetime;
DTRADE_S: สตริง [10];
dtrade_e: สตริง [10];
dmoney_sale: จริง;
dmoney_last: จริง;
-
ในเวลานี้เรามุ่งเน้นไปที่จุดเริ่มต้นของสาย DNO กด Ctrl + Shift + R เพื่อเริ่มการบันทึกจากนั้นกด Ctrl + -> Arrow เคอร์เซอร์จะย้ายไปที่แผนกต้อนรับของคำ DNO จากนั้นกด Ctrl + Shift + ->, DNO จะถูกเลือก: ในส่วนนี้ฉันควรทำอย่างไรถ้ามีอักขระพิเศษสองตัว? -> ลูกศรแล้วกด <-arrow กลับไปที่: ก่อนแล้วป้อน: = asource ที่สอง: ก่อนหน้านี้เราล้างอักขระต่อไปนี้กด Shift + End จากนั้นกดปุ่ม DELETE เพื่อให้คอลัมน์แรกเสร็จสมบูรณ์ จากนั้นกดปุ่มโฮม
นี่คือกุญแจทั้งหมดของเรา
หากเราคุ้นเคยกับมาโครของ Delphi มากเราก็สามารถทำสิ่งมหัศจรรย์มากมายเช่นที่เรามีใน MSSQL
อัปเดตชุด dnum = b.dnum สามารถทำได้อย่างสมบูรณ์โดยใช้ macros delphi
จุดสำคัญของการบันทึกมาโคร
1 ให้แน่ใจว่าได้ให้ความสนใจกับกฎการเขียนที่เรียบร้อย
2 ใช้ ctrl + shift + -> ลูกศรเพื่อเลือกคำ
3 การดำเนินการทั้งหมดจะต้องเสร็จสิ้นโดยใช้แป้นพิมพ์
dno: = asource.dno