tgglite - problem z obrazkami

WItam
Nie działa mi zapisywanie przesyłanego obrazka
Oto kod:

procedure TForm1.GG1RecvImage(Sender: TObject; ImageSize, ImageCRC32,
ImageFrom: Integer; ImageBody: TMemoryStream);
begin
deleteFile(ExtractFilePath(application.ExeName)+'obrazek.jpg');
ImageBody.SaveToFile(ExtractFilePath(application.ExeName)+'obrazek.jpg');
Application.MessageBox(pchar('Obrazek zapisano w:'+ExtractFilePath(application.ExeName)),'lol',0);

end;

Wysyłam obrazek przez mirande,a mimo tego nie wyświetla nawet komunikatu...
Co robię źle?
Wielkość grafiki mam ustawioną na 255 KB

Z góry dziekuję za odpowiedź

Może to zdarzenie się w ogóle nie wykonuje.. może coś jest nie tak z samym komponentem - skontaktuj się z autorem.