หากคุณต้องการแยกตัวออกจากระดับของผู้ที่ชื่นชอบ ASP คุณควรเรียนรู้การเขียนส่วนประกอบสำหรับ ASP ฉันค้นหาใน Google และพบว่ามีบทความเพียงไม่กี่บทความเกี่ยวกับการเขียนส่วนประกอบ asp ใน Delphi ดังนั้นวันนี้ฉันจึงเขียนบทความพื้นฐานเกี่ยวกับการเขียนส่วนประกอบ asp ใน Delphi ฉันหวังว่ามันจะเป็นประโยชน์สำหรับมือใหม่
ในการเริ่มต้น เรามาเขียนตัวอย่าง "สวัสดีชาวโลก!" ผมใช้ Delphi 7 ที่นี่
1. ไฟล์->ใหม่->อื่นๆ->ActiveX->ActiveX Library จากนั้นบันทึกเป็น showdll.dpr
2. อีกครั้ง ไปที่ File->New->Others->ActiveX->ActiveX Server Object กรอก CoClassName: showhello ปล่อยให้ทุกอย่างไม่เปลี่ยนแปลง แล้วคลิก OK
3. ตอนนี้ให้เริ่มเขียนโปรแกรมและเพิ่มวิธีการก่อน เลือก Ishowhello->คลิกขวา->ใหม่->วิธีการ และกรอกชื่อวิธีการ: sayworld
4. ตอนนี้เริ่มเขียนโปรแกรม บันทึก Unit1 เป็น show.pas แล้วเพิ่มโค้ดของเมธอด sayworld 
รหัสทั้งหมดของ show.pas เป็นดังนี้:
หน่วยแสดง;
{$WARN SYMBOL_PLATFORM ปิด}
อินเตอร์เฟซ
ใช้
ComObj, ActiveX, AspTlb, showdll_TLB, StdVcl;
พิมพ์
Tshowhello = class (TASPObject,Ishowhello
)
ขั้นตอน
การป้องกัน
OnEndPage; safecall
;
การดำเนินการ
ใช้ ComServ;
ขั้นตอน Tshowhello.OnEndPage
เริ่ม
สืบทอด OnEndPage
;
ขั้นตอน Tshowhello.OnStartPage (const AScriptingContext: IUnknown);
start
สืบทอด OnStartPage (AScriptingContext);
end
; // กำหนดวิธีการ sayworld
เริ่ม
การตอบสนอง ('Hello world'); ข้างในก็เขียนไว้เหมือนกันแต่ห่อหุ้มไว้ตรงนี้
จบ;
การเริ่มต้น
TAutoObjectFactory.Create (ComServer, Tshowhello, Class_showhello,
ciMultiInstance
, tmApartment);
สิ้นสุด
คลิก Run เพื่อคอมไพล์เป็น dll และลงทะเบียนโดยอัตโนมัติ ในเวลานี้มันจะแจ้ง:
ให้คุณเรียกใช้บนเว็บเซิร์ฟเวอร์ โอเค ตอนนี้เขียนไฟล์ asp แล้วเรียกมันว่า Delphi ได้สร้างไฟล์ asp แล้ว เราสามารถเปลี่ยนวิธีการเรียกได้
รหัส showhello.asp ที่แก้ไขจะเป็นดังนี้:
<HTML>
<BODY>
<TITLE> การทดสอบ Delphi ASP </TITLE>
<CENTER>
<H3> คุณควรเห็นผลลัพธ์ของวิธี Delphi Active Server ของคุณด้านล่าง </H3>
</ CENTER >
<HR>
<% Set DelphiASPObj = Server.CreateObject("showdll.showhello")
DelphiASPObj.sayworld
%>
<HR>
</BODY>
</HTML>
รันบนไซต์ iis เพื่อดูเอฟเฟกต์: 
5. อื่นๆ:
สำหรับส่วนประกอบที่เขียนด้วย Delphi หลังจากลงทะเบียนกับบริการส่วนประกอบ win2000 คุณสามารถดูวิธีอินเทอร์เฟซของส่วนประกอบได้
6. นอกจากนี้ยังมีพารามิเตอร์ที่ส่งผ่านระหว่างหน้า asp และส่วนประกอบต่างๆ จริงๆ แล้ว พารามิเตอร์จะถูกส่งผ่านไปยังวิธีการที่เรียกว่า (ฟังก์ชัน) โปรดทราบว่าเมื่อกำหนดใน Delphi พารามิเตอร์เหล่านั้นจะต้องสอดคล้องกับประเภทข้อมูลของ vbs เป็นการดีกว่าสำหรับทุกคนที่จะฝึกฝนสิ่งเหล่านี้ให้มากขึ้น จุดประสงค์หลักที่นี่คือเพื่อให้ทุกคนเรียนรู้วิธีสรุปโค้ดหลักของ asp และเพื่อใช้เป็นจุดเริ่มต้น
การเขียนสิ่งเหล่านี้มีไม่มากนัก แต่การจับภาพหน้าจออาจยุ่งยากเล็กน้อย เลเวลของฉันมีจำกัด หากฉันทำผิด โปรดตบเบาๆ! - - -
หนึ่งลมและหนึ่ง
เมฆ2004-10-18