MyCity » Pascal -> Delphi » Novajlija u Delphiju :)

Novajlija u Delphiju :)

Napisano na dan: 30.8.2006
1

Novajlija u Delphiju :)
Sledeća strana Pagination

Idi na vrh

Poslao: 30 Avg 2006 11:36
Idi na vrh
offline
  • Pridružio: 10 Avg 2006
  • Poruke: 1009
  • Gde živiš: Beograd

Dakle , u Delphiju sam nov do kraja , i nemam ga pojma ....
Poceo sam da citam neke tutoriale i tako to ....
Ali , imam problema sa nekim stvarima , pa , reko , ako neko ima vremena da mi objasni ....


1.Ako imam neki Integer , recimo , MediaPlayer1.Position , kako mogu da ubacim da Edit1.Text ima vrednost MediaPlayer1.Position-a ? Uvek mi se zali da je Edit1.Text string , a MediaPlayer1.Position Integer , dakle , kako da taj Integer pretvorim u string ?


2.Ovo vec ne znam da li je mnogo tesko , da , recimo neki tekst editor koji napravim otvori fajl preko koga je startovan , kao Notepad , recimo Smile

I to bi bilo to za sada smešak a , kasnije cu verovatno naci josh milion problema , ali cu pokusati sam da ih resim , ova dva stvarno ne znam kako .... nigde na netu ne mogu da nadjem neki primer ... Wink

Hvala unapred



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 30 Avg 2006 12:10
Idi na vrh
offline
  • Emil Beli
  • Pridružio: 03 Jan 2005
  • Poruke: 2990
  • Gde živiš: Beograd

1. Treba ti funkcija za konverziju: IntToStr(integer), a obratno, StrToInt(String)... e sad kod ove, treba koristiti StrToIntDef(string,default_integer_vrednost_u_slucaju_greske).

2. Pogledaj ParamStr u helpu



Poslao: 30 Avg 2006 12:12
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

1. Edit1.Text := intToStr(MediaPlayer1.Position);

2. Pogledaj [Link mogu videti samo ulogovani korisnici]

Dopuna: 30 Avg 2006 13:12

Pretece me beli0135 Smile

Poslao: 30 Avg 2006 13:00
Idi na vrh
offline
  • Pridružio: 10 Avg 2006
  • Poruke: 1009
  • Gde živiš: Beograd

Hvala vam za ovo mnooogo Smile
Kao shto rekoh , pojavice mi se sigurno novi problemi Smile .....
Sad ne znam kako se poziva 'STEP' ili tako neshto event , tj hocu da se ovaj kod : Edit1.Text := intToStr(MediaPlayer1.Position); stalno pokrece , ne samo na klik nekog dugmeta ili neshto Smile Da se text tog Edit-a stalno updateuje Bebee Dol

Poslao: 30 Avg 2006 13:11
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

U editoru kliknes na tu MediaPlayer komponentu (pretpostavljam da je komponenta), pa u ObjectInspektoru otvoris karticu Events.

Pogledaj koji ti Event odgovara za refresh Edit-a, pa duplo klikni na taj event.
U Source Editoru ce da se kreira nova procedura. E, u toj proceduri upises ono sto stoji gore.

Ovo sto sam ti ispricao je generalizovano, neznam kakva je komponenta taj MediaPlayer jer je nisam nikada koristio.

Poslao: 30 Avg 2006 13:13
Idi na vrh
offline
  • Pridružio: 10 Avg 2006
  • Poruke: 1009
  • Gde živiš: Beograd

Pa , nema tamo nishta shto mi treba osim , ne znam shta je 'OnNotify' Event .....
Zar ne postoji neki step event ili tako neshto ? neki event ciji se kod pokrece u svakom stepu iznova ?

Poslao: 30 Avg 2006 13:27
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Pa mozda da postavis Timer-komponentu na formu, i da koristis njegove evente.

Poslao: 31 Avg 2006 12:45
Idi na vrh
offline
  • Pridružio: 10 Avg 2006
  • Poruke: 1009
  • Gde živiš: Beograd

da , da , super ideja Smile

Dopuna: 31 Avg 2006 13:44

Uspelo je , ali opet se javlja novi problem ......
Kada varijablu Pozicija pre nego shto je pretvorim u 'String' dodelim vrednost
Pozicija := Pozicija/1000;
Pokazuje mi greshku ..... Sad

Dopuna: 31 Avg 2006 13:45

Kao , ne moze da poredi Integer i Extended ..... ili tako neshto ....

Poslao: 31 Avg 2006 13:30
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Pa zamislis da imas Pozicija := 730, i ti probas Pozicija := Pozicija/1000, rezultat je 0.73.
Ukoliko je Pozicija deklarisana kao Integer, a 0.73 nije integer, jasno je onda zasto Pozicija ne moze da uzme tu vrednost.

Napravi novu varijablu i deklarisi je kao Extended:
Procedura xyz ; var   nova_varijabla: extended;   pozicija: integer; begin   nova_varijabla := pozicija/1000;   Edit1.Text := FloatToStr(nova_varijabla);   ... end;

Poslao: 31 Avg 2006 14:45
Idi na vrh
offline
  • Pridružio: 10 Avg 2006
  • Poruke: 1009
  • Gde živiš: Beograd

Jaooooo , koja glupost ...... Dosad sam radio samo sa jezicima koji sami odredjuju vrsu varijable i menjaju je , pa se nisam navikao ......

MyCity » Pascal -> Delphi » Novajlija u Delphiju :)

Ko je trenutno na forumu
 

Ukupno su 2600 korisnika na forumu :: 86 registrovanih, 7 sakrivenih i 2507 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 4fat, Abebe Bikila, alex1974, Banovo Brdo, Belac91, boj.an, bojank, bokisha253, boromir, borya90, boskelazo, BOXRR, cenejac111, Chainsaw, Cicumile, Cirkon, darionis, dejankm, desmeki, djboj, Djokislav, djonsule, DM1994, DonRumataEstorski, Dr.Strangelove, drimer, Džekson, Georgius, glados, Homislav, IQ116, Ir, Iskander, ivan979, JOntra, K a s p e r, Kalem, kinderpingvin, konstruktor, kybonacci, leptirleptir, lima, littlebunny, LostInSpaceandTime, Lucije Kvint, M74AB3, Manjane, Markovic, MaschinenPistole, mean_machine, mexo, miki kv, Miki01, milenko crazy north, milimoj, MiljanXD, moldway, momcilob55, MunzeKonze, nemkea71, niksa517, novator, ozzy, Panter, pein, radovanstojkov023, raster12, Rogan33, S-lash, s0ne, Sale0501, sap, sasovsky, Spreewerk, t.e.m.p.l.a.r., Tas011, Toper, tuf, Tvrtko I, vathra, vdeki, VJ, Walkers, zziko, 79693, 800077