|
dev.gamez.lv Latvian Game Developers Community
|
View previous topic :: View next topic |
Author |
Message |
loud
Joined: 01 Jan 2006 Posts: 38 Location: Latvia, Sigulda
|
Posted: Tue Mar 07, 2006 9:41 pm Post subject: Ibasic problēma... |
|
ja kāds te zin kaut ko daudz maz no ibasic, tad moshka var izpaliidzeet, lieta sekojosha, vajag nolasiit datus no editbox un peec ta saglabaat attieciigi failaa, bet man kaut kaa neizdodas:
Quote: | control w2,"E,,100,10,250,25,0,14"
control w2,"E,,150,40,200,25,0,15"
control w2,"E,,100,70,250,25,0,16"
control w2,"E,,100,100,250,25,0,17"
control w2,"E,,100,130,250,25,0,18"
control w2,"E,,100,160,250,25,0,19"
control w2,"L,,360,30,260,300,@vscroll,20"
control w2,"B,Dzēst,450,350,50,25,0,21"
control w2,"B,Veidot jaunu,30,400,100,30,0,22"
control w2,"B,Pievienot,150,400,100,30,0,23"
control w2,"B,Iziet,270,400,100,30,0,24"
enablecontrol w2,21,0
nosaukums$ =getcontroltext(w2,14)
waituntil w2=0
end
return
sub main2
select @class
case @idclosewindow
closewindow w2
case @idcontrol
select @controlid
case 23
if(openfile(klienti,getstartpath + "klienti.txt","W") = 0)
write klienti,nosaukums$
closefile klienti
else
closewindow w2
endif |
_________________ Here I am |
|
Back to top |
|
|
KaiberMen
Joined: 28 Oct 2006 Posts: 8
|
Posted: Sun Oct 29, 2006 1:11 pm Post subject: IBasic |
|
Man ir IBasic PRO tas ir daudzkārt labāks par IBasic Standart... ja vajag varu iedot... |
|
Back to top |
|
|
KaiberMen
Joined: 28 Oct 2006 Posts: 8
|
Posted: Thu Dec 14, 2006 9:31 pm Post subject: |
|
Elementāri: nosaukums$ =getcontroltext(w2,14) ieliec pirms kaut ko raksti failā...
Atrisinājums:
if(openfile(klienti,getstartpath + "klienti.txt","W") = 0)
nosaukums$ =getcontroltext(w2,14)
write klienti,nosaukums$
closefile klienti |
|
Back to top |
|
|
KaiberMen
Joined: 28 Oct 2006 Posts: 8
|
Posted: Thu Dec 14, 2006 9:33 pm Post subject: |
|
Tu savā kodā esi muļķīgi piešķīris mainīgajam vērtību, tad kad vērtības devējs loģiski ir tukšs : ) |
|
Back to top |
|
|
bubu Indago Uzvarētājs
Joined: 23 Mar 2004 Posts: 3223 Location: Riga
|
Posted: Thu Dec 14, 2006 10:00 pm Post subject: |
|
KaiberMen: ir tāda podziņa EDIT. zini ko tā nozīmē? |
|
Back to top |
|
|
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
Powered by phpBB © 2001, 2005 phpBB Group
|