Delphi กับวิธีการใช้ ZeosLib ในการ Connect MySQL

     การใช้งาน ZeosLib หลังจากที่คุณติดตั้ง Component ZeosLib เสร็จแล้ว ให้คุณทำการ uses เพิ่มตามนี้นี้ครับ ZAbstractRODataset, ZAbstractDataset, ZDataset, ZAbstractConnection, ZConnection, Vcl.StdCtrls;

     ผมจะเอา 2 วิธีของการใช้งานมาแบ่งปันละกันครับ คือ 

1. แบบที่เราหยิบ Zconnection และ Zquery จาก Tool Palette มาวางใช้และไปกำหนด Properties ใช้งานได้เลยแบบภาพด้านล่างนี้ครับ
   
   
   
2. แบบที่เราสืบทอด Class และทำการ Create ขึ้นมาใช้งานเองครับ ซึ่งเราสามารถทำได้ด้วยการ ประกาศตัวแปลที่จะนำมาสิบทอดใช้ Zconnection และ Zquery ดังขั้นตอนต่อไปนี้
   
   1) ประกาศตัวแปลดังนี้ var zconn :  TZConnection; และ var zqry : TZquery;
   
   2) ทำการ Create Conncetion และกำหนดค่า Properties  ด้วยวิธีนี้
         zconn := TZConnection.Create(nil);
         zconn.HostName := '192.168.10.1';
         zconn.Database := 'hos';
         zconn.User := 'sa';
         zconn.Password := 'watb2000';
         zconn.Protocol := 'mysql-5';
         zconn.ClientCodepage := 'utf8';
   
   3) ทำการ Create query เพื่อใช้งานดังนี้
        zqry := TZQuery.Create(nil);
        zqry.Connection := zconn;
   
        zqry.Close;
        zqry.SQL.Text := ' *SQL คำสั่ง* ';
        zqry.Open; // ตรงนี้หากเป็นคำสั่ง Update หรือ Inset เราก็ใช้เป็น zqry.ExecSQL;

     ก็จะมีประมาณนี้นะครับลองทำกันดูนะครับ