### All About Borland Delphi (Coding) ###

Baznas & KASKUS kembali hadir untuk memudahkan Agan dalam berkurban

Seberapa sering Agan menggunakan laptop dan biasanya digunain buat apa sih?

Main Content

Post Reply

0 stars - based on 1 vote 5 stars 0 stars

hlstech

Newbie

–

Join: 04-10-2013, Post: 61

03-02-2014 01:54

### All About Borland Delphi (Coding) ###

Agan-agan... ane sudah bergelut dibidang IT khususnya programmer Delphi sejak tahun 1999, sapa tau ada yang mau nanya, share, ato ngobrol2an positif seputar Borland Delphi... boleh ditumpahkan disini...

KASKUS Ads - Create Your Ads / Buat Iklan

farizseptianand

Kaskuser

–

Join: 20-08-2013, Post: 245

03-02-2014 03:13

gan, mumpung masih anget hhe, ane ada masalah ni gan
ane kan punya contoh query dengan parameter gini

SELECT * FROM DataBarang WHERE :Field = :Pencarian

nah pas ane masukin dengan
Close;
ParamByName('Field').Value := 'Barcode';
ParamByName('Pencarian').value :='1211102';
Open;

kok kenapa parameter 'field' susah dijaddin fieldname jadi diatas hasilnya kaya gini ilustrasinya

SELECT * FROM DataBarang WHERE "Barcode" = "1211102"

ada pencerahan kah?

hlstech

Newbie

–

Join: 04-10-2013, Post: 61

03-02-2014 03:26

Quote:Original Posted By farizseptianand ►
gan, mumpung masih anget hhe, ane ada masalah ni gan
ane kan punya contoh query dengan parameter gini

SELECT * FROM DataBarang WHERE :Field = :Pencarian

nah pas ane masukin dengan
Close;
ParamByName('Field').Value := 'Barcode';
ParamByName('Pencarian').value :='1211102';
Open;

kok kenapa parameter 'field' susah dijaddin fieldname jadi diatas hasilnya kaya gini ilustrasinya

SELECT * FROM DataBarang WHERE "Barcode" = "1211102"

ada pencerahan kah?

parameter 'field' susah dijadiin fieldname? maksudnya gimana nih gn? ane kurang nyambung nih..

johnpaulringhar

Kaskuser

–

Join: 11-10-2012, Post: 269

03-02-2014 10:45

Trit Delphi udah ada gan http://www.kaskus.co.id/thread/00000...phi-and-pascal emoticon-Malu (S)

kalau mau diskusi mending disitu emoticon-Malu (S)

hesitateone

Newbie

–

Join: 24-02-2011, Post: 35

03-02-2014 10:50

Tanya ADOQuery

Gan ane pake delphi 7, ane buat laporan pake ADOconection & ADOQuery ini sourcenya gan:

Code:



      ADOConnection1.Connected := True;

      ADOQuery1.DataSource:=DataSource1;

      ADOQuery1.Connection := ADOConnection1;

      with ADOQuery1 do begin

        close;

        sql.clear;

        sql.Add('select * from penjualanglobal');

        Open;

      end;

      LaporanPenjualanForm.FrxReport1.LoadFromFile(ExtractFilePath(Application.ExeName)+'Laporan/LapPenjualan.Fr3');

      LaporanPenjualanForm.Frxreport1.ShowReport();

Cuma kadang2 jalan normal , kadang field not found, kenapa tuh gan ?
Ini pake Fast Report, ane pernah pake Quick report juga sama, kadang2 normal.
Kenapa ya gan ?

peyotpetot

Kaskus Geek

–

Join: 29-11-2011, Post: 20,807

03-02-2014 15:07

Quote:Original Posted By farizseptianand ►
gan, mumpung masih anget hhe, ane ada masalah ni gan
ane kan punya contoh query dengan parameter gini

SELECT * FROM DataBarang WHERE :Field = :Pencarian

nah pas ane masukin dengan
Close;
ParamByName('Field').Value := 'Barcode';
ParamByName('Pencarian').value :='1211102';
Open;

kok kenapa parameter 'field' susah dijaddin fieldname jadi diatas hasilnya kaya gini ilustrasinya

SELECT * FROM DataBarang WHERE "Barcode" = "1211102"

ada pencerahan kah?

Yaaaah ... nanyanya kok sukar banget ... emoticon-Mewek

:

Btw, udah ada tritnya tuh ... emoticon-Big Grin

farizseptianand

Kaskuser

–

Join: 20-08-2013, Post: 245

03-02-2014 17:01

Quote:Original Posted By hlstech ►

parameter 'field' susah dijadiin fieldname? maksudnya gimana nih gn? ane kurang nyambung nih..

pas di ilustrasi nya jadi "Barcode" seharusnya tanpa quote jadi Barcode aja, berhubung parameter otomatis berbentuk stirng maka langsung di quote
sedangkan bila "Barcode"="1211102" berarti itu menyamakan antara "Barcode" dan "1211102" jelas false kan

farizseptianand

Kaskuser

–

Join: 20-08-2013, Post: 245

03-02-2014 17:03

Quote:Original Posted By hesitateone ►
Gan ane pake delphi 7, ane buat laporan pake ADOconection & ADOQuery ini sourcenya gan:

Code:



      ADOConnection1.Connected := True;

      ADOQuery1.DataSource:=DataSource1;

      ADOQuery1.Connection := ADOConnection1;

      with ADOQuery1 do begin

        close;

        sql.clear;

        sql.Add('select * from penjualanglobal');

        Open;

      end;

      LaporanPenjualanForm.FrxReport1.LoadFromFile(ExtractFilePath(Application.ExeName)+'Laporan/LapPenjualan.Fr3');

      LaporanPenjualanForm.Frxreport1.ShowReport();

Cuma kadang2 jalan normal , kadang field not found, kenapa tuh gan ?
Ini pake Fast Report, ane pernah pake Quick report juga sama, kadang2 normal.
Kenapa ya gan ?

seharusnya normal pake fast report, apa ada data yg kosong atau null? kadang berpengaruh

hlstech

Newbie

–

Join: 04-10-2013, Post: 61

04-02-2014 15:03

Quote:Original Posted By farizseptianand ►
pas di ilustrasi nya jadi "Barcode" seharusnya tanpa quote jadi Barcode aja, berhubung parameter otomatis berbentuk stirng maka langsung di quote
sedangkan bila "Barcode"="1211102" berarti itu menyamakan antara "Barcode" dan "1211102" jelas false kan
ok gan.. ane coba2 dulu.. soalnya kalo biasa ane ga pake parameter buat query, enak lgs maen di querynya aja.. tar ya ane balik gawe coba2 dulu emoticon-Smilie

#10

farizseptianand

Kaskuser

–

Join: 20-08-2013, Post: 245

04-02-2014 16:06

iya , parameter mempermudah saya, soal.a ga usah megetik ulang query.

#11

hlstech

Newbie

–

Join: 04-10-2013, Post: 61

05-02-2014 00:33

ga nemu gan... ampun...

#12

Dejavu.Cucud

Kaskus Maniac

–

Join: 05-10-2009, Post: 8,898

05-02-2014 03:12

...

#13

farizseptianand

Kaskuser

–

Join: 20-08-2013, Post: 245

06-02-2014 00:44

Quote:Original Posted By Dejavu.Cucud ►

coba um bikin query (pd SQL.Text) nya jadi dynamic (bkn static), jg jgn lupa untuk menambahkan perintah "parameters.Refresh" sesudahnya.

caranya gimana syntaxnya sample aja ^_^

#14

Dejavu.Cucud

Kaskus Maniac

–

Join: 05-10-2009, Post: 8,898

06-02-2014 05:37

...

#15

hdcoder

Kaskus Addict

–

Join: 30-12-2013, Post: 3,676

23-02-2014 16:37

sayang ini thread tenggelem emoticon-Sundul

SalamKenal om/tante ane lagi belajar bahasa pascal menggunakan Borland Delphi 7.

oh iya ane sebelum programmer dari Visual Basic ane mau nanya perbedaan penulisan statement di Borland Delphi kaya gimana ya / sama aja ? maaf ane newbie tentang bahasa pascal

#16

anakdomba.kumal

Aktivis Kaskus

–

Join: 30-12-2013, Post: 748

23-02-2014 17:51

Quote:Original Posted By hdcoder ►
sayang ini thread tenggelem emoticon-Sundul

#17

hlstech

Newbie

–

Join: 04-10-2013, Post: 61

23-02-2014 19:52

Quote:Original Posted By hdcoder ►
sayang ini thread tenggelem emoticon-Sundul

#18

morabookstore

Newbie

–

Join: 21-06-2013, Post: 6

26-02-2014 15:07

Buat Form kaya Windows 8 di Delphi 7

gan, ane mau tanya,
kalo buat Form yg desainnya kaya windows 8 gmn yah?
ada VCL nya kah?

#19

hlstech

Newbie

–

Join: 04-10-2013, Post: 61

27-02-2014 01:36

Quote:Original Posted By morabookstore ►
gan, ane mau tanya,
kalo buat Form yg desainnya kaya windows 8 gmn yah?
ada VCL nya kah?
silahkan dicari di torry.net gan..

#20

joker086

Newbie

–

Join: 28-11-2013, Post: 4

12-03-2014 00:54

gan tulungin ane please...

gini gan, ane punya 2 tabel yaitu:
1. Tabel Negara : id_negara(PK), nm_negara.
2. Tabel Ibukota : id_ibukota(PK), nm_ibukota, id_negara(FK)

trus ane buat 2 form isian (negara dan ibukota). Di form isian ibukota, ane bikin edit text buat ngisi ibukota dan dblookupcombobox buat milih negara.
Properties udah ane setting dan berhasil. Dblookupcombobox udah berisi nama negara. Tapi masalahnya pas input, error terus.
Ane mau nanya, gimana caranya input foreign key (id_negara) ke tabel ibukota???

makasih sebelumnya gan ...