Страница 2 из 4

Re: Работа с файлом

Добавлено: 06 апр 2008, 21:11
scudo
Работает. Ток на выводе закарючки.Как от них избавиться? Дело в ASCI?

Re: Работа с файлом

Добавлено: 06 апр 2008, 21:14
scudo
Ввел на англ.Все нормально

Re: Работа с файлом

Добавлено: 06 апр 2008, 21:22
scudo
Ввожу сотрудников черезз Ентер.При выполнении программы читается только 1 строчка.Как сделать чтоб он читал все?

Re: Работа с файлом

Добавлено: 06 апр 2008, 21:29
scudo
Можно конечно записать чтоб было все в одной строке.Ну над тогда подгонять чтоб было ровно :(

Re: Работа с файлом

Добавлено: 06 апр 2008, 23:08
MOTOCoder
&quot писал(а):Как сделать чтоб он читал все?
[syntax='Delphi']
while not eof(F) do
readln(F,S);
[/syntax]

Re: Работа с файлом

Добавлено: 07 апр 2008, 11:12
scudo
Спасиб! Ну а что по поводу кодировки можете посоветовать?

Re: Работа с файлом

Добавлено: 07 апр 2008, 11:31
Хыиуду
Записывать в той же кодировке, в которой работает компилятор. Если это Дельфи - ANSI. Если Паскаль - OEM. Взять текстовый редактор, который умеет работать с разными кодировками (Bred, Aditor и т.д).

Перенес тему в "Решите мне задачку"

Re: Работа с файлом

Добавлено: 07 апр 2008, 13:56
scudo
C Кодировкой разобрался

Re: Работа с файлом

Добавлено: 07 апр 2008, 17:18
scudo
Скажите люди любезные, как из текстового файла записать в двухмерный массив данные.Таким образом

*.Тхт
Иванов Директор
Петров Кассир


Масив
Иванов Директор
Петров Кассир

Изменить данные в массиве. К примеру

Масив
Гранатов Директор
Петров Уборщик

И потом записать все ето обратно в текстовый файл

Re: Работа с файлом

Добавлено: 07 апр 2008, 17:49
MOTOCoder
Лучше использовать не двумерный массив, а тип "Запись".
Ну, например, так:
[syntax='Delphi']
type
TEmploeye=record
name:string;
post:string;
end;

var
workers:array[1..N] of TEmploeye;

begin
.....
workers.Name:='Иванов';
workers.Post:='Директор';
end;
[/syntax]