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

Novajlija u Delphiju :)

Napisano na dan: 30.8.2006
2

Novajlija u Delphiju :)
Pagination Prethodna strana

Idi na vrh

Poslao: 08 Sep 2006 18:53
Idi na vrh
offline
  • igor86  Male
  • Stručni saradnik
    Web programiranje
  • Pridružio: 24 Maj 2006
  • Poruke: 1633

Možeš jednostavno staviti trackbar, i kad klikneš na play staviš (trackbar.max:=mediaplayer1.length (valjda je tako) div 100)
A za trackbar event on change mediaplayer.position:=trackbar.pos*100.

I eventualno ako hoćes (da ti ne sjecka pjesma) na trackbar event mouse down aktiviras mediaplayer.pause i neki novi timer koji radi mediaplayer.position:=trackbar.pos*100, a za trackbar event mouse up timer.enabled:=false;mediaplayer.play (ili pause, nisam siguran).

Nadam se da si shavtio suštinu!



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 08 Sep 2006 20:27
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

@igor86
Nisi skontao problem, njemu treba da cita poziciju playera, ne da je postavlja.



Poslao: 11 Sep 2006 01:58
Idi na vrh
offline
  • igor86  Male
  • Stručni saradnik
    Web programiranje
  • Pridružio: 24 Maj 2006
  • Poruke: 1633

Pa mislim da je uočljivo da kada ideš klik na mediaplayer-play (trackbar.max:=mediaplayer.length div 100), a u timer koji vrti svaku sekundu, ili pola, staviš trackbar.pos:=mediaplayer.pos div 100).

Inače radi informacije operacija '/' nije dozvoljena nad integer promjenljivim, a varijabla mediaplayer.position i lenght je tipa integer, i predstavlja vrijeme u milisekundama.

Poslao: 25 Sep 2006 23:05
Idi na vrh
offline
  • Pridružio: 10 Avg 2006
  • Poruke: 1009
  • Gde živiš: Beograd

Evo mene josh malko da smaram , ali , shta cu , ne mogu sam da naucim Smile
Problem je sledeci :

Imam Memo1 . i , primer njenog teksta :

================================================
<<<<<<< >>>>>>>>
================================================

E , i sad zelim da na klik nekog dugmeta (nebitno) ubacim tekst 'zzlz' tamo gde mi stoji kursor , ja sa komandom AddLines stalno dobijem na kraju teksta to Razz , jel zna neko da li je moguce to uraditi ?

Poslao: 01 Okt 2006 12:28
Idi na vrh
offline
  • Pridružio: 07 Okt 2005
  • Poruke: 81

TCustomMemo kontrola u Component Library For Cross Platform (CLX) biblioteci sadrzi metodu Insert koju mozes da iskoristis da bi ubacio tekst na poziciji caret-a (odnosno kursora kako ga mi zovemo) u memo kontroli. Za detaljniji opis potrazi TCustomMemo kontrolu u help meniju ali ne iz VCL biblioteke vec iz CLX i potrazi metodu Insert.

Ako pak iz nekog jednostavnog razlog ne zelis da koristis CLX biblioteku onda ne mogu se setiti nijednog drugog nacina osim CopyToClipboard i PasteFromClipboard metoda...

Poslao: 01 Okt 2006 16:22
Idi na vrh
offline
  • Emil Beli
  • Pridružio: 03 Jan 2005
  • Poruke: 2990
  • Gde živiš: Beograd

Moguce... pogledaj u helpu sve oko "caret", caretpos, sellength itd

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

Ko je trenutno na forumu
 

Ukupno su 757 korisnika na forumu :: 60 registrovanih, 4 sakrivenih i 693 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: Aleksa 3215, Andrija357, batana, Betty25, Bob.Rock, cafa0412, d.arsenal321, Desmond, Dixtrix, djordjemiklusev, DJUNTA, DragoslavS, Duh sa sekirom, duro1990duro, dusanobr, Dusko_Dugousko, gasazem, Grah0, Haris, Hemi, Ivan Campo, Ivan Germanovic, ivan1973, Jomini, K a s p e r, kaput21, KizJ, koom0001, krkalon, Krusarac, larix, Levi, max power, Metanoja, morava_01, N.e.m.a.nj.a., nenooo, Ns1975, ObelixSRB, pein, Petar888, ping15, Prečanin30, sasics, SIG SG550, Solunac na steroidima, Spila 0405, Stanislav1970, Stanlio, stefan95, Stevan Visoki, Stoilkovic, Topaz9, trutcina, vaso1, VladaKG1980, volimpivuvolimrakiju, vuksa72, zajcev1, Zdilar