Problem mit Stream und BCB Sockets

SP

Hallo,
ich hab hier einen Code der eine Exeption verursacht:

//--------------------------------------------------------------------------- 
void __fastcall TForm1::Button1Click(TObject *Sender) 
{ 
ClientSocket1->Active = false; 
ServerSocket1->Active = false; 
ServerSocket1->Port = 80; 
ServerSocket1->Active = true; 
ClientSocket1->Port = 80; 
ClientSocket1->Host = "127.0.0.1"; 
ClientSocket1->Active = true; 
TStream* derstream; 
Image1->Picture->Bitmap->SaveToStream(derstream); 
ClientSocket1->Socket->SendStream(derstream); 
} 
//--------------------------------------------------------------------------- 

void __fastcall TForm1::ServerSocket1ClientRead(TObject *Sender, 
      TCustomWinSocket *Socket) 
{ 
TStream* derstream; 
Socket->ReceiveBuf(derstream,Socket->ReceiveLength()); 
Image2->Picture->Bitmap->LoadFromStream(derstream); 
} 
//---------------------------------------------------------------------------

Muss ich mit den Streams noch irgendwas machen ?

Jansen

Nächstes mal die genaue Fehlermeldung mit angeben und die Stelle im Code markieren, an der sie auftritt.
Mit new Speicher für das Stream-Objekt reservieren (und zum Schluss per delete wieder freigeben).
Ein C++-Grundlagenbuch oder -tutorial durcharbeiten.