Arsip: Nanya Thread

more 8 years ago
sanmila
Master dan suhu :lol:, aq newbie nih mau tanya ttg thread.. Kenapa ya sulit banget mahamin yang namanya thread.. ada yang bisa bantu ga gimana caranya supaya gampang mahamin thread.. tapi yang simple ya... referensi dan tautan pun gpp, asal bahasa indo dan gampang dipelajari... pliisss... help mi ya... :oops: :wink:

more 8 years ago
nasbms
setau saya, kl di DB MySQL mendukung Multi Treading yg artinya mampu menerima query yang bertumpuk dalam satu permintaan. ex : query 1 "Insert", query 2 "Update", Query 3 "Select". jd ke-tiga query tsb dieksekusi sekaligus.
smoga membantu..

more 8 years ago
henry_sys
Thread merupakan bagian terkecil dari sebuah proses. sebenarnya Thread dengan Proses hampir sama yang saya tau perbedaan mendasarnya adalah
Proses berjalan Sendiri/Berdikari sedangkan tread dapat dijalankan secara bersama-sama serta dapat berbagi info antar sesama tread krn dia ada didalam Proses
Ilustrasi thread pada Proses transaksi INSERT
1. Konek ke database
2. Insert Data ke setiap Field berdasarkan Query
3. COMMIT OR ROLBACK
klu di prosessor yang memiliki core lebih dari satu, thread 1,2 dan 3 bisa dieksekusi secara bersamaan tetapi klu single core itu biasanya deksekusi sequensial. tetapi yang membuat dia seolah-olah dieksekusi secara bersamaan adalah operating system(OS) dengan cara memecah thread tersebut kedalam bagian2 kecil lagi.
Contoh seperti IDM (Internet Download Manager)
Prosesnya adalah DownloadFile sedangkan threadnya adalah koneksi2 yang dibuat untuk download part file tersebut dari berbagai server yang ada
itu yang saya bisa share tentang thread, klu ada yang keluru tlg diluruskan...

more 8 years ago
denmasdanang
contoh Thread di delphi :
unit Unit1;
interface
uses
Forms, Dialogs, Windows, SysUtils;
type
TMsgRecord = record
thread : Integer;
msg : string[30];
end;
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
Implementation
{$R .dfm} // Include form definitions
ThreadVar // We must allow each thread its own instances
// of the passed record variable
msgPtr : ^TMsgRecord;
// Private thread procedure to show a string
function ShowMsg(Parameter : Pointer) : Integer;
begin
// Set up a 0 return value
Result := 0;
// Map the pointer to the passed data
// Note that each thread has a separate copy of msgPtr
msgPtr := Parameter;
// Display this message
ShowMessagePos('Thread '+IntToStr(msgPtr.thread)+' '+msgPtr.msg,
200 msgPtr.thread, 100);
// End the thread
EndThread(0);
end;
procedure TForm1.FormCreate(Sender: TObject);
var
id1, id2 : LongWord;
thread1, thread2 : Integer;
msg1, msg2 : TMsgRecord;
begin
// set up our display messages
msg1.thread := 1;
msg1.msg := 'Hello World';
msg2.thread := 2;
msg2.msg := 'Goodbye World';
// Start the first thread running asking for users first name
thread1 := BeginThread(nil,
0,
Addr(ShowMsg),
Addr(msg1),
0,
id1);
// And also ask for the surname
thread2 := BeginThread(nil,
0,
Addr(ShowMsg),
Addr(msg2),
0,
id2);
// Ensure that the threads are only closed when all done
ShowMessagePos('Press this when other dialogs finished.', 200, 300);
// Finally, tidy up by closing the threads
CloseHandle(thread1);
CloseHandle(thread2);
end;
end.
:D
more 8 years ago
sanmila
Makasih mas2 semua, untuk pendahuluannya membuat saya lebih faham dan semakin bersemangat mempelajari thread nih.. tapi untuk peng-aplikasian dalam logic nya gimana ya..??? :lol:
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
- Project Group dalam Lazarus
- FastPlaz Database Explorer
- Release: FastPlaz Super Mom v0.12.22
- PascalClass #3: Web Development with Free Pascal
- Makna Pascal di Pascal Indonesia
- Kulgram : Instalasi Lazarus di Perangkat Berbasis ARM
- PascalClass #1: Analisa Database dan Machine Learning
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
- Mengenal OXYGENE – Pascal For .NET
- PascalTalk #5: UX: Research, Design and Engineer
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 3 months ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 months ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 months ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 1 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 8 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 8 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 8 years ago
Random Topic
- ada yang punya decopiler buat delphi??
by alvonz in OOT more 11 years ago - download
by saysansay in Enginering more 15 years ago - kode ascii
by tamara in Delphi.NET more 11 years ago - GapleX 1.0: GapleX Multiplayer Games
by portege in Games more 14 years ago - ada yg pernah punya masalah dengan Rollback gak??
by cyan in FireBird more 12 years ago - Apa aja yg diperluin sebelum mulai ngoding/bikin program?
by sikuper85 in Enginering more 11 years ago - speed of query
by goehsatrio in MySQL more 12 years ago - Bikin angka pada edit text yang ada titik/komanya
by or4n3 in Tip n Trik Pemrograman more 12 years ago - Caranya bikin program monitoring PLC secara serial
by doni_vika in Network, Files, I/O & System more 10 years ago - Kode Looping???
by camp_sire in Tip n Trik Pemrograman more 13 years ago