Easy to access text file with Delphi (การเข้าถึง text file ด้วยเครื่องมือ Delphi)

การเข้าถึง text file ด้วยเครื่องมือ Delphi
ประเภท
- Comma-separated
- Tab-separated


Text file to Delphi














เนื่องจากมีงานที่ต้องทำการนำเข้าข้อมูลเกี่ยวกับ เรทค่าเงินและอัตราดอกเบี้ย ผมได้มองหา tools หลายตัว
อย่างเช่น Navicat ซึ่งขั้นตอนก็ไม่ยากสามารถนำเข้าไปยังฐานข้อมูลได้ทันที
ทีนี่เกิดคำถามขึ้นในหัว ...
แล้ว แล้ว Delphi พระเอกในใจตลอดกาลของผม สามารถทำได้มั้ย
..ใช่ซิ มันทำได้นั้นแหละ ทำได้มานานแล้ว แต่ว่ามันมีขั้นตอนหรือ code ที่ต้องเขียนหลายบรรทัด นั้นเอง
แล้วไอ้แบบที่ง่าย ๆ แบบไม่ต้องเขียนชุดคำสั่ง (zero code) Delphi ทำได้หรือเปล่า
คำตอบคือทำได้ซิ
ใช้เวลาไม่นานด้วย เรียกกันว่าเขียนไม่เกิน 5 นาทีก็สามารถอ่านข้อมูลใน text file ที่ต้องการได้แล้ว
ลองมาดูขั้นตอนกันครับ
Component หลัก ๆ มีดังนี้
- TFDBatchMoveTextReader ตัวนี้เอาไว้อ่าน Text
- TFDBatchMoveDataSetWriter ตัวนี้เอาไว้เขียน ข้อมูลที่ได้จากการอ่าน
- TFDBatchMove ตัวเชื่อมกลางวระหว่าง Reader  Write
- FDMemtable1: TFDMemTable;  memory dataset
- DBGrid1: TDBGrid;  for display
- DataSource1: TDataSource;  Link to dataset FDMemtable1
- FDGUIxWaitCursor1: TFDGUIxWaitCursor;  FireDAC Need
Reader: TFDBatchMoveTextReader
Properties

TFDBatchMoveTextReader

Writer: TFDBatchMoveDataSetWriter
Properties

TFDBatchMoveDataSetWriter



















Batch: TFDBatchMove
Properties

TFDBatchMove

FDMemTable1: TFDMemTable (Field)










Datasour1: TDatasource

Properties



















DBGrid1
Properties



















ขั้นตอนสุดท้าย
สั่งให้ FDMemTable1 Active
จากนั้น คลิกขวาที่ Batch: TFDBatchMove และเลือก Execute ดังภาพ
เพียงเท่า Delphi ก็สามารถนำข้อมูลจาก Text file เอามาอยู่ใน DBGrid ได้ แบบที่เรียกได้ว่า zero code คือไม่ต้องเขียน code กันเลย

หากต้องการเชื่อมกับ ฐานข้อมูล ให้ทำการเปลี่ยน FDMemtable1 ไปเป็น Component ที่สามารถเชื่อมต่อและอ่านเขียนข้อมูลลงฐานข้อมูลได้แทน เช่น TFDTable เป็นต้น




























สุดท้าย
อยากบอกว่ามันน่าทึ่งมาก เพราะมันสามารถนำเข้าวันที่ในรูปแบบภาษาไทยได้ด้วยไม่มีที่ผิดเลย
ปล. นำเข้าแล้วแปลงไปเป็นรูปแบบวันที่แบบ คศ


พบกับ การนำความรู้จากเรื่องการ import text เขียน freeware Application  ใน blog ถัดไป

Comments