Novajlija u Delphiju :)

2

Novajlija u Delphiju :)

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.
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.



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.

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 ?

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...

offline
  • Emil Beli
  • Pridružio: 03 Jan 2005
  • Poruke: 2990
  • Gde živiš: Beograd

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

Ko je trenutno na forumu
 

Ukupno su 885 korisnika na forumu :: 13 registrovanih, 2 sakrivenih i 870 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: brundo65, draggan, ILGromovnik, Kenanjoz, Koridor, Krvava Devetka, opt1, pacika, saputnik plavetnila, sasa76, stalja, TBF1D, šumar bk2