ฉันกำลังส่งวัตถุที่สร้างขึ้นไปยังตัวสร้างของวัตถุอื่นซึ่งต้องการอินเทอร์เฟซที่วัตถุนั้นนำไปใช้ ISomeInterface = interface ['{840D46BA-B9FB-4273-BF56-AD0BE40AA3F9}'] end; TSomeObject = class(TInterfacedObject, ISomeinterface) end;...

ใครสามารถช่วยได้บ้าง? ฉันกำลังเก็บโปรเจ็กต์ Delphi7 เก่าไว้และมีปัญหาครั้งต่อไป ฉันจะเก็บค่าฟิลด์ BLOB ได้อย่างไรหากมีสตริง Unicode ฉันเหนื่อย: var str: WideString; begin ... str := WideString(Fields[1].AsString); - but I get empty...

ฉันมีแบบฟอร์มรองที่แสดงขึ้นในขณะที่กำลังประมวลผลอย่างหนักในฟอร์มหลัก ฉันส่งข้อความไปยังฟอร์มรอง (form2) เกี่ยวกับความคืบหน้าของการประมวลผล - ซึ่งทำงานได้ดี ฉันต้องการปุ่มบน form2 เพื่อ ยกเลิกการประมวลผลโดยการปิด form2...

ฉันจะวางไฟล์จากโฟลเดอร์และโฟลเดอร์ย่อยเฉพาะให้อ่านเฉพาะใน delphi ได้อย่างไร ฉันรู้ว่าฉันสามารถใส่โฟลเดอร์ที่มี FileSetAttr ให้อ่านอย่างเดียวได้ แต่มีวิธีใส่ไฟล์จากโฟลเดอร์และโฟลเดอร์ย่อยหรือไม่ ขอบคุณ