Ceriwis  

Go Back   Ceriwis > HOBI > Komputer & Teknologi > Programming

Programming Share, tanya jawab, saling bantu antar programmer dengan berbagai macam bahasa pemrograman.

Reply
 
Thread Tools
  #1  
Old 20th November 2011
Guesuper Guesuper is offline
Ceriwiser
 
Join Date: Nov 2011
Posts: 408
Rep Power: 14
Guesuper mempunyai hidup yang Normal
Default [ask]penampilan data kok gak bisa ya (delphi)

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..



Reply With Quote
Reply


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off


 


All times are GMT +7. The time now is 02:26 PM.


no new posts