Rabu, 03 Juni 2020

Koneksi ke MySQLxx

1.Ambil komponen TSQLTransaction , dan set sbb:

  • Name =  tran
  • Action = caCommitRetaining


2.Ambil komponen TMySQL50Connection, dan set sbb:
  • Name = con
  • Transaction = tran (arahkan ke komponen yg sudah diambil sebelumnya)
  • DatabaseName = tester //sesuaikan nama database yang sudah dibuat dalam mysql
  • KeepConnection = TruePassword = 12345678 //sesuaikan dengan password mysql
  • Port = 3306 //sesuaikan dengan port yang digunakan mysql default 3306
  • UserName = root //sesuaikan user name yang digunakan pada mysql
  • Connected = True (Jika error akan muncul pesan sebaliknya jika berhasil tidak muncul apa apa)

3.Ambil komponen TSQLQuery, dan set sbb:
  • Name = sq
  • Database = con
  • Transaction = tran
  • UsePrimaryKeyAsKey =True
  • UpdateMode = UpWhereKeyOnly
  • ParseSQL =True
  • SQL = SELECT * FROM Kontak  //Kontak adalah nama table dalam mysql
  • DataSource = ds

4.Ambil komponen TDataSource, dan set sbb :
  • Name = ds
  • DataSet = sq

5.Ambil komponen TDBGrid, dan  set sbb:
  • Name = dbg
  • DataSource = ds

6.Set sq.Active= True//(Jika berhasil table akan muncul pada form