This shows you the differences between two versions of the page.
| Both sides previous revision Previous revision Next revision | Previous revision | ||
|
tutorial:hotkey [2019/01/08 10:36] admin |
tutorial:hotkey [2019/01/28 10:22] (current) admin |
||
|---|---|---|---|
| Line 1: | Line 1: | ||
| ======Useful Hot-Keys====== | ======Useful Hot-Keys====== | ||
| - | Hot-keys ที่สำคัญที่ผมจะแนะนำมีดังนี้ครับ | + | Hot-keys ที่สำคัญที่ผมจะแนะนำมีดังนี้ครับ \\ |
| + | |||
| + | ---- | ||
| =====Ctrl + Shift + C===== | =====Ctrl + Shift + C===== | ||
| Line 6: | Line 8: | ||
| ^ Steps ^ Source Editor ^ | ^ Steps ^ Source Editor ^ | ||
| - | |1. สร้างโค๊ดในส่วนของ Declaration ให้เสร็จ|<sxh delphi;> | + | |1. สร้างโค๊ดในส่วนของ Declaration ให้เสร็จ \\ \\ (ตัวอย่างนี้ จะเป็นการสร้าง class ขึ้นมา โดยมี Method 2 ตัว คือ Procedure DoSomething กับ Function GetSomething) \\ \\ เลื่อน text curser มาไว้ที่ตำแหน่งไหนก็แต่ขอให้อยู่ภายในบรรทัด ของส่วนประกาศของ TMyClass (สามารถวางได้ภายในบรรทัด 3-8 แต่ขอแนะนำให้วางแถวสุดท้าย ในบรรทัดที่ 8 หลัง end;)|<sxh delphi;highlight: [6-7]> |
| PROGRAM Project1; | PROGRAM Project1; | ||
| TYPE | TYPE | ||
| Line 18: | Line 20: | ||
| END. | END. | ||
| </sxh> | | </sxh> | | ||
| - | |2. เลื่อน text curser มาไว้ที่ตำแหน่งไหนก็แต่ขอให้อยู่ภายในบรรทัด ของส่วนประกาศของ TMyClass (แนะนำให้วางแถวสุดท้าย ในบรรทัดที่ 8 หลัง end;)\\ \\ จากนั้นกดปุ่ม Ctrl+Shift+C พร้อมกัน\\ \\โค๊ดในส่วน method implementation ของ TMyclass จะถูกสร้างขึ้นมาทันที|<sxh delphi;> | + | |2. จากนั้นกดปุ่ม Ctrl+Shift+C พร้อมกัน \\ \\ โค๊ดในส่วน method implementation ของ TMyclass จะถูกสร้างขึ้นมาทันที|<sxh delphi;highlight: [15-18,20-23]> |
| PROGRAM Project1; | PROGRAM Project1; | ||
| TYPE | TYPE | ||
| Line 47: | Line 49: | ||
| </sxh> | | </sxh> | | ||
| + | \\ | ||
| + | นอกจากการใช้ Ctrl+SHift+C กับ Class/Object Methods แล้ว ยังสามารถใช้กับ Procedure/Function ทั่วไป ใน Unit ได้เช่นกัน ดังตัวอย่างต่อไปนี้ | ||
| + | |||
| + | <hidden> | ||
| + | ^ Steps ^ Source Editor ^ | ||
| + | |1. สร้างโค๊ดในส่วนของ Declaration ให้เสร็จ|<sxh delphi;highlight: [10-11]> | ||
| + | unit Unit1; | ||
| + | |||
| + | {$mode objfpc}{$H+} | ||
| + | |||
| + | interface | ||
| + | |||
| + | uses | ||
| + | Classes, SysUtils; | ||
| + | |||
| + | procedure DoSomething; | ||
| + | function GetSomething:integer; | ||
| + | |||
| + | implementation | ||
| + | |||
| + | end. | ||
| + | </sxh> | | ||
| + | |2. เลื่อน text curser มาไว้ที่ตำแหน่งไหนก็แต่ขอให้อยู่ภายในบรรทัดที่ Methods เหล่านั้นอยู่ จากนั้นกดปุ่ม Ctrl+Shift+C พร้อมกัน |<sxh delphi;highlight: [15-18,20-23]> | ||
| + | unit Unit1; | ||
| + | |||
| + | {$mode objfpc}{$H+} | ||
| + | |||
| + | interface | ||
| + | |||
| + | uses | ||
| + | Classes, SysUtils; | ||
| + | |||
| + | procedure DoSomething; | ||
| + | function GetSomething:integer; | ||
| + | |||
| + | implementation | ||
| + | |||
| + | procedure DoSomething; | ||
| + | begin | ||
| + | |||
| + | end; | ||
| + | |||
| + | function GetSomething: integer; | ||
| + | begin | ||
| + | |||
| + | end; | ||
| + | |||
| + | end. | ||
| + | </sxh> | | ||
| + | |||
| + | </hidden> | ||
| + | |||
| + | __**หมายเหตุ**__ - สามารถใช้ได้กับ Getter/Setter ของ Property ที่อยู่ในรูปของ Procedure/Function ได้เช่นกัน | ||