24.09.2012, 23:01
|
|
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
Куда уж конкретнее.
Код:
I := Length(St);
BlockWrite(F, I, SizeOf(I));
BlockWrite(F, St, Length(St));
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
|