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

Вниз

Как загрузить и сохранить значения переменных из файла в файл?   Найти похожие ветки 

 
Anton   (2004-02-17 11:46) [0]

ПОМОГИТЕ PLEASE!!!


 
Тимохов   (2004-02-17 11:48) [1]

Примером, аль советом?

Если второе, то метдов до фига. Воспользуйся TFileStream, например.


 
Семен Сорокин   (2004-02-17 11:51) [2]

TIniFile + F1


 
Anton   (2004-02-17 12:07) [3]

Примером!!!
TFileStream а как этим пользоваться?


 
Palladin   (2004-02-17 12:10) [4]

Попой об косяк.
Справку открой да почитай. Неужели это трудоно?


 
olookin   (2004-02-17 12:12) [5]

//пишем
var f: TFilestream;
d: double;
begin
f:=TFileStream.Create(FileName,fmCreate);
f.Write(d,Sizeof(double));
f.Free;
//ух-ты, на диске появился файл с именем FileName
end;

//читаем
var f: TFilestream;
d: double;
begin
f:=TFileStream.Create(FileName,fmOpenRead);
f.Read(d,Sizeof(double));
f.Free;
showmessage(floattostr(d));
//ух-ты, точно то что раньше записали
end;


 
Reindeer Moss Eater   (2004-02-17 12:14) [6]

TWriter.WriteInteger
TWriter.WriteChar
TWriter.WriteBoolean
TWriter.WriteFloat
.........


 
Anton   (2004-02-17 12:39) [7]

//пишем
var f: TFilestream;
d: double;
begin
f:=TFileStream.Create(FileName,fmCreate);
f.Write(d,Sizeof(double));
f.Free;
//ух-ты, на диске появился файл с именем FileName
end;
НЕ КАНАЕТ! ОШИБКУ ВЫДАЁТ ГДЕ FILENAME!!!


 
Тимохов   (2004-02-17 12:41) [8]


> Anton (17.02.04 12:39) [7]

Ты издеваешься что-ли?
Finename - не объявленная здесь переменная, о потребности обяъвления которой, то, наверное, догадаешься сам.
Напиши вместо FineName просто "c:\MyFile"


 
Семен Сорокин   (2004-02-17 12:43) [9]

Anton (17.02.04 12:39) [7]
:)
FileName - твоя переменная


 
Reindeer Moss Eater   (2004-02-17 12:47) [10]

f:=TFileStream.Create("FileName",fmCreate);


 
Fay   (2004-02-17 13:06) [11]

Anton, поверь - тебе это не надо. Займись лучше каким-нибудь вем-дизайном.
Удачи.


 
olookin   (2004-02-17 14:37) [12]

Anton (17.02.04 12:39) [7]
НЕ КАНАЕТ! ОШИБКУ ВЫДАЁТ ГДЕ FILENAME!!!

Тут уже по этому поводу тебе написали. Напишу и я. Ты почти не отличаешься от некоего персонажа некоей книги... Этому персонажу (а его оправдывает два момента 1) возраст - около 2-х недель и 2) видовая принадлежность - птенец), так вот, этому персонажу люди были вынуждены давать жеваный шпинат. Ну маленький этот птенец был - поэтому приходилось жевать шпинат и давать ему такую пищу - так делают птицы-самки в природе. Ты, как я уже упомянул, слабо отличаешься от этого птенца. Поэтому (это мое приватное мнение) с такой психологией, с таким подходом к делу тебе вряд ли светит стать даже веб-дизайнером.

PS Либо же тебе 9 лет и ты впервые сел за компьютер - тогда все вышесказанное мною (и другими) неправомерно и я лично перед тобой извиняюсь.


 
Юрий Зотов   (2004-02-17 16:08) [13]

Ох, чего только не насоветовали. А самое простое-то и забыли.
AssignFile/Reset/Read/ReadLn/Rewrite/Write/WriteLn/CloseFile


 
Плохиш   (2004-02-17 16:24) [14]


> Юрий Зотов © (17.02.04 16:08) [13]

Дык, там тоже FileName используется ;-)


 
Anatoly Podgoretsky   (2004-02-17 16:28) [15]

Кто забрал FileName, верните в последний раз предупреждаю.


 
Digitman   (2004-02-17 16:48) [16]

"... Шпака не брал .. " (с) "Иван Васильевич ..."



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
14-94178
Alex Konshin
2004-02-07 01:06
2004.02.29
Настоящий капитан


1-93851
Budy
2004-02-16 14:25
2004.02.29
Реестр


9-93745
wild
2003-08-15 04:35
2004.02.29
Математика в азартных играх.


1-94020
Ron
2004-02-16 08:30
2004.02.29
DynamicSkinForm VCL


14-94112
Vuk
2004-02-09 16:48
2004.02.29
Нашел интересный сервис в сети.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский