Menanggapi respon dari mas rohman, yang ingin membuat menu utama pada aplikasinya. Monggo ikuti langkah-langkah berikut untuk membuat menu seperti contoh diatas.
- Buat Project sebuah baru anda, dari menu File -> New -> Application,maka akan otomatis ada form1
- Buat beberapa form baru di dalam project anda tersebut. Dari menu File -> New -> Form, pada contoh ini saya membuat 3 form yaitu Form1 (sebagai menu utama), Form2 dan Form3 sebagai Form prompt ketika di klik salah satu menu.
- Jangan lupa menyimpan project dan form-form anda, dari menu File -> Save All.
- Mulai membuat menupada Form1 letakkan object MainMenu yang ada ditab Standar. Klik kanan pada MainMenu1 -> Menu Designer. maka akan ada tampilan edit menu.
Klik pada area biru gambar diatas, kemudian pada properties Caption ketikkan “Document“, kemudian enter. Satu menu utama sudah terbuat.Untuk membuat menu dari Document, klik pada menu document, akan ada satu area menu yang masih kosong, klik kemudian pada caption ketikkan Baru dan enter, dan seterusnya untuk menu-menu lain.
Untuk membuat garis pembatas antar menu, cukup ketikkan - (tanda min), pada caption.
Untuk membuat sub menu dari menu Baru, klik kanan pada Menu Baru -> Create Sub Menu, klik pada satu area kosong dari sub menu baru, kemudian ketik Dokument Kosong. Demikianjuga untuk membuat menu-menu.
Close windows editor menu untuk selesai dan kembali ke design Form1. Jika berhasil maka pada form1 sudah ada menu-menu yang kita buat.
- Membuat Form show/dan showmodal.untuk contoh ini, Form2 akan ditampilkan jika dipilih menu Document -> Buka.
pilih menu Document dan klik Buka, maka akan masuk ke lebar source code, Kodenya adalahForm2.Show;
atau bisa juga
Form2.ShowModal.
Apa perbedaan antara kedua kodenya?
Jika menggunakan fungsi show, maka form1 dan form2 bisa bertukar tempat, artinya form1 bisa diatas Form2 dan Form2 bisa diatas form1. Tapi ShowModal akan membuat Form1 sebagai menu utama selalu berada dibelakang, dan Form2 akan selalu berada diatas (Always on Top).
- Simpan kembali project anda.
- Run / F9 untuk eksekusi.ketika run akan ada pesan berikut
Pilih Yes, bahwa benar Form1 mereferensikan form dua di unitnya.
isi web ini banyak yang menarik saya
tapi jika saya mengajukan beberapa pertanyaan tentang delphi bisa ga yah ?
pak lukman saya sudah lama belajar delphi walau tidak terlalu banyak yang tahu maklum,tidak mudah untuk berkembang.saya tertarik dengan program juz amma yang bisa didownload di http://www.sahryainforma.com/ index.php?option=content&task=view&id=5&Itemid=28
pak lukman saya tertarik bagai mana suara dan text bisa berjalan seiringan silih berganti ,bisa ga mas membantu saya,kami terutama sebagai pelajar,apa saja yang diperlukan untuk bisa demikian dan bagai mana databasenya,jika bapak punya waktu luang saya harap bapak bisa mempostingnya satu persatu seminggu sekali juga boleh,saya sangat tertarik sekali,sebenarnya saya sudah menghubungi yang bersangkutan tapi ya itu7kan web comercial.
ditunggu postingannya.
salam mas andara
kebetulan Mas Undang Muslim sedang membuat program tajwid dengan delphi software. ada contoh sederhana yang kebetulan sudah pernah saya buatkan untuk contoh beliau. saya kira anda dan mas Undang satu ide, insya Allah nanti saya kirimkan contoh tersebut.
sebenarnya saya juga ga begitu mahir dengan si delphi,keseharian saya bermain dengan php dan mysql (itupun sederhana), tapi kalo ada yang tanya kebetulan saya bisa, Insya Allah tak jawab.
salam kenal.
hal yang sama hal yang saya inginkan sejak lama
dan sangat bagus digunakan sebagai tambahan pada program yang sedang saya buat
kemarin saya mencoba menghubungi beliau dan saya dikasih sedikit bocoran,
sekedar untuk informasi
atau berbagi informasi,program juz amma yang pak wawan buat
sama sekali tidak menggunakan database,
hanya file text. Setiap ayat disimpan sebagai satu baris
dalam file text. Text yang digunakan bukan plain-text, tetapi unicode.
Diluar komponen standard Delphi ada komponen-komponen lain yang digunakan,
saya juga belum paham gimana caranya, saya pokus dulu pada program yang sedang saya buat,
untuk jaga-jaga atau persiapan kita download dulu TNTUnicode controls
program tambahan delphi untuk menampilkan text arab dan saya pun menggunakannya pada program
yang sedang dikerjakan yang hampir 70 % insya allah,componen tersebut bisa dicari di www.torry.net atau google
sedangkan bagi pak wawan sendiri menggunakan button,grid,scrollbar,juga komponen untuk
menampilkan text arab dengan komponen yang dibuatnya sendiri
semoga membantu.
Pak wawan ki sopo mas undang?
pak wawan sahriawan pemilik sahryainforma
ohh saya ga klik linknya, jadi bingung mas wawan itu sapa.. he he af1.
terimakasih atas informasinya saya pikir pake database pak/mas muslim
kita bisa saling tukar informasi dan ilmu andaralomax@yahoo.com
mas saya masih setia lo nunggu tutorial yang diatas
o iya btw contoh yang aku bilang itu blom pernah aku kirim ke sampean yah mas andara?
aku kirim deh keemailmu, cuma modelnya yang aku buat itu meliputi 2 jenis file yaitu image dan sound yang mana keduanya itu dimanage dengan database.
tapi dengan adanya TNTUnicode seperti yang mas undang sampaikan, maka kita hanya butuh file2 sound. sedang imagenya tidak perlu ada namun dipindahkan saja ke field didatabase sebagai sebuah text.
Blom pernah nyoba sih pake delphi namun saya pernah coba dengan PHP, Javascript dan berhasil membuat keyboard inputan untuk mengetik text arab.
Bisa kita coba sama2 tuh atau mas undang sudah berhasil mencobanya ya langsung aja diposting disini.
wah saya tidak akan mampu untuk bekerja sendirian seperti itu saya masih perlu pembimbing
yang namanya plain text dan unicode juga apa..?
ilmu delphi saya 0,01 % masih jauh perlu bimbingan my master(lukman red,he..he..),bahkan keinginan besar yang menggebu-gebu sekarang ini
saya ingin sekolah lagi apa bisa ga ya..? kalau masalah ilmu dan informasi tentang delphi memang saya buntang banting
cari kesana kemari demi pengetahuan walau hanya bisa mencari diwebs dan blog yang berbahasa indonesia karena kelemahan bahasa saya.
eh..malah ngedongeng ! kembali ke laptop !
ada imformasi tambahan nih mengenai juz amma,tapi ini bukan aku yang bicara tapi pak syahrianto ralat yang diatas mas.
“Kita bahas satu demi satu masalahnya.
Masalah #1: Menjalankan sebagian file suara.
Menjalankan file suara menggunakan Delphi dapat dengan mudah dilakukan
menggunakan komponen MediaPlayer. Jika ingin menjalankan sebagian saja
dari file suara, set property StartPos dan EndPos sesuai yang kita
inginkan. Sedangkan untuk mengetahui sudah sampai mana MediaPlayer
menjalankan file suara tersebut dapat di cek melalui property Position.
Masalah #2 Menyimpan & Me-load file text.
Untuk plain-text, gunakan class TStringlist. Gunakan method SaveToFile
untuk menyimpan ‘list of string’ ke file dan gunakan method
LoadFromFile
untuk meload-nya dari file text. Pelajari selengkapnya dari dokumentasi
Delphi.
Contoh:
var
StrList:TStringlist;
…
StrList:=TStringList.Create;
try
StrList.Add(’Text 1′);
StrList.Add(’Text 2′);
StrList.SaveToFile(’c:\test.txt’);
finally
StrList.free;
end;
Untuk mengakses baris-baris datanya gunakan default accessor-nya,
contoh: StrList[0] untuk baris pertama dan begitu seterusnya.
…
StrList.LoadFromFile(’c:\test.txt’);
ShowMessage(StrList[1]);
Untuk unicode, jika menggunakan komponen Tnt, bisa menggunakan class
TTntStringList dari unit TntClasses. Cara penggunaannya sama seperti
TStringlist, hanya string yang disimpan adalah unicode.
Masalah #3 Sinkronisasi Text & Sound
Untuk membuat keduanya sinkron, kita perlu ‘memasangkan’ antara ‘bagian
dari text’ dan ‘bagian dari sound’. Misalnya bagian terkecil dari text
adalah satu ayat, maka untuk setiap ayat, kita harus mencatat posisi
sound awal dan sound akhir dari ayat tersebut pada file sound (mis:
file
sound disimpan per-surat). Dengan mengecek property Position dari
TMediaPlayer, kita bisa tahu ayat yang mana yang sedang dibacakan.
Sebaliknya, kita juga bisa tahu dari posisi mana suara harus di-play
untuk ayat tertentu.
( muslim berkata ” saya punya Quran in the word untuk data textnya”)
Masalah #4 Data Al-Quran
Pembuat ‘Quran in the Word’ sebenarnya mengambil data dan font dari
software Al-Mushaf buatan Harf, dari Mesir. Software Al-Mushaf adalah
software yang digunakan di bidang publishing. Al-Mushaf bekerja dengan
cara menggunakan OLE untuk mengakses Microsoft Word dalam menuliskan
ayat Al-Quran. Masalahnya adalah font yang digunakan Al-Mushaf bukan
font yang mendukung unicode. Al-Mushaf menggunakan 5 buah font
non-unicode yang dikombinasikan (secara rumit & tidak efisien) untuk
membentuk tulisan arabic. Hal ini dilakukan Al-Mushaf untuk memenuhi
kebutuhan di bidang publishing (semata-mata agar bagus dan ‘tepat
secara
tulisan’ untuk dicetak, tidak perduli bagaimana representasi data
internalnya). Penyebab Al-Mushaf dibuat dengan cara seperti itu adalah
karena definisi unicode untuk tulisan arabic kurang lengkap untuk
menampilkan ayat Al-Quran. Banyak tanda baca tambahan yang digunakan
untuk menuliskan Al-Quran yang tidak terdapat dalam unicode karena
memang tidak digunakan dalam tulisan arab sehari-hari. Jadi data Quran
yang dihasilkan bukan unicode tetapi plain-text dengan mapping data
tidak standard yang dibuat sendiri.
Saya sendiri menggunakan sebuah font unicode yang Saya compose sendiri
dari berbagai font yang ada sesuai yang Saya butuhkan. Saya tidak
menggunakan standard arabic character set pada range (U+0600-U+06FF)
di
unicode, tetapi membuat mapping sendiri di range U+E000–U+F8FF yang
memang disediakan untuk private use area.
Bahasan tentang unicode sendiri lumayan rumit dan kompleks. Tetapi jika
menggunakan komponen Tnt untuk menampilkan text arabic (sangat
mudah dan sederhana bila berurusan dengan unicode), sebaiknya carilah
data Al-Quran dalam bentuk unicode di internet.”
muslim berkata = nyengir deh he..he..peniiiiing,mas andara biar sang master
aja yang nerjemahin sekalian posting..ting..
nice tutor…
Ini baru Delphi Programmer.. he he mas Syahrianto ya.
Tanggapan
Masalah #1
File mp3nya bisa satu file tuh, jadi ga setiap kata satu file .mp3, memang dengan delphi mediaPlayer bisa membaca track position file mp3 yang sedang diplay, beberapa waktu yang lalu saya membuat winamp sederhana buat contoh mb sri kalo ga salah, saya menggunakan fungsi position, length dari mp3 yang diplay.
memang file mp3nya bisa satu, tapi kita harus menyimpan numeric position dari suara yang akan kita play di databasenya.
Masalah 2#
saya kira ini sama aja dengan permainan database, menulis records, rows dan membacanya. Menulis ke txt, membaca dari txt saya kira mending disimpan didatabase aja.
Masalah 3#
Sinkronisasi. Karena saya lebih suka menulis dan membaca dari dan ke database, maka saya bisa membuat table dengan fields.
- textLatin
- textUnicodeArab
- startPosMp3
- endPosMp3
- description
Masalah#4
Text unicode arab, ini yang saya blom bisa kombinasikan. saya pernah menulis untuk web program, tapi untuk desktop dengan delphi blom nemu. saran mas syahrianto itu bagus kayaknya, atau dengan link yang mas muslim kasih sebelumnya. blom nyoba liat2 lagi banyak load kerjaan neh. huh lembur lemburrrrrrrr
aya naon iyeu teh asa rareuwas darukdeuk tiluan ajak-ajak atuh
wah terimakasih atas samplenya.sangat membantu walau ga ngerti kalau imagenya diganti ke
text arab atau abjad dan disimpan di field yang ini ora ngerti mas dan saya juga udah coba kodenya
pak sahrianto yang ditulis pak muslim mengenai cara mengetahui sampai dimana itu sounds itu berjalan
dan menjalankan sebagian,begitu tekan f 9 eh itu suara terus-terusan berjalan tidak sebagianya
bahkan untuk mengetahui suara sampai dimana ya didengerin saja sampai habis..ha..ha…comedi..bodor ah
wassalam
Kalo untuk mengetahui panjangnya file sound pake ini
MediaPlayer1.Length;
Untuk memainkan pada posisi tertentu gunakan
MediaPlayer1.Position:=10000 (ini angka posisi track);
MediaPlayer1.Play;
Bisa gunakan Timer untuk Play :
Set Interval = 1
Set Enabled = false;
procedure Tplayer.Timer1Timer(Sender: TObject);
var
start, finish : integer;
begin
start = 600;
finish = 2300;
if ((MediaPlayer1.Position < MediaPlayer1.Length) and (MediaPlayer1.Position>= start) and (MediaPlayer1.Position< =finish)) then
begin
label1.Caption:= IntToStr(MediaPlayer1.Position);
end
else
begin
Timer1.enabled:=false;
MediaPlayer1.Stop;
End;
End;
{
Saya tidak mencoba kode diatas, tapi secara logika bisa seperti itu, atau coba lebih disederhanakan, bagi temen-temen lain.
Ket:
Mulai dari track 600 dan finish track 2300;
Timer akan terus berjalan secara bersamaan dengan MediaPlayer dengan interval 1, jika posisi lebih kecil panjang file dari dan posisi lebih besar sama dengan start dan posisi lebih kecil sama dengan finish maka timer dan media player akan terus berjalan; jika tidak maka player di stop dan timer juga distop. Begitu kira kira.
}
procedure Tplayer.Button1Click(Sender: TObject);
begin
Timer1.Enabled:=true;
Timer1Timer(Sender);
end;
{
Timer akan di play dengan klik button (contoh aja buat memulai start);
}
wah kayaknya seru nih. boleh ikutan gabung?saya newbie
assalamu’alaikum
kita ni cari artikel semacam ni hampir satu windu
akhirnya dengan bantuan google hamba ni terbantu.ilmu di atas hendak saya coba namun jika gagal kiranya awak hendak kasih conto
Insya Allah jika aku bisa menjawab.
very goood…
mas, gmana caranya cek stok yang telah kita keluarkan. makasih
biasanya yang namanya stok berhubungan dengan pembelian && penjualan, atau pemasukan dan pengeluaran barang.
untuk mencatat stok keluar bisa didapat dari data penjualan (pengeluaran barang). jadi ketika kita keluarkan barang, catat dalam record jumlah yang keluar itu. kemudian dalam periode tertentu bisa kita count jumlah barang yang keluar tersebut.
Untuk lebih jelas mungkin bisa disampaikan kronologis kebutuhan sampean.
ass…saya mohon bantuan mas…sy perlu source code program aplikasi bahasa arab dengan bhs pemrograman delphi 6 or 7 ? trus ada saran bagaimana bisa tampilkan suaranya ? syukron
bisa tolong ndak untuk membantu membuat program yang dapat menghubungkan antara delphi dan php (web)
thank’s
Bagaimana menyimpan file spt video (*.avi,*.mpeg…)didatabase.. klw bisa didatabase desktop
malem mas.mas saat ini aq bingung coz q lq ujian skripsi end rencana nya sich mau buat sistem informasi pembayaran spp dengan program delphi tapi q bingung dengan rancangan dan kode2 nya bisa tolong di buatin contohnya gak.makasih ya atas bantuannya
file avi atau mpg jangan disimpan di database, yang disimpan didatabase adalah info tentang file itu, misalkan file_id, file_name, file_folder, file_size dsb. data2 ini yang disimpan di database. sedangkan filenya tetap diatur dalam satu folder tertentu.
fais, pertanyaan sampean terlalu luas, menurut saya. Mungkin anda bisa tanya dengan lebih spesifik, karena ga semuanya harus ditanyakan, harus ada yang kita usahakan sendiri terlebih dahulu.
Terima kasih
mas, tanya dunks.. kalo file exe delphi bisa dijalanin under web enggak yah?
kalo bisa mau dunks cara2nya..
thanks before yah
mas tolong saya dikasih contoh program delphi dengan metode ahp???
atau alamat situs yang berhubungan dengan program delphi dengan metode ahp…
mas,, klo mo masukkan file musik (.midi/.mp3) caranya gimana ya mas…
trims tutornya
Bagi yang tertarik DATABASE berisi kode teks untuk AL-QURAN: indonesianya dan ARABICnya bisa download QB di http://www.mega-pulsa.com. Untuk ujicoba: buka file alkitab.MDBnya (microsoft access), CTRL+C salahsatu data pada field teks arabicnya kemudian buka FRONTOFFICE dan Sisispkan Scrypt pada HTML (CTRL+V) dan eksekusi file htmlnya.. insya Allah Anda mengerti maksud saya.
mas q mau nanya tugasQ ni….bikin file browser tapi pake tampilan form tambahan seperti diwindows.
gmn cranya coz q juga ru belajar delphi ni….(masih terlalu awam banget)
mas adit, saya sendiri belom pernah coba, tapi sepertinya bisa, pernah klik link pdf, secara otomatis menjalankan adobe reader, pernah klik mail:to, otomatis buka Outlook express. hanya monggo dicoba2 cari
Om David, saya sendiri bingung dengan AHP, http://heru.wordpress.com/2006/09/21/analytic-hierarchy-process-ahp/
om Komting, di masukkan ke database maksudnya? tidak usah, lebih baik dibuat mapping saja, yang di simpan hanya informasi tentang file itu, seperti letak folder, size, ext, dsb.
thanks mas endro infonya.
Om Nat, pake fasilitas-fasilitas yang ada di tab win 3.1, disana ada drive list box, directorylist box, file list box dll
mas punya contoh2 program database delphi7 yg menggunakan konsep ado/ms access ga…???
klo ada tolong beritahu saya ya…
Pak saya boleh ngak nanya, tentang delphi, maklum saya ngak menguasai delphi.
Saya bikin program sistem infromasi sekolah dengan database acces.Untuk mengkonekkannya saya sudah bisa, tapi untuk proses simpan, edit, n laennya masih agak bingung, serta tuk pencarian menggunakan SQL tuk pencarian.
Yang saya tw miaslnya tuk simpan button simpan listingnya ADOTable1.Post; Data baru ADOTable1.Append; , ya yang seperti itu saja saya bisa, maklum baru permula.
Mohon bantuannya Ya Pak
tolong q kirimi program delphi menggunakan konsep ms access.
gimana sih source code utk buat laporan orang per orang dlm sistem penggajian dg delphi
laporan orang-perorang, perbulan atau per apapun sebenarnya hanya filter data saja, logikanya kan kita akan memfilter data dengan NIK tertentu dan pada bulan tertentu dan semuanya bisa dilakukan dengan filter, pernah saya posting disini
http://www.stillcetek.com/2007-12-19/filter-data-database-paradok-di-delphi-7.html