| Author |
Message |
dermawan |
| Location: |
|
Post subject: Cara akses webcam...
 Posted: 21/Jun/2006 08:47
|
|
onConfident
Joined: 21-Jun-2006
Posts: 19
Status: Offline
|
|
Guys, salam kenal, saya orang baru disini. Udah jadi programmer Delphi sejak awal kuliah, berarti udah 5 taon-an. Hehehe... 
Saya lagi mau buat project untuk mengambil gambar (memotret) menggunakan webcam, dan hasil potretnya disimpan ke dalam databse dalam bentuk BLOB.
Pertanyaan saya adalah bagaimana cara untuk mengakses webcam, dan menyimpan hasil fotonya dalam bentuk JPG? Apakah ada component yang bisa membantu?
Thanx berat 
Dermawan |
|
|
| |
|
|
|
 |
|
|
|
Post subject: RE: Cara akses webcam...
Posted: 21/Jun/2006 11:28
|
|
onConfident
Joined: 12-May-2006
Posts: 26
|
|
Hi,
coba aja pake vcl sederhana saya ini dalam post sebelumnya, mudah-mudahan bisa membantu:
http://delphi-id.org/dpr/PNphpBB2-viewtopic-t-1026.pas
itu vcl bisa copy image ke clipboard ato return data JPEG, jadi terserah mo pake yg mana untuk "blobbing" ke database..
-- |
|
|
| |
|
|
|
|
|
dermawan |
| Location: |
|
|
Post subject:
Posted: 22/Jun/2006 09:14
|
|
onConfident
Joined: 21-Jun-2006
Posts: 19
Status: Offline
|
|
Aku dah coba komponen yang anda buat. Bagus sekali, sangat praktis dan mudah digunakan Thank you!!!
Btw, ada pertanyaan nih. Kalau misalnya mau ambil data JPEG pake method GetJPEGData bukan? Return-nya dalam OLEVariant kan? Nah pertanyaan saya, gimana cara memindahkan data JPEG itu ke komponen TImage?
Thanx, Chipmunk
Dermawan |
|
|
| |
|
|
|
|
|
dermawan |
| Location: |
|
|
Post subject:
Posted: 22/Jun/2006 10:44
|
|
onConfident
Joined: 21-Jun-2006
Posts: 19
Status: Offline
|
|
Munkin untuk memperjelas pertanyaan sebelumnya, saya ingin dengan setiap penekanan tombol bisa menampilkan still image yang berhasil dicapturenya, dan ditampilkan di component TImage. Kemudian baru disimpan ke dalam database dengan tipe BLOB.
Trus BLOB yang saya tahu adalah dengan menggunakan ADOTable. Mungkin ada cara lain? Saya sangat terbuka dengan alternatif baru. Hehehehehe...
Munkgin anda punya saran, soalnya udah googling dari tadi koq gak bisa menemukan solusinya yah 
Thanx again,
Dermawan |
|
|
| |
|
|
|
|
|
|
|
Post subject: RE: Cara akses webcam...
Posted: 22/Jun/2006 11:19
|
|
onConfident
Joined: 12-May-2006
Posts: 26
|
|
Hi,
Klo di Delphi anda tidak harus menggunakan GetJPEGData() untuk mengkopi image ke "image aware" controls seperti TImage/TDBImage tapi gunakan aja clipboard dan panggil method CopyCaptureToClipboard() trus pada TImage object instance:
Image1.Picture.Bitmap.Assign(Clipboard);
Jika pake TDBImage pake PasteFromClipboard()
Implementasi dari GetJPEGData() jg menggunakan clipboard (liat sources). Tujuan saya waktu itu untuk fungsi ini adalah untuk memudahkan jika yg diinginkan adalah byte stream untuk aplikasi tertentu.
Tp jika anda emang ingin menggunakannya pake aja fungsi2 untuk manipulasi variant spt VarArrayLock() yg return pointer ke raw data image. Klo mo experiment, coba liat implementasi GetJPEGData() dalam sources komponen webcam itu dan berangkatlah dari situ untuk berpikir sebaliknya yaitu dari variant ke bitmap..
Tipe OleVariant sering digunakan oleh COM based application dan jika anda konversi component ini manjadi activex (dg fasilitas Delphi sendiri bisa..), maka GetJPEGData() ini dapat digunakan oleh bahasa yg support COM secara langsung (misal unmanaged VB,C/C++) dan managed application (.NET compliant apa aja).
Saya dulu uda coba di .NET lewat interop layer dg C# dan bisa digunakan dengan casting return-nya itu ke byte[] (array ke tipe byte) dan selanjutnya digunakan seperti biasa...case by case tentunya.
Jadi pada dasarnya GetJPEGData() dimaksudkan utk memudahkan jika menginginkan byte stream secara langsung tanpa perlu rutin2 utk transfer data dari clipboard lagi...
Untuk lebih detailnya silakan baca referensi yg terkait..
Thanks |
|
|
| |
|
|
|
|
|
dermawan |
| Location: |
|
|
Post subject:
Posted: 22/Jun/2006 13:35
|
|
onConfident
Joined: 21-Jun-2006
Posts: 19
Status: Offline
|
|
Oke, saya sudah berhasil. Thanx
Btw, ada pertanyaan lagi nih. Sekarang ini saya pakai ADOTable untuk menyimpan BLOB langsung ke field-nya. Ternyata hal ini masalah apabila tabel-nya menyimpan data banyak. Setiap kali mau open tabel, butuh waktu sampe hitungan menit. Dan saya lihat di Task Manager, penggunaan memory sampai 240 MB.
Tabel tersebut berisi 10.000 record, fieldnya hanya integer dan longblob. Setiap record kurang lebih ukuran fotonya 20 KB.
Kira-kira gimana saya bisa menyimpan dan meload gambar dari tabel tersebut tanpa menggunakan komponen ADOTable yang lambat itu?
Oh ya, sori kalau OOT banget :p
Thanx berat,
Dermawan |
|
|
| |
|
|
|
|
|
|
|
Post subject: RE: Cara akses webcam...
Posted: 22/Jun/2006 14:57
|
|
onConfident
Joined: 12-May-2006
Posts: 26
|
|
Sepertinya uda pernah ada yg posting masalah optimasi itu..coba cari di forum ini lagi..
Good luck! |
|
|
| |
|
|
|
|
|
deLogic |
| Location: Jakarta |
|
|
Post subject:
Posted: 22/Jun/2006 15:00
|
|
onMage
Joined: 04-Jul-2005
Posts: 2282
Location: Jakarta
|
|
lebih baik gunakan query berparameter untuk simpan / load BLOB, lebih hemat resource dibanding Table. Jika Anda masih 'bersikeras' menggunakan tabel, lebih baik field BLOB tersebut Anda split / pisahkan ke tabel tersendiri sehingga Anda dapat me-load BLOB Anda pada saat diperlukan saja.
Kalau tidak salah seputar BLOB dan gambar pada database sudah pernah dibahas pada posting2 sebelumnya, coba Anda gunakan fasilitas Search di dalam onForum. |
_________________
.:: Lagi gak pengen pasang signature ::.
|
| |
|
|
|
|
|
dermawan |
| Location: |
|
|
Post subject:
Posted: 23/Jun/2006 11:24
|
|
onConfident
Joined: 21-Jun-2006
Posts: 19
Status: Offline
|
|
| thanx atas replynya |
|
|
| |
|
|
|
|
|
matabdulaziz |
| Location: |
|
|
Post subject:
Posted: 07/Jul/2006 09:50
|
|
Joined: 04-May-2006
Posts: 1
Status: Offline
|
|
mas - mas componentnya itu bisa buat capture dengan format video nggak (ex:avi atau yang lainnya)
trus ada yang pernah pake DSPack nggak gimana sih cara installnya kok error terus (dah baca readme nya tapi masih error nih help dong) |
|
|
| |
|
|
|
|
|
sing_keren |
| Location: |
|
|
Post subject:
Posted: 08/Jul/2006 13:53
|
|
onBeginner
Joined: 26-Oct-2005
Posts: 6
Status: Offline
|
|
@matabdulaziz
saya pernah pake dspack. ng.. waktu nginstall erorr ya?
gini pergi ke option lalu search pathnya isi dengan forlder source dari dspack
(waktu download dspack kan dapat banyak folder, salah satunya source)
nahh di dalam folder source ada 2 file. itu di add satu persatu ke source pathnya. |
|
|
| |
|
|
|
|
|
bagus_mlg |
| Location: |
|
|
Post subject: webcam video streaming
Posted: 19/Mar/2007 14:18
|
|
Joined: 10-Mar-2007
Posts: 1
Status: Offline
|
|
| alo bro. sorry gue orang baru di delphi. gue mo nanya gimana sih caranya nampilin video streaming langsung dari webcam make delphi? kalo ada yang tau source nya, tolong dong ngasih tau gue. thanx all |
|
|
| |
|
|
|
|
|
|
