[angvelem]

Такие строчки радуют:

Код:

stream.Write(w,SizeOf(w));  

stream.Read(w,SizeOf(w));  

записать 4 байта, прочитать 4 байта - здорово.

...хотя qwe.my существует

разве нельзя использовать функцию FileExists перед открытием?