Delphi alatt, streamből beolvastam egy mp3-at. A kérdés, hogy lehetne egy gomb segítségével adott helyre kiírni a zenét?

var fajl:TFilestream;

begin

fajl := TFileStream.Create('hely\nev.mp3',fmCreate);

fajl.CopyFrom( x, x.size );

fajl.Free;

end;

Itt x az amit te megnyitottál, kiolvastál. Kicsit átirhatod delphisebbre, ez igy lazarus-os :P

Megint én.

x.position := 0;

Az elejére, hogy elkerüld az esetleges hibákat.

Esetlegesen használhatsz egy puffert is, hogy gyorsabb legyen.

Amúgy milyen programot készitesz? :P