เรียนชุมชน Delphi
เราอยู่ในภารกิจเพื่อปรับปรุงส่วนประกอบ X4Delphi โอเพนซอร์สของเราและต้องการความช่วยเหลือจากคุณ! เพื่อนำองค์ประกอบของเราไปสู่ระดับต่อไปเราจำเป็นต้อง มีการเข้าถึงขั้นพื้นฐาน ไปยัง Twitter API เพื่อวัตถุประสงค์ในการพัฒนา
การสนับสนุนของคุณเป็นสิ่งจำเป็นสำหรับเรา!
คุณจะช่วยได้อย่างไร:
ขอบคุณที่สนับสนุนการเติบโตและการปรับปรุง X4Delphi!
| ผู้สนับสนุน |
|---|
| จอแสดงผลสภาพอากาศ |
Telegram Group: https://t.me/x4delphi

นี่คือองค์ประกอบ Delphi สำหรับการโต้ตอบกับ X (Twitter) API มันมีชุดของฟังก์ชั่นเพื่อดำเนินการต่าง ๆ
หากต้องการใช้ส่วนประกอบนี้ในโครงการ Delphi ของคุณทำตามขั้นตอนเหล่านี้:
Twitter.dproj ที่อยู่ในโฟลเดอร์ "แพ็คเกจ" ของซอร์สโค้ดส่วนประกอบTwitter.bpl ขั้นตอนนี้อาจเกี่ยวข้องกับการคลิกขวาในไฟล์โครงการและเลือก "คอมไพล์" จากนั้น "ติดตั้ง" | ขั้นตอน / ฟังก์ชัน | คำอธิบาย | ตัวอย่างการใช้งาน |
|---|---|---|
| createTweet | ขั้นตอนนี้ช่วยให้คุณสร้างทวีตบน Twitter เพียงแค่ให้ข้อความที่คุณต้องการทวีตและจะส่งคืนการตอบกลับผ่านเหตุการณ์ onauthenticated ที่มีข้อมูลที่เกี่ยวข้องเกี่ยวกับทวีต | Twitter1.CreateTweet('Hello, Twitter!'); |
| deletetWeet | ด้วยฟังก์ชั่นนี้คุณสามารถลบทวีตออกจาก Twitter ได้โดยให้ ID (AID) มันส่งคืนบูลีนเป็นการตอบสนองต่อการระบุความสำเร็จหรือความล้มเหลวของการดำเนินการลบ | Resp := Twitter1.DeleteTweet(TweetId); |
| createTweetWithContent | ขั้นตอนนี้ช่วยให้คุณสร้างทวีตที่มีเนื้อหาข้อความและสื่อ (เช่นรูปภาพหรือวิดีโอ) | Twitter1.CreateTweetWithContent('AText','Images_videos_path'); |
| ลงชื่อเข้าใช้ | ขั้นตอนนี้ช่วยให้คุณสามารถใช้การเข้าสู่ระบบด้วย Twitter ตาม OAuth | Twitter1.SignIn; |
http: // localhost: 3000/auth/twitter/callback
คุณต้องสร้างบัญชีนักพัฒนา:
ขั้นตอนนี้ช่วยให้คุณสร้างทวีตบน Twitter
Twitter1.CreateTweet( ' Hello, Twitter! ' );เหตุการณ์: ontweetsent
procedure TForm1.Twitter1TweetSent (ATweetId, ATweet: string);
begin
// Write your code here.....
end ;ด้วยฟังก์ชั่นนี้คุณสามารถลบทวีตออกจาก Twitter ได้โดยให้ ID (AID)
var Resp := Twitter1.DeleteTweet(ATweetId);ขั้นตอนนี้ช่วยให้คุณสร้างทวีตที่มีเนื้อหาข้อความและสื่อ (เช่นรูปภาพหรือวิดีโอ)
Twitter1.CreateTweetWithContent( ' AText ' , ' Images_videos_path ' );เหตุการณ์: ontweetsentwithcontent
procedure TForm1.Twitter1TweetSentWithContent (ATweetMediaId: string);
begin
// Write your code here.....
end ;เข้าสู่ระบบด้วย Twitter
Twitter1.SignIn;เหตุการณ์: onauthenticated
procedure TForm1.Twitter1Authenticated (AIsAuth: Boolean);
begin
// Write your code here.....
end ;ห้องสมุดนี้เปิดตัวภายใต้ใบอนุญาต MIT
อย่าลังเลที่จะมีส่วนร่วมเปิดปัญหาหรือให้ข้อเสนอแนะ!