Arsip: Multi Thread

more 13 years ago
erwan
Dear master delphi sekalian,
saya sedang membuat aplikasi yg menggunakan multi thread, saya gunakan JvThread dan sudah bisa berjalan 2 thread sekaligus.
Namun ada kesulitan yg saya hadapi, yaitu bagaimana jika thread yang dibutuhkan terus bertambah sedangkan untuk menggunakan thread ini saya harus taruh component JvThread di form untuk tiap 1 thread nya. Adakah cara untuk otomatis membuat thread tambahan semacam itu...?
atas bantuannya saya ucapkan terima kasih.

more 13 years ago
heriy4nt0
Biasanya saya memakai Thread dengan menulisakan langsung tanpa pemakaian komponen,
misal : type tmyclass = class(thread)
...bla..bla..bla. .
end;
kemudian untuk pemanggilan dari procedure, sy buat satu event terminate
procedure OnMyThreadDone(Sender:TObject)
Dan thread tersebut saya panggil sebanyak yang sy inginkan bahkan tidak terbatas,
procedure form1.panggilThread;
begin
while true do begin
with tmyclass.create(..passing parameter..) do
onterminate = OnMyThreadDone;
end;
end;
hanya contoh ya, jangan di ikuti--> blok while diatas tidak pernah berhenti soalnya :D

more 13 years ago
herux
Mau pake jvThread atau TMyThread = class(TThread) ga ada masalah kan ?
kalo mau dinamis ya buat aja variable

more 13 years ago
ImanD
@erwan: Dear master delphi sekalian, Namun ada kesulitan yg saya hadapi, yaitu bagaimana jika thread yang dibutuhkan terus bertambah sedangkan untuk menggunakan thread ini saya harus taruh component JvThread di form untuk tiap 1 thread nya. Adakah cara untuk otomatis membuat thread tambahan semacam itu...?coba pembuatan JvThread nya jangan pas saat design, manfaatkan saat runtime sample simple
var
JvThread: TJvThread; // coba liat class nya saya blom pernah pke ini
begin
JvThread:=TJvThread.Create(Self);
with JvThread do
begin
//setting property yg di butuhkan
end;
end;
klo di butuhkan banya thread di 1 form tinggal type nya di buat arra
var
JvThread: array of TJvThread;
good luck!more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 2 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 3 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 10 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 10 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 10 years ago
Random Topic
- How to reduce delphi EXE size?
by rydz™ in Tip n Trik Pemrograman more 14 years ago - [ASK] Cara Membuat Aplikasi Meluncurkan Aplikasi Lain
by yudiwidiawan in Tutorial & Community Project more 12 years ago - Membuat tampilan TV dari TV Tunner didalam Form Delphi ??
by purnomo2007 in OOT more 12 years ago - menghitung stok barang ?
by jajang in Hal umum tentang Pascal Indonesia more 14 years ago - Membernya koq dikit ya ?????
by EkoIndri in Kritik & Saran more 17 years ago - efek Image berkedip & ganti gambar
by Lembah_Tidar in Hal umum tentang Pascal Indonesia more 15 years ago - Mendeteksi nama, serial number, nama vendor hardware di PC
by yunacorp in Tip n Trik Pemrograman more 16 years ago - bagaimana buat setup untuk database BDE?
by hendra_sir84 in Hal umum tentang Pascal Indonesia more 15 years ago - Parsing sms autorespon
by ozira_21 in Hal umum tentang Pascal Indonesia more 15 years ago - Mulai firebird masih bingung ???
by aakdedy in FireBird more 13 years ago