FAQ |
Calendar |
![]() |
|
Programming Share, tanya jawab, saling bantu antar programmer dengan berbagai macam bahasa pemrograman. |
![]() |
|
Thread Tools |
#1
|
|||
|
|||
![]()
temen-temen saya lagi belajar delphi ne..mohon pertolongan procedure TFpotongan.EnipChange(Sender: TObject); var query: string; begin with dm.querypegawai do with dm.queryjabatan do begin close; sql.Clear; sql.Add('select * from pegawai,jabatan where pegawai.nip=jabatan.nip=:kd '); parameters.ParamByName('kd').Value:=(enip.Text); dm.querypegawai.Open; if not eof then enama.Text:=fieldbyname('nama_pegawai').AsString; ekantor.Text:=fieldbyname('kantor').AsString; ejabatan.Text:=fieldbyname('jabatan').AsString; dengan code diatas ane mau nampilin data daritable pegawai dan jabatan dengan memasukan NIP pegawai di Tedit...gak ada errornya tapi kok datanya gak mau muncul ya....semoga ada yang bisa bantu saya..amien.. Terkait:
|
![]() |
|
|