Delphier yang baik, tolong dong gimana cara membuat ZQuery di data module dalam program, aku pake delphi 7 & Zeos, trus gimana ngecheck kalo Zquery itu sudah ada di datamodule? trims ya

maksudnya apa yaa....? coba di teliti dulu deh

maksude gini mas, aku mau create table di mysql lewat program, aku khan pake Zeos, trus koneksinya khan pake Zquery, aku khan haru nempatin Zquery dengana nama misalnya 'data2007' di data module, lha coding-nya bagaimana, tolong ya..

lha... koding utk apanya nih? "meraih? ZQuery dng nama "data2007" di datamodule? kalo iya ya tinggal uses aja unit datamodule-nya...

uses
  ..
  MyDataModule;
procedure TForm1.Button1Click(Sender: TObject);
begin
  MyModule.data2007. ...;
  // MyModule adalah nama dari DataModule
end;

maksudnya gini mas, "data2007" itu memang belum ada di DataModule, aku mau meng-create Zquery itu lewat program, sekaligus membuat table "data2007" di database mysql, lha itu carane gimana? soale dataku sebulan aja ada 20.000 record x 12 bulan x 10 tahun = 2.800.000 record, aku mau pisah pertahun, tapi create table dan zquery nya lewat program, gitu ceritane ... trims lho

lho.. lha tinggal create DDL statement di ZQuery aja... ZQuery.SQL.Text := 'CREATE TABLE ' + NamaTabelNya ' (field1 TipeDatanya, dst);' ; trus jalankan dengan perintah: ZQuery.Execute atau ExecSQL ya, lupa... psst.. tulisan yang di atas itu contoh aja.. silahkan disesuaikan..

silahkan search thread "membuat object pada saat run-time" komposisikan TZQuery yg dibuat secara dinamis (runtime) - dengan DDL table yg hendak dipisah...

maaf mas, Zquery yang tak maksud itu belum dibuat, jadi aku mau "create" Zquery misalnya dengan nama "Zdata2007" di DataModule lewat program, lha itu carane bagaimana atau codingnya gimana? baru nanti aku mau bikin table "data2007" , terus aku sambungkan dengan "Zdata2007", maaf mas kalo muter2

sukses mas, makasih banget aku udah buat dengan runtime, gini nih coding nya : procedure Tfrmupdate.btrefreshClick(Sender: TObject); var Zdata2007: TZQuery; dsdata2007 : TDataSource; begin Zdata2007:=TZQuery.Create(self); dsdata2007:=TDataSource.Create(self); Zdata2007.Connection:=modul.Zserver; dsdata2007.DataSet:=Zdata2007; with Zdata2007 do begin active:=false; SQL.Text:='select * from korektor'; active:=true; refresh; end; dbgrid1.DataSource:=dsdata2007; end; tapi di Uses-nya ditambahi punya Zeos , jadinya seperti ini kira-kira : uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, ExtCtrls, Grids, DBGrids, StdCtrls, Buttons, ZConnection, DB, ZAbstractRODataset, ZAbstractDataset, ZDataset; cuman masih mau nanya lagi, kalo mau nge-check komponen Zquery sudah ada di DataModule apa belum, gimana ya?

coba gunakan method FindComponent atau iterasikan seluruh komponen yang ada, dan bandingkan nama komponen dengan yang diinginkanapakah sesuai atau tidak.