ระบบ SYS_ER_FORM ใช้ Enter ไม่ได้

[armds]

ผมทำ  SYS_ER_FORM   ใน  Custom form  ไว้ครับ 
ส่งสัยว่าทำไมใช้  ฟังก์ชัน  นี้ไม่ได้  คือ ผมอยากให้ใช้  enter  ไปคีย์ทีละช่องได้เลย อะครับ 

if Key = #13 then begin
    SelectNext(Sender as tWinControl, True, True );
    if Sender = Edit10 then
      Button1.Click;
    Key := #0;
  end;

รบกวน  อ.mn  แนะนำด้วยครับ 

[doramon]

เป็น key   tab แทนดูครับ

[armds]

เป็น key   tab แทนดูครับ

ขอบคุณครับ  นึกว่ามี  ฟังก์ชัน  อื่น ได้อีก   (เพราะถ้าไปใช้  delphi  เขียน ก็ run  ได้ปกติ)

[armds]

ฝากให้  อ.อ๊อด  และท่านอื่นๆ  ที่ต้องการนำไปใช้ครับ
เป็นการลงข้อมูลเฉพาะที่  ทาง พยาบาล ER  ต้องการจะลงแบบง่าย ๆ ครับ  ไม่ต้องไปคีย์ในหน้าจอ คัดกรองของ OPD  ครับ