Ako sam te dobro shvatio, za konverziju iz klijentskih u ekranske koordinate možeš koristiti ClientToScreen.

Bravo, sve 4 koordinate konvertujem, i onda bilo maximizirano, ili bilo koja velicina, i rezolucija..radi uvek..Hvala ti !

Imam jos neka pitanja!

1. Da li moze nekako da se namesti da se pusti bilo koji video, tj da se nekako 'procitaju' kodeci koji su instalirani, ili mogu samo formati za koje win ima vec kodeke...npr jedan avi video radi, dok drugi ili ne otvori lepo, ili bude sve onako ubrzano...

2. Kada se crta nesto po Canvasu, ako se minimizira prozor, i maximizira posle, nacrtanog vise nema, kako to da namestim da uvek bude?

_{[Ovu poruku je menjao blackholemix dana 10.11.2008. u 13:09 GMT+1]}

O tome je vec pisano na forumu.
Pretrazi malo forum.

> 2. Kada se crta nesto po Canvasu, ako se minimizira prozor, i maximizira posle, nacrtanog vise nema, kako to da namestim da uvek bude?

Canvas ne pamti sadržaj, on predstavlja platno prozora po kome se crta kada prozor treba da prikaže svoj sadržaj. Sadržaj prozora se može i repejntovati i više hiljada puta u sekundi, a ne mora ni jednom, o tome brine Windows. Ako želiš stalan sadržaj moraš ga iscrtavati svaki put kada windows to zatraži (pogledaj OnPaint događaj forme) ili možeš crtati po nekom objektu koji pamti (na primer TImage).

Kada povezem MediaPlayer sa Panelom, mogu li nekako da pristupim pixelu sa panela, tj da procitam boju..?

Možeš ali mislim da MP ne koristi Panelov context već ima svoj, tako da ti treba njegov context (ako koristi klasični HDC). Možeš koristiti GetPixel API funkciju ako imaš HDC, a ako ne, onda iskoristi capturovanu sliku i pročitaj iz nje.

Pravim program za vadjenje titlova iz tv ripa, tj da uzme vremena i uradi capture, ali naisao sam na jedan meni :) zeznutiji problem. Uradio sam sledece:

Pomocu Timera provera stalno sledece prodje kroz linije koje su prikazane na slici, i proveri da li je pixel 'bele' boje, ako jeste broji koliko je tako narednih, i ako je npr manje od 5 onda to zapamti, jer svako slovo nije deblje od 5 pixela, ovo sam ovako uradio, jer moze da se dogodi, da ima dosta bele boje, pa morao sam to nekako da odbacim, sa ovim uslovom da to mora biti 'usko' gledano vertikalno..kada se pojavi titl on bez problema detektuje, jer nadje tih 40-80 belih delica, a kada nema titla ima ih 0-3,4 ..E sada da predjem sta je prob, posto na TVu titlovi traju dugu, onda se dogodi da npr jedan titl se zavrsava na odredjenom frejmu a na sledecem odmah pocinje drugi titl !!! Znaci NEMA izmedju praznine, i program ne moze da skapira da se titl zavrsio a drugi poceo..

Onda mi je palo na pamet da mogu da pratim kolika je razlika tih belih delica, pa ako tipa odjednom se 'smanji ili doda' 10-ak tih delica to znaci da se titl promenio, ali problem je kada su i stari i novi titl priblizne duzine, imaju skoro isti broj slova i onda npr jedan ima 55 a drugi 54 ta bela delica...

Kako taj deo da resim, kada dodje odmah na sledecem frejmu novi titl, skoro iste duzine???

Ne morate nikakav kod da pisete, dovoljno je da mi idejno pomognete, s tim da uzmete u obzir brzinu!!! Tj da ne bude previse komplikovano, jer frejm kratko traje i mora dosta cesto da proverava! Imam ja ideje kako to da resim, ali to ce jos dosta sve da uspori, pa ne moze tako..

Hvala Vam





_{[Ovu poruku je menjao blackholemix dana 14.11.2008. u 01:15 GMT+1]}

Pokusaj da uporedis slike dva capturovana dela ekrana sa titlovima, ako je različit titl onda će se i slike razlikovati.

Hvala, ali ipak za toliko sam inteligentan : )) Razmisljao sam o tome, to bi radilo, kada bi sve bilo nekako u nizu..tj kada bi se svaki frejm filma 'malko menjao' ali ovako, kao sto se titl pojavi odmah na sledecem frejmu, tako se odmah i nesto drugo pojavi na sledecem frejmu, i ako koristim taj kriterijum onda ce on tu da napravi titl, a titl nije promenjen nego se pozadina promenila..tako da ipak ne moze to!!!

Jedino, da nekako, vidi gde su ti 'beli delovi' pa da onda uporedi njihov polozaj..ja mislim da jedino tako moze...npr da uzme 10 pixela na raznim mestima, i onda od svakog pixela ide npr na desnu stranu i broji koliko treba pixela do 'belog dela' tj slova i onda uporedi ta rastojanja, s tim sto moze da se se dogodi da opet MOZDA pozadina u nekom slucaju koji se dogodi 1/100000 :) zezne, e zato bih to uradio ovako, za 10 pixela da npr 7-8 mora da bude indenticno, ako je toliko, onda je titl isti, ako je manje od 2-3 onda se titl promenio..

Aj razmisli o ovome, trebalo bi da radi...ako imas malko bolji nacin, reci mi, jer su ovde i nijanse bitne :) poz

Ako je boja titla uvek bela a okvir crni, filtiraj capturovane slike tako da ostane samo bela i crna i onda uporedi. Dozvoli neko odstupanje zbog mogućnosti da delovi pozadine budu beli. Da li ti radiš OCR slike titla? Ako da onda jednostavn pusti OCR engine pa uporedi vraćene rezultate.

Pa nije bela bas, otprilike je ovako, debljina je oko 3-4pixela, onaj sredisnji on je beo cak mislim da je bas 255,255,255, a ovi krajnji oni nisu nacisto..oni su tipa 231,235,230...naravno mislim na RGB. Ja sam to probao, tj hteo sam da mi uradi samo capture titla, a onda da to procitam sa abbyy 9.0 posto je prejak, jos npr ako mu podesis malo neke stvari, i uradim contrast povecam nekoliko puta, i osvetljenje smanjim, onda se dobije onako beo titl, tj vise uradi na pozadini da bude crna! To bi moglo u nekom programu i sa avi fajlom, da ne komplikujem to po delphi-ju a i ne znam kako da napravim! a sto se tice OCRa nisam neki expert oko toga, a voleo bih kada bih znao vise, i ako moze to nekako da se radi u delphiju..ali ipak mislim da kako god dobro to napravio ja ili neko, da je ipak abbyy nezmenljiv, jer ima oooogromnu OCR bazu, cita latinicu cirilicu..sve zivo..

Sad bas pogledas sta ima na forumu oko OCRa i uporedjivanja slika, nista posebno novo da saznam, naucim, sve poznato i sve sto ne koristi puno ovde..:)

_{[Ovu poruku je menjao blackholemix dana 14.11.2008. u 20:31 GMT+1]}

> Pa nije bela bas, otprilike je ovako, debljina je oko 3-4pixela, onaj sredisnji on je beo cak mislim da je bas 255,255,255, a ovi krajnji
> oni nisu nacisto..oni su tipa 231,235,230...naravno mislim na RGB

Onda je još lakše, znači tražiš oblasti bele uokvirene sa RGB oblastima 231,235,230, dodatno olakšanje je i ako su dimenzije titla (veličina fonta) uvek iste. Znači možeš te oblasti prepoznati, ostale pretvoriti u crno i onda uporediti dve slike da vidiš ima li promena u titlu i posle pustiit kroz OCR. Ili još bolje verovatno je iz takve slike moguće izdvojiti pojedina slova, i onda ih uporediti sa napravljenom listom svih mogućih slova dok se ne nađe poklapanje, tada ti i ne treba klasični OCR.

Ovo poslednje nisam razumeo, da li si već rešio prepoznavanje teksta iz frejma ili za sada samo snimaš capturovane slike koje ćeš kasnije propustiti kroz Abbyy engine? Naravno Abbyy je van svake konkurencije, pretpostavljam da oni nude engine u obliku activeX kontrole ili dlla, ali sigurno i adekvatno košta. Koliko znam postoje pristojna OCR rešenja za Delphi ili C++ (koja se mogu koristiti iz Delphia) za razumne iznose, ali doista je pitanje kako se snalaze sa prepoznavanjem dijakritika i ćirilice.

Mislim da si me razumeo, ali ne bas totalno! Taj RGB sto sam naveo, nije on bas fixan, to sam izvadio, nekoliko tacaka, pa video da se otprilike tu negde vrti.. jer text je uokviren onim transparentnim crnim pravougaonikom, tako da to zavisi malo i od pozadine, a i bice neki rip gde nema tog okvira..

E sada to za oblasti, ne znam kako si to mislio 'trazis oblasti' da li da se napravi neka funkcija ili tako nesto ili imaju vec neke? Ako mozes pojasni mi ukratko to..I kako mislis da te oblasti prepoznam, da se prodje svaki pixel ili? I kako ostatak da pretvoris u crno?

Font je isti, mislim ima razlicitih, ali uvek je za jednu seriju, cak skoro i teleiziju isti font, ali dobro to moze da se steluje, tj da se da programu kolika je visina slova i debljina...ako na to mislis..

Ovo sto si rekao da ne treba OCR, to ti nije losa ideja, mogao bi za jedan font da se izvuce lista, i da uporedjuje, ali to necu sada da pravim, sada mi je najbitnije to za uporedjivanje titla...A kasnije mozda budem pravio neki svoj 'OCR'

Sto se tice abbyy, nisam napravio prepoznavanje, super mi je da samo uradi capture, to mi je i vise nego dovoljno, i onda ce to abbyy da prepozna, i on slozi taj text bas kako mi odgovara, i onda lako tu posle ubacujem vremena u tako nesto. To sam sredio...

E sad samo jos jedna napomena! posto se broj frejmova krece 20-30, mislim to je uobicajeno..ima i 15 a i 60, ali nema tih fajlova..sto znaci da trajanjee 1 frejma iznosi 0.050-0.033sec tako da ako ako se npr titl zavrsava na 123 frejmu, 124 je prazan, a 125 pocinje novi, ja moram 124 da 'detektujem' tj Interval na Tajmeru mora biti manji od 32, dovoljno je 30! Ovo pricam jer mislim da to nije zanemarljivo toliko, tj procesor ce imati dobrog posla! jer vidim da kod mene koristi 50%, a brz je procesor..on svake sekunde mora da uradi tih 30 provera, tako da ako si mislio to oko prebacivanja u crno, detektovanja povrsi i sl...uzmi u obzir da ne sme to da zahteva puno operacija!! A i po meni dovoljno je da se u gornjem redu provere, 2 slova a donjem npr 4..znaci ne mora ceo red, nema potrebe..

> E sada to za oblasti, ne znam kako si to mislio 'trazis oblasti' da li da se napravi neka funkcija ili tako nesto ili imaju vec neke? Ako mozes pojasni
> mi ukratko to..I kako mislis da te oblasti prepoznam, da se prodje svaki pixel ili? I kako ostatak da pretvoris u crno?

Što se tiče gotovih funkcija/algoritama postoje, to je oblast OCR, ja ih nisam koristio pa smišljam algoritam u hodu, ti svakako prouči po netu šta se može naći.
Ja bih počeo tako što bih odredio oblast ekrana na kome se nalazi titl (verovatno u donjem delu) tako da se kasnija detekcija fokusira na taj deo, čime se sve ubrzava. Kada dobiješ sliku sve tretiraš sa belim filterom (samo bela boja ostaje, sve ostalo postoje crno), ako se dobro sećam za to se može koristiti BitBlt (a svakako pogledaj i Graphic32, možda i tu ima gotovih rešenja). Ako tebi samo treba prepoznavanje promene titla, onda ne moraš detaljno analizirati sliku tražeći slovne oblike. Recimo uporediš trenutnu sliku sa slikom prethodnog titla ako postoje odstupanja možeš pretpostaviti da je slika promenjena (po potrebi možeš ući u dublju analizu).

> Font je isti, mislim ima razlicitih, ali uvek je za jednu seriju, cak skoro i teleiziju isti font, ali dobro to moze da se steluje, tj da se
> da programu kolika je visina slova i debljina...ako na to mislis..
> Ovo sto si rekao da ne treba OCR, to ti nije losa ideja, mogao bi za jedan font da se izvuce lista, i da uporedjuje, ali to necu sada da pravim,
> sada mi je najbitnije to za uporedjivanje titla...A kasnije mozda budem pravio neki svoj 'OCR'

Ako unapred znaš tačan font koji se koristi onda recimo možeš napraviti pathove (pogledaj u MSDNu, BeginPath, EndPath i primere) svih slovnih oblika, detektovati na slici gde počinje prvi veći beli deo, primeniti sliku na prvi sačuvani path pa ako je čitav path popunjen, imaš prepoznato slovo.

> Ovo pricam jer mislim da to nije zanemarljivo toliko, tj procesor ce imati dobrog posla! jer vidim da kod mene koristi 50%, a brz
> je procesor..on svake sekunde mora da uradi tih 30 provera, tako da ako si mislio to oko prebacivanja u crno,

Samo treba da nađeš dobar algoritam za prepoznavanje i da se ograničiš na što manju oblast, CPU opterećenje ne bi trebalo da prelazi 1%.

Odgovoricu ti opsirnije na ovo...ali sada samo kratko..

Naravno da sam uzimao deo samo, GetDC(0) to sam koristio i posle Rect podesim da uzme samo deo taj...nego kada ucitam wmv fajl nece da uradi capture, tj bude nacisto sve crno, znas li zasto?

Imas mnogo bolje komponente za pustanje video fajlova koje bez probema reprodukuju i video sa datim kodecima, a vracaju Frejm po izboru bez problema.
Recimo DSPAck.

_{[Ovu poruku je menjao Milan Milosevic dana 16.11.2008. u 11:50 GMT+1]}

E pa bas si mi puno pomogao :) ja sam vec skinuo DSPack 2.34, ali sta sve da radim sa onim fajlovima, i kako to da podesim? ubacim te komponente?

AKo mozes objasni to malo...

Instaliraj komponente i imas primere odakle ces sve da vidis, nije tesko.

OK, vidim ima Demos, ali kada otvaram kaze da nije pronadjena klasa tj komponenta..znaci to moram prvo da ubacim imam onaj folder

packages i src, mislim da bih odatle to trebao da uradim? sta treba prvo package? ili src? package kaze da nije dobra extenzija, tj kada idem na install packages pa add trazi nesto drugo, a instal component to moze tamo iz src otvorim one pas...ali tu isto za neke prijavi greske, kojim redom treba da idem?

Nije valjda da neznas kako da instaliras koponente u delphiju, a zelis da napravis tako kompleksan algoritam.
Ovako, ja mislim da je najbolje resiti problem, mada ste vi vec ponudili takvo resenje.
Znamo da odredeni titl ostaje neko vreme na ekranu da bi mogao da se procita naravno.
Dakle treba samo uporedivati frejmove.
Oni pikseli koji se ne menjaju dugo su najcesce ili titlovi ili neka oznaka za dati kanal sve ostalo bi trebalo da se menja makar malo (naravno to za ctane filmove ne vazi)
Dakle tvoj poso bi se ogledao u tome da izdvajas delove koji se odredeno vremene ne menjaju
da eliminises oznake i slicno ,nesto sto nije sigurno titl.
Da zapisujes vreme promena u odnosu na pocetak filma
da te delove obojis recimo crno i da ih nalepis na belu pozadinu.
Kad to odradis tako dobijenu sliku propustis kroz neki OCR program i odprilike je to to.

Prvi put sam uzeo to sada da radim, nije mi ranije nikada ni trebalo niti sam se bas preterano bavio programiranjem konstantno, a i bez tog znanja, i citanja neke literature video sam da ima install component, onda otvoris pas fajl, kompajliras on to napravi i to je to, ako sam u pravu..ako ne blizu sam! :) A problem je bio sto kada sam ja iz DCPacka otvarao neke nece da napravi, i to je najverovatnije jer treba prvo da se ubace oni dll-ovi vezani za DirectX posto sam video da pise da treba da se skinu sa neta, i prekopiraju i system32 ili win folder...e zbog tih gresaka, i tako jos nekih stvari koje muce, zato sam te lepo pitao kojim redosledom sta treba da se uradi, ako si vec radio da mi kazes...

A to kako se nesto masinski radi, i algoritam to nema nikakve veze, da bi napravio algoritam treba da imas dobar nacin razmisljanja, a to se tesko uci, skoro da i ne mozes da naucis..! A to da se npr TButton nalazi na Standard paleti i da se klikne na njega, i posle na formu i tako se postavlja to je nesto sto i mala beba moze da nauci, tako isto moze i kako se instalira komponenta!

To sto kazes da se najmanje titl menja, tj te oblasti najduze ostaju iste, i da se znak ne menja, a da se sve ostalo malo menja to je tacno, a znak ne moze ni za sta da sluzi jer je stalno isti, ali dobro, tacno je sve sto si rekao.. !! A to kako ti savetujes da pravim, odmah mozes da vidis da je losije od onoga sto sam ja rekao, jer da bi pretrazio oblasti moras skoro sve pixele da 'pregledas' ako je titl sirine 400 i visine 100 to je 40 000 pixela ajde neka bude da pomocu tvog algoritma treba 20 000, a pomocu mog prodje samo kroz dve linije, cak moze i kroz samo jednu, jer je titl uvek dole a ponekad i gore, sto znaci ja pregledam 300-800 pixela a ti 20 000.

Moj prob je samo bio kada se titl nastavlja, jedan na drugi, a nema praznine, ali i to znam kako moze da se resi isto proverom samo 50-100 pixela!!!

Dakle jos mi treba samo da mogu bilo koji da otvorim, tj da vidim sta sve ima u onim komponentama...i ako hoces pomozi mi oko toga! ? !

Nema potrebe da stalno pratim vreme od pocetka titla, jer kada uradim capture 26206-og frejma samo cu za njega izracunati vreme vrlo prosto, ako je 25fps

26206/25 je vreme u sekundama kada je titl izasao, tako da ovako je brze i bolje! OCR mi za sada ne treba, jer tu hocu da koristim abbyy za sada jer super cita, i ne treba mi da se menjaju boje, niti bilo sta, (barem za sada) jer imam neki dobar nacin kako to za 5sec sredim!

Dakle treba mi sam pomoc oko DCpack-a, ako moze...Hvala

EDIT: savkic: Uklonio sam delove poruke kojima nije mesto u tehničkoj diskusiji i zamolio bih da nastavak bude bez nepotrebnih komentara.

_{[Ovu poruku je menjao savkic dana 16.11.2008. u 23:09 GMT+1]}

Neznam stvarno gde je problem kod instalacije. ja sam instalirao kod mene bez vecih problema.
Ove komponente koriste DirectX mada neverujem da je tu problem.
Koju verziju dephija imas. mozda si probao da instaliras za neku drugu verziju,
Bese ako imas 2007 ili ovu novu,treba da se nesto ispravlja. Potrazi na netu ima uputstvo barem za 2007.
Odmah mogu da ti kazem da tvoja ideja u startu nije dobra.
Prosto tako kako ti mislis ne moze da se napravi iz jednog prostog razloga jer nekad moze da se dogodi da titl ima 2 nekad 3 linije ili crni okvir a da se boja pozadine poklopi sa bojom tita.
Ovo sto sam ja predlozio nije puno posla. lakse je da se napravi, narvno pod uslovom da ne koristis standardnu funkciju canvasa getpiksel jer je beskrajno spora. Imas na netu mnogo mnogo brzih funkcija, ajd ako stignem danas ja cu da ti napravim jednu beskrajno brzu ukoliko se sam ne snades.
I ne moras da analiziras ceo frejm , vec samo region gde se pojavljuju titlovi i sigurno izvacis cela slova sa kojima je kasnije mnogo lakse baratati.


_{[Ovu poruku je menjao Milan Milosevic dana 17.11.2008. u 08:14 GMT+1]}

Evo uputstvo za delphi 2007

File open...
odaberemo iz Files of type Delphi package (*.dpk,*.dpkw)
odaberemo
DirectX9_D2006
DSPack_D2006
DSPackDesing_D2006
Desni klik u project menageru na svaki od ova tri paketa pa compile
Na kraju na DSPackDesing_D2006 , onda install
i to bi trebalo da radi, ako imas odgovarajucu verziju DSPack 2006

E super, ovakvog sam Milana zeleo : )) Veruj mi da je ovo dobro, i titlove nisi dovoljno proucavao, ja na jednom sajtu sa ljudima radim prevode, tako da...ovo nisi zapazio (mozda)

na TVu, ako ima samo jedan red stavi se na dno, ako ima dva, onda ide gore, iznad prvog, i sve tako, 3 da ima to je nemoguce, nikada nisam video, ALI i da ima nema veze, dovoljno je dole samo da gledas taj red na dnu, jer ako njega ima, titla SIGURNO ima, ako njega nema, NEMA ni titla!!! Tako da to moze samo da se svede na taj red, ali ajde ja sam uzeo oba za svaki slucaj! A to za boju pozadine nece raditi u jednom slucaju a to je kada je pozadina cela iza titla, iste boje kao titl, zar mislis da ces ti tada videti titl? :) tako da ovo uvek radi ! Ne znam da li si dobro procitao ali on ne trazi samo koliko ima belih pixela nego jos nesto radi..drugo i da se neki deo titla poklopi sa bojom koja je slicna titlu, ili skoro ista, to je samo deo a njemu je dovoljno da nadje jednu rec! cak sta vise, ne mora biti rec cela, moze da bude u pozadini bele boje, jer dovoljno je da ima npr 5-10 slova! znaci moze da ima titl 2 reda, i 12 slova, da svuda bude bela boja, samo neka slova da se vide, i on ce to detektovati da je titl nez problema! titlovi na TVu uvek imaju mnooogo reci da bi stigli da procitaju i oni od 7god a i od 40! A to za belo, imam jedan rip, beo je titl, a iza su bele uniforme, i kada dodje titl preko toga, neki deo titla, normalno radi !! Tako da nije mi jasno kako ti mislis da to nece raditi?

e sad oko DSPAcka ja sam skidao sa progdigy-ja DSPack - 2.3.4, i u njemu ima D5 D6 D7, ako se ne varam to je Delphi 5 6 7 :) Imam D7, a imam i 2009!

2009 prijvaljuje u dva package-a po 1 gresku a u jednom 8 ! Ne znam tacno koliko je u kom, nije ni bitno..a D7

DirectX9 bez greske kompajlira

a ona sledeca dva odmah na pocetku stane kod prvog reda a to je " {$I jedi.inc} " a to ne kapiram sta ne valja...samo da napomenem da DirectX9 paket ima u sebi jedi.inc, i da ceo taj paket normalno kompajlira!

sta ti mislis da ne valja? I ako si imas link ili tu verziju koja radi, daj...

Hvala Ti

Bilo je zabune. evo pravog linka
http://wonderu.com/download/DSPack2006.rar

Skinuo sam, probao sa 2009 nece, probao sam u njemu 2006, a u D7 sam probao i 2006 i D7 i ovo je prov, ova JEDI.INC

Jedi.inc je include file JCL (JEDI) bibilioteke možeš je skinuti sa sourceforgea.

Imas je u direktorijumu DirectX9
probaj rucno da ubacis path do nje

Bravo Milane, hvala ti !!! Nije dovoljno bilo da kompajliras JEDI, samo sam prekopirao u isti folder gde su paketi, sve kompajlirao, design instalirao i to je to

jeeeeeeeeeeeeeeeeeeeeeeee :)

Jos samo da vidim sta sve ove komponente mogu i umeju :))

Ali na zalost samo za D7 ali nema veze..mozda ce uskoro neko to srediti i za 2009..Nego imam jedno tehnicko pitanje, jako me nervira kada mi to ne radi, a NE znam zasto to ponekad prestane da radi, to mi se i ranije neki put desavalo, kad pisem, i pritisnem ctrl+space onda on izbaci ono sta sve moze..e to nece da mi radi od juce..u cemu je tu fazon?

Milane, bolje da mi nisi pomogao!!! Ovo je kao kada bi se sada nasao u nekoj super naprednoj civilizaciji u svemiru :), ovde sve sto covek pozeli ima, i necu se odvajati dok sve ne isprobam sta moze : ))

Hvala Ti !!

Da, u pravu si. Media player i ovo deli evolucija od najmanje 1 000 000 godina.
U principu nema potrebe previse da gubis vreme. Ove koponente ti odraduju samo onaj poso vezan za dekodiranje video strima. Ovde ti treba samo dve stvari, a to je posicion imas ga kao property komponente FilterGraph, a druga stvar je da izvuces sliku iz videa. Ostalo je i dalje na tebi.
Ziveo Delphi , ziveo OOP !!!