Hi,
ich habe eine Frage zum Thema TMemorystream!
Wie kann ich einen Pointer in einen Stream schreiben und wieder auslesen?
Das Programm soll später über das netzwerk Sound versenden nur weiss ich nit wie ich das mit den Streams mache!
Bitte um Hilfe!
Delphi-Quellcode:
procedure TForm1.ACMWaveIn1Data(data: Pointer; size: Integer);
VAR Stream:TMemorystream;
Speicher:Pointer;
Grösse:Integer;
begin
Stream:=TMemorystream.Create;
// In diesem Bereich muss etwas falsch sein
Stream.WriteBuffer(Data,Size);
Stream.Position:=0;
Stream.ReadBuffer(Speicher,Grösse);
//
ACMWaveOut1.PlayBack(Speicher,Grösse);
end;
@wardz