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

Вниз

Файлы   Найти похожие ветки 

 
Goast   (2003-08-09 17:16) [0]

Люди добрые, помогите пожалуйста:как открыть НЕ текстовый фаил???...


 
Yanis   (2003-08-09 17:20) [1]

Чего?
ShellExecute ??? WinExec ??? или надо открыть в виде теста не тестовый файл, ничего не понял. Формулируй доходчиво.


 
Goast   (2003-08-09 17:29) [2]

:))) мда....калека я....
короче говоря спомщью assign\reset я открываю текстовый фаил и могу прочитать че в нем написанно а если я так же открываю другой фаил то получается ерунда какая-то так можно его открыть так что бы понять че в нем????(или я опять глупость несу??)


 
Anatoly Podgoretsky   (2003-08-09 17:56) [3]

Reset и для двоичных файлов


 
Goast   (2003-08-09 18:14) [4]

Спасибо конечно за ответь но я все равно не понел....немогли бы мне кто нибуть написать фрагмент кода....плз....:(


 
nikus   (2003-08-09 19:48) [5]

Есть три типа файлов: текстовые, типизированные, и нетипизированные. Определись сначала какой тип файла открывать собираишься...


 
Goast   (2003-08-09 20:24) [6]

ну например я хочу открыть фаил сохраненого персонажа из диаблы 2 что бы поменять значения (сила,ловкость и т.д) как это сделать скажите плз....(встает на колени..)


 
dataMaster   (2003-08-09 20:34) [7]

Если знаешь, где и что на что менять, то объявить переменную надо как file of byte, т.е. var f:file of byte. Затем Seek"ом находить нужные адреса и Write"ом прописывать новые значения. Вот и все.


 
Anatoly Podgoretsky   (2003-08-09 20:42) [8]

Значит речь идет о нетипизированных файлов, а для удобнее TFileStream, много проще и число нужных методов малое и изначально понятное Create/Read/Write/Seek/Free


 
Goast   (2003-08-09 20:50) [9]

конечно спасибо вам всем что отвечаете мне....но типа начинающий я и все равно до сих пор не очень представлю себе как это сделать....:(((


 
Мал0й   (2003-08-09 21:16) [10]

Тебе главное знать куда писАть! А далее подойдет как писали
var f:file;
Reset(f, 1);
и т.д.


 
Goast   (2003-08-09 21:16) [11]

если все же есть добрые люди то плз напишите мне код я буду очень признателен...


 
dataMaster   (2003-08-09 21:26) [12]

Вот набросал на скорую руку:

program prgmm;

uses
Windows,
SysUtils;

var
a, b : byte;
f ( f, "file.ext")
Вот набросал на скорую руку:

program prgmm;

uses
Windows,
SysUtils;

var
a, b : byte;
f : file of byte; // объявили файл

begin
a:=11; // какое-то значение - подставишь свое
b:=22; // какое-то значение - подставишь свое
AssignFile(f, "file.ext"); // вместо file.ext пишешь нужное имя
Reset(f); // открыли файл
Seek(f, $FF); // нашли нужное место (вместо $FF подставишь свое)
Write(f, a); // записали байт
Write(f, b); // записали байт
CloseFile(f); // закрыли файл
end.


Вот таким образом примерно будет выглядеть твоя программа.


 
Goast   (2003-08-09 21:35) [13]

dataMaster я тебя обожаю...;)


 
dataMaster   (2003-08-09 21:37) [14]

2Goast

Ну, разобрался, наконец? ;-)


 
Goast   (2003-08-09 21:44) [15]

угу все пучком...жди следующего вопроса...;)



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
1-81764
Berezne
2003-08-14 12:02
2003.08.25
Глюки при печати


3-81590
led
2003-07-29 18:35
2003.08.25
Поле Memo вывести на грид


8-81846
Василий Петрович
2003-04-15 09:28
2003.08.25
Как играть xm?


14-81873
Wonder
2003-08-07 16:01
2003.08.25
Я плакаль :) Долго :) Советую почитать :)


1-81793
Otter
2003-08-14 09:06
2003.08.25
Как отобразить изображение справа-налево??





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