Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.11.2008, 15:29
Аватар для Тупой
Тупой Тупой вне форума
Прохожий
 
Регистрация: 03.11.2008
Сообщения: 22
Репутация: 10
Восклицание Alarm...Help!! Alarm!

Народ помогите плиз срочно
Правда у мя просьба по Паскалю, но они с Delphi похожи, может кто поможет.
Мне нужно создать программу по выводу на экран сведений из типизированного файла, в котором содержатся записи о марке авто и его стоимости. Плюс скроллинг на стрелочки по 1 записи или на PgUp/PgDown блоками по 10 записей.
Выглядеть должно примерно так:

Сведения об автомобилях
-----------------------------
|Марка авто|Цена(тыс. руб.|
-----------------------------
|Volksvagen|----6529-------|
|xxxxxxxxxxx|xxxxxxxxxxxxxxx|

И так далее.

Помогите плиз если кто шарит.
Ответить с цитированием
  #2  
Старый 14.11.2008, 17:46
FireBT FireBT вне форума
Прохожий
 
Регистрация: 14.11.2008
Сообщения: 2
Репутация: 10
По умолчанию

<Марка> <цена>
<Марка> <цена>

На делфи это может выглядеть так:
AssignFile(f,p);
Reset(f);
Repeat
Read(f,marka);
Read(f,cena);
until seek EOF;
Ответить с цитированием
  #3  
Старый 14.11.2008, 19:04
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,094
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Человек же написал - типизированный файл.
Тебе точно на стандартном паскале надо, а то там нет некоторых полезных вещей, как то динамические масивы, шаблоны списков и т.п...

Собственно, описание типа:
Код:
type
  // Тип записи
  PCarInfo = ^TCarInfo; // Указатель на запись
  TCarInfo = record
    Name : String[100];
    Price : Integer; // Цена в целых тыс. руб.
  end;

  // Тип файла
  TCarInFoFile = File Of TCarInfo;

Далее надо завести хранилище для записей файла.
Если дельфи, то просто используем динамический массив или список TList.
Если все-таки паскаль, то придется строить связанный список. В этом случае придется написать маленький прокси-объект, который внутри себя хранит нашу запись и ссылку на следующий и предыдущий объекты в цепочке. Почему на предыдущий - потому что тебе нужна навигация вперед-назад, а для этого придется воспользоваться двусвязанным списком.

Ну а далее уже придется разбираться с выводом в окне, чтением и записью файла, что не так и сложно.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 00:44.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025