Elikkä jos laitan lazarukseen progressbarin komennolla
procedure TForm1.ToggleBox1Change(Sender: TObject);
var t:integer;
begin
for t:=1 to 10 do begin
ProgressBar1.stepit;
sleep(100); //100 ms viive
end;
Niin pitääkö initialization kohtaan laittaa jotain kun se siitä herjaa, kun yritän käynnistää ohjelman? Ajattelin vain kokeilla jos se lataisi jotain olematonta siinä vain, eli ei lataisi mitään mistään vaan rullaisi siinä vain.
Kysymys......
täällä......
6
228
Vastaukset
- se.................
muuttaa sen pohjan keltasen väriseks eikä toimi tässä rivit
procedure TForm1.Button1Click(Sender: TObject);
var t:integer;
begin
for t:=1 to 10 do begin
ProgressBar1.stepit;
sleep(100); //100 ms viive
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Close;
end;
initialization
{$I unit1.lrs}
end.- ...
eos
- mitäs......
... kirjoitti:
eos
toi tarkotti? Pystytkö laittaa oikeen koodin jos toi on väärin?
- Kyllä tuo toimii!
Vastaus on siis ihan alkuperäiseen kysymykseen!
"Niin pitääkö initialization kohtaan laittaa jotain kun se siitä herjaa"
Ei tarvitse. Sinulla on ilmeisesti ohjelman rakenne jotenkin virheellinen.
Eli helpoiten löydät virheen kun teet vallan uuden kokeiluprojektin
lisäät sinne vain nuo kaksi komponenttia ja teet tuon
tapahtuman.
Ainoa minkä voisit korjata on lisätä nukkumisen jälkeen on
Application.ProcessMessages;- toimi............
vieläkään... Tuli yks nolo juttu mieleen.. Pitäisköhä toho laittaa jostai sellanen progressbar? Siis samal taval ku laittaisit buttonin? Jo pitää mist sen sais?
- Sain
toimi............ kirjoitti:
vieläkään... Tuli yks nolo juttu mieleen.. Pitäisköhä toho laittaa jostai sellanen progressbar? Siis samal taval ku laittaisit buttonin? Jo pitää mist sen sais?
sen toimimaan!
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Hallitus pyrkii rajoittamaan kaupan omien halpamerkkien myyntiä
Helsingin Sanomien mukaan hallitus valmistelee lakihanketta, joka suitsii kaupan valtaa ja rajoittaa omien halpamerkkien1022314- 2221940
Huomenna sähkö maksaa jo yli 60 snt/kWh. Milloin ALV putoaa?
Kysynkin persuilta, että milloin aiotte pudottaa sähkön arvonlisäveron kuten Marinin hallitus teki sähkön hinnan noustes1761762Persut päättivät hiilivoimaloiden alasajosta
Persut ovat Suomen kansan vastainen putinistiporukka, josta nyt maksamme kovaa hintaa.1011326- 381240
- 1221118
Onko jollekin vielä epäselvää Raamatun kanta homoseksuaaliseen käytökseen?
😺 On oma mielipiteesi mikä tahansa on hyvä muistaa, mikä on Jumalan mielipide. Edelliset ketjut ovat tulleet täyteen jo27784290kW kulutus
Joku kirjoitti sellaisesta tehomaksuaiheen yhteydessä. Tuollainen kulutushan vaatisi pääsulakkeiden kooksi jo vaikka mit180691Mietin sua liikaa
Mietin nytkin sitä, että millaista se olisi tulla kotiin, kun sinä olisit täällä vastassa. Tai niin päin, että sinä tuli47675Vanhemmassa miehessä
on sellaista elämän mukana tullutta viehättävää charmia. Hän paranee iän myötä niinkuin hyvä viini tai juusto! Tuli tuo51670