Manejo enteros tipo short con TFileStream

[elcaracas]

Hola, necesito leer y luego escribir números enteros tipo short en un fichero binario.
lo hago mediante:

short a[1];
if (OpenDialog1->Execute())
{
TFileStream *F = new TFileStream(OpenDialog1->FileName, fmOpenRead);
F->ReadBuffer(a,2);
}

pero si el primer caracter tiene el valor 60 (valor hexadecimal) y el segundo D4, por ejemplo, en vez de leerme 0x60D4 (número de 16-bits) me lee 0xD460,

¿Cómo puedo leer correctamente esto?
¿álguien puede ayudarme?

Un saludo.

Joaquín