Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Вниз

Проблема Blockwrite   Найти похожие ветки 

 
CanBlow   (2003-02-19 10:32) [0]

Не удаётся записать BlockWrite"ом запись в файл. Код простой. Посмотрите,пожалуйста!
type
TResFile = record
Name:String[255];
Size:integer;
Debug:boolean;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
f:file;
Rfile:TResFile;
begin
assignfile(f,"tmp.bin");
rewrite(f);
rFile.Name:="Fuck";
rFile.Size:=10;
rFile.Debug:=true;
blockwrite(f,RFile,sizeof(rFile));
closefile(f);
end;


 
MBo   (2003-02-19 10:34) [1]

Дельфи не будет писать такое rFile.Name


 
CanBlow   (2003-02-19 10:37) [2]

To MBo
А почему он не будет писать такое? Как сделать по-другому?


 
icWasya   (2003-02-19 10:38) [3]

вместо
rewrite(f);
пиши
rewrite(f,1);



 
CanBlow   (2003-02-19 10:41) [4]

To icWasya
Thank! TEMA IS CLOSED!



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.55 MB
Время: 0.038 c
3-5446
StenKz
2003-02-13 15:23
2003.03.03
Как сделать, чтобы внесённые изменения не кэшировались...


6-5687
Oxy
2003-01-13 15:23
2003.03.03
Как создать подключение без диалога?


14-5772
professor
2003-02-16 20:10
2003.03.03
Обучение


7-5871
Senka
2002-10-18 19:49
2003.03.03
Принтер (Help)


14-5797
Игорь Шевченко
2003-02-11 09:27
2003.03.03
С днем рождения, Александр aka Внук!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский