Miten säikeitä käytetään Pascal:ssa. Mitä asioita pitää ottaa huomioon.
Vastaukset 1
- Kukame
// esitellään jossain meidän oma säieluokka
Type
TMyThread = class(TThread)
public
data: String;
procedure Execute: Override;
end;
procedure TMyThread.Execute;
var
idx: Integer;
begin
// tämä funktio ajetaan omassa säikeessä. Täältä ei saa päivittää
// lomakkeen VCL komponentteja suoraan koska saattaa tulla
// konflikti MainUI säikeen kanssa.
for idx:=0 to to 10 do begin
sleep(1000); // esimerkissä nukutaan jonkin aikaa
end;
end;
- - - - -
// käytetään säiettä vaikka päälomakkeella
procedure TFrmMain.ThreadTerminated(Sender: TObject);
var
data: String;
begin
// säie lopettanut elämänsä, luetaan siitä lopputulos tai
// mitä ohjelma haluaakin tehdä. Tätä kutsutaan MainUI
// säikeessä joten on turvallista päivittää vaikka
// formien VCL komponenttien tilatietoja.
data := (Sender as TMyThread).data;
end;
procedure TFrmMain.btnStartThread(Sender: TObject);
var
thr1: TMyThread;
begin
// luo instanssi mutta älä käynnistä(suspended=true) automaattisesti.
// instanssin konstruktoria (free) kutsutaan automaattisesti kun
// säikeen elinkaari päättyy. Ennen destruktoria kutsutaan ThreadTerminated
// funktiota jossa voidaan tehdä lopputemput.
thr1 := TMyThread.Create(true);
thr1.freeOnTerminate := true;
thr1.onTerminate := ThreadTerminated;
thr1.Resume; // käynnistää säikeen
// eli meidän ei tarvitse eikä saa kutsua täällä thr1.Free funktiota koska
// järjestelmä poistaa sen automaattisesti. Jätetään se pyörimään taustalle.
end;
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Martinan bisneksillä ei mene hyvin
https://www.iltalehti.fi/viihdeuutiset/a/c46da6ab-340f-4790-aaa7-0865eed2336 Yrityksen konkurssihakemus on tullut kärä3271578Tiesitkö? Martina Aitolehden isäpuoli on tämä suosittu laulaja
Martina Aitolehti on seurattu julkisuuden henkilö. Lähipiiriin mahtuu muitakin tunnettuja henkilöitä. Tiesitkö, että Ma311289Jos SDP ei voita reilusti, persut kumoavat demokratian Suomesta
Näin tekisi ainakin Rydman seuratessaan idolinsa Trumpin mallia https://www.is.fi/politiikka/art-2000012187244.html5031201- 63995
- 73962
- 52740
Kiteen Pallon superpesisjoukkue pelaa huumeiden vaikutuksen alaisena
Huumerikos. Yleisesti uskotaan, että se seikka, että eräs KiPan pelaaja kärähtää huumeista, on vain jäävuoren huippu. M109726Mies, olenko ymmärtänyt oikein?
Ystävyys/salainen suhde/molemmat ovat täysin poissuljettuja asioita? Nainen75722Perussuomalaisten kannatus nousi rytinällä Ylen tänään julkaisemassa tuoreimmassa gallup-kyselyssä.
https://yle.fi/a/74-20239449 Perussuomalaisilla hurja- ja ylivoimaisesti suurin nousu tässä uudessa Ylen gallupissa. Kyl468657- 38632