วันศุกร์ที่ 7 ตุลาคม พ.ศ. 2559

เริ่มการเขียนโปรแกรมกับ Delphi

สวัสดีครับ วันนี้เราจะมาเรียนรู้วิธีการโปรแกรมกันเล็กน้อยกับ Tools เครื่องมือในการพัฒนาโปรแกรม

วันนี้เราเลือกใช้ทั้งหมด 3 ตัวด้วยกัน คือ Label, Edit, Button

ผมขออนุญาติใช้  RAD Studio Seattle XE10 ในการเขียนโปรแกรมครั้งนี้นะครับพอดีเปลี่ยนเครื่องก็เลย

ลองโปรแกรมเวอร์ชั่นใหม่ซะเลย



หน้าตาของโปรแกรม RAD STUDIO 10 Seattle เป็นแบบนี้นะครับ คร่าวๆคล้ายๆกับ Delphi 2007

หน้าตา ต่างกันนิดหน่อย และ Tools เครื่องมือต่างๆยังอยู่ที่เดิมนะครับ



เริ่มเลยเนอะ ขั้นแรกไปที่ File >>> New >>> VCL Forms Application - Delphi

เพื่อสร้างฟอร์มและโปรเจค



ต่อมาคือเราต้องเลือกเครื่องมือที่เราจะใช้ นั้นก็คือ Label, Edit, Button

เราจะเอามันออกมาจาก แทบรวมเครื่องมือ ล่างขวานะครับ เพียงหาชื่อหาตัวที่ต้องการ คลิกเลย

หรือเราจะพิมพ์หาชื่อตัวที่เราต้องการก็ได้นะครับ แล้วทำการไปคลิกที่ฟอร์ม หรือ ดับเบิลคลิกที่ตัว

อุปกรณ์ที่เราต้องการเลยก็ได้มันจะออโต้ให้เราโดนการไปปรากฎในหน้าฟอร์มของเราแบบอัตโนมัติ



ขั้นตอนออกแบบให้เราออกแบบ แบบง่ายๆไปก่อนนั้นก็คือแบบนี้ นะครับ 

หรือใครมีไอเดียอยากออกแบบๆไหนก็ตามสะดวกเลยนะครับ ต่อมาคือเราอยากให้ปุ่มของเราสามารถ

ทำงานได้ เราจะต้องเขียนโปรแกรมให้มัน อยากที่ผมบอกไปแล้ว  เราจะเขียนโปแกรมตาม Event 

ที่เกิดขึ้น เช่นการคลิกเมาส์ หรือการลากเมาส์ไปวางไว้บนปุ่ม 

ในที่นี้เราต้องการให้ปุ่มทำงานแบบกด ก็คือ Event OnClick โดยเริ่มจากการ ดับเบิลคลิกที่ปุ่ม 




เราสังเกตุได้จาก Event ที่เกิดขึ้นในรูปข้างล่างนี้ เราสามารถเปลี่ยน Event ได้ตามแทบข้างซ้ายนะครับ

เมื่อเราดับเบิลคลิกปุ่มแล้วจะมีหน้าต่างดำๆแปลกขึ้นมา นั้นคือหน้าต่าง Code นะครับ เราสามารถ

โปรแกรมอะไรก็ได้ให้มันทำอะไรก็ได้จากหน้าต่างนี้ 






 พิมพ์โค้ดใน Event ButtonClick

begin
     Edit1.Text := ' Hello World ' ;
     Label1.Caption := ' Hello Delphi ' ;
end;



 เมื่อเราพิมพ์โค้ดเสร็จแล้ว เราจะต้องกดรันเพื่อให้โปรแกรม Run ให้เรียบร้อย หรือ กด F9 ก็ได้



 เมื่อโปรแกรมรัน เสร็จจะมีหน้าตาโปรแกรมที่เราออกแบบไว้ประมาณนี้



 แต่เรากำหนดเงื่อนไข Event ว่า EventOnClick ที่ Button1 ที่เราดับเบิลคลิกไว้ตอนแรก

ความหมายก็คือ เมื่อเรากดปุ่มโปรแกรมจะทำงานนั้นเอง

โปรแกรมนึงสามารถสร้าง Event ได้หลาย Event นะครับ แล้วใน แต่ละ Event ก็จะเรียก Event อื่นๆได้อีก

เช่นกัน และเมื่อเรากดปุ่มปุ้บ การทำงานก็จะเริ่มปั๊บ โดยการเปลี่ยนแปลงข้อความที่

Label จากเดิม Label1 >>> Hello Delphi
Edit จากเดิม Edit1 >>> Hello World...

เห็นไหมครับไม่ยากเลยเนอะ



งั้นผมขอจบไว้เท่านี้ก่อนแล้ววันหลังจากมาต่อนะครับ




ไม่มีความคิดเห็น:

แสดงความคิดเห็น