Форум: "WinAPI";
Текущий архив: 2005.09.18;
Скачать: [xml.tar.bz2];
Вниз
Как дописать данные в конец текстового файла? Найти похожие ветки
← →
Shopot © (2005-07-28 11:33) [0]Использую CreateFile для открытия текстового файла.
Но старые данные стираются когда начинаю писать новые.
И вообще в текстовый файл записывается только одна строка.
Что делать?
← →
Leonid Troyanovsky © (2005-07-28 11:39) [1]
> Shopot © (28.07.05 11:33)
> Использую CreateFile для открытия текстового файла.
> Но старые данные стираются когда начинаю писать новые.
> И вообще в текстовый файл записывается только одна строка.
У тебя ошибка в 17 строке.
> Что делать?
Например, использовать TFileStream.
Or, use the predefined TextFile or Text type, RTFM.
--
Regards, LVT.
← →
alpet © (2005-07-28 11:46) [2]
AssignFile (t, "file.txt");
Append (t);
WriteLn (t, "string");
CloseFile (t);
← →
Floppy © (2005-07-28 11:46) [3]var F: TextFile;
....
AssignFile(F, "Your text file");
Append(F);
Writeln(F, "то, что хотим дописать");
Close(F);
← →
Floppy © (2005-07-28 11:47) [4]>alpet © (28.07.05 11:46) [2]
:((
← →
Shopot © (2005-07-28 11:48) [5]Я пишу на API.
AssignFile... и т. п. в школе проходил и прекрасно знаю,
как на паскале это делается.
← →
alpet © (2005-07-28 11:53) [6]
function WriteAdd (const s: string): Boolean;
var hFile:THandle;
nWrited: DWORD;
begin
result := false;
hFile := CreateFile ("c:\boot.ini", GENERIC_WRITE, 0, nil, OPEN_ALWAYS, 0, 0);
if (0 = hFile) then exit;
SetFilePosition (hFile, 0, nil, FILE_END);
WriteFile (hFile, PChar (s + #13#10), Length (s) + 2, nWrited, nil);
CloseHandle (hFile);
result := nWrited > 0;
end;
← →
alpet © (2005-07-28 11:54) [7]Shopot © (28.07.05 11:48) [5]
А Я пишу на API и еще читаю MSDN :)
← →
Leonid Troyanovsky © (2005-07-28 11:58) [8]
> Shopot © (28.07.05 11:48) [5]
> Я пишу на API.
Мазохист? ;)
System включается в любые exe.
--
Regards, LVT.
← →
alpet © (2005-07-28 12:01) [9]Leonid Troyanovsky © (28.07.05 11:58) [8]
Ну если unilink пользовать(правильно), то не обязательно, другое дело что это еще надо знать :)
← →
Shopot © (2005-07-28 12:02) [10]спасибо alpet!
← →
Leonid Troyanovsky © (2005-07-28 12:03) [11]
> alpet © (28.07.05 11:54) [7]
> Shopot © (28.07.05 11:48) [5]
>
> А Я пишу на API и еще читаю MSDN :)
Ню-ню.
If the function fails, the return value is INVALID_HANDLE_VALUE
а не 0 ;)
--
Regards, LVT
← →
Leonid Troyanovsky © (2005-07-28 12:03) [12]
> alpet © (28.07.05 11:54) [7]
> Shopot © (28.07.05 11:48) [5]
>
> А Я пишу на API и еще читаю MSDN :)
Ню-ню.
If the function fails, the return value is INVALID_HANDLE_VALUE
а не 0 ;)
--
Regards, LVT
← →
alpet © (2005-07-28 12:12) [13]Leonid Troyanovsky © (28.07.05 12:03) [12]
А кто сказал, что я читаю внимательно :))
← →
begin...end © (2005-07-28 13:09) [14]> alpet © (28.07.05 11:53) [6]
Осталось только выяснить, что такое SetFilePosition.
← →
alpet © (2005-07-28 13:10) [15]begin...end © (28.07.05 13:09) [14]
Вот-вот, к тому же прочитанное быстро забываю :(. Это на самом деле SetFilePointer.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2005.09.18;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.012 c
