[ buha18 @ 05.10.2011. 09:05 ] @
kako ucitati neku .wav datoteku, rascjepati je i spremiti u polja veličine npr 10kB? kako je vratiti iz toga polja natrag u jednu cjelinu? hvala |
[ buha18 @ 05.10.2011. 09:05 ] @
[ savkic @ 05.10.2011. 11:05 ] @
> kako ucitati neku .wav datoteku, rascjepati je i spremiti u polja veličine npr 10kB?
> kako je vratiti iz toga polja natrag u jednu cjelinu? Otvori datoteku preko TFileStreama, napravi i jedan TMemoryStream i redom kopiraj po 10kb u memoryStream, sačuvaj gde hoćeš (ako je to baza, potraži ranije poruke za primer) i ponovi operaciju. [ buha18 @ 05.10.2011. 15:02 ] @
hvala na odgovoru... rijesio sam pomocu
Code: BlockRead(FromF, Buffer, SizeOf(Buffer), NumRead) ; moze jos samo pomoc oko slanja i primanja podataka pomocu udp protokola? [ krle_zr @ 05.10.2011. 15:46 ] @
Moj predlog je Internet Direct (Indy), dolazi uz dosta primera, i mislim da ces moci da resis sa njim. U svakom slucaju, skini tu biblioteku i pogledaj primere.
[ buha18 @ 10.10.2011. 18:40 ] @
klijent
Code: begin x[1] := 65; Form1.IdUDPClient1.SendBuffer(x[1],1); end; server Code: begin count := AData.Size; for i:=0 to count do begin Memo1.Lines.Add(Char(buffer[i])); memo1.Lines.Add(char(65)); end; end; na strani servera mi ne prikaze znak 'A', vec nesto cudno. zasto? sve se izvodi na jednom racunalu. [ savkic @ 11.10.2011. 00:14 ] @
> na strani servera mi ne prikaze znak 'A', vec nesto cudno. zasto?
Ne vidi se kod za prijem, šta je buffer i slično. U samom primeru rekao bih da ti nedostaje - 1 u petlji: for i :=0 to count - 1 do [ buha18 @ 11.10.2011. 19:27 ] @
opet ja... :)
Code: UDPKlijent = Class(TidUDPClient) private kasnjenje:integer;//u ms gubitak:integer; // u postocima public //procedure posalji(const dad:datagram); constructor Create(const kas, gub:integer); end; ..... constructor UDPKlijent.Create(const kas, gub:integer); begin kasnjenje:=kas; gubitak:=gub; Host:='127.0.0.1'; Port:=10001; end; ... var a:UDPKlijent; b:byte; begin a:=UDPKlijent.Create(10,10); a.Send('bla'); end; kako kreirati objekt udpklijent da mogu koristiti metode nasljedene klase? Copyright (C) 2001-2024 by www.elitesecurity.org. All rights reserved.
|