#cpp
Формат файлов истории (HST-файлы)
Сначала идет заголовок базы

struct HistoryHeader
{
  int               version;            // версия базы
  char              copyright[64];      // копирайт
  char              symbol[12];         // инструмент
  int               period;             // период инструмента
  int               digits;             // число знаков после запятой в инструменте
  time_t            timesign;           // временной отпечаток создания базы
  time_t            last_sync;          // время последней синхронизации
  int               unused[13];         // для будущего использования
};
затем массив баров (выравнивание однобайтовое)

#pragma pack(push,1)
//---- Стандартное представление котировки в базе
struct RateInfo
{
  time_t            ctm;                // текущее время в секундах
  double            open;
  double            low;
  double            high;
  double            close;
  double            vol;
};
#pragma pack(pop)

#pas
begin
 hstfile:=tfilestream.Create('EURUSD1.hst',fmShareDenyNone);// можно сказать что открываем файл
 hstfile.Read(header,sizeof(header));// читаем заголовок
 hstfile.Read(Close1,sizeof(Close1));// читаем 256 элементов масисвва котировок

/// а это цил который рисует то что прочитали на форме, причем
//рисует по клосам, если напишешь так close1[i].open будет рисовать по опенам
// это вобщем и ответ на твой вопрос
 for i:=1 to 255 do 
	begin
	y1:= round(10000*close1[i-1].close)-14600;
	y2:= round(10000*close1[i].close)-14600  ;
		form1.Canvas.MoveTo(i-1,y1);
		form1.Canvas.lineTo(i,y2);
	end;
 hstfile.Free; // можно сказать что закрываем файл
end;