IMHO.WS

IMHO.WS (http://www.imho.ws/index.php)
-   Программирование (http://www.imho.ws/forumdisplay.php?f=40)
-   -   Чтение бинарного файла (http://www.imho.ws/showthread.php?t=88218)

LAndrew2 28.06.2005 21:12

Чтение бинарного файла
 
имеется файл следующей структуры:

Цитата:

Header:

strFileHeader35 = ' some text is here';
OwnerName: string;
OwnerSite: string;
OwnerMail: string;
OwnerDescription: string;

Records:
Number: Integer;
Date: Integer;
Rating: Integer;
Year: Integer;
Length: Integer;
VideoBitrate: Integer;
AudioBitrate: Integer;
Disks: Integer;
Export: Boolean;
Media: string;
MediaType: string;
Source: string;
Borrower string;
OriginalTitle string;
TranslatedTitle string;
Director string;
Producer string;
Country string;
Category string;
Actors string;
URL string;
Description string;
Comments string;
VideoFormat string;
AudioFormat string;
Resolution string;
Framerate string;
Languages string;
Subtitles string;
Size string;
PictureName: string;
PictureSize: Integer;
Picture array of Byte;
необходимо прочитать из него весь список TranslatedTitle.

Трудность заключается в том, что это надо сделать на Pascal Script™ 3.0. Это как Delphi (использует его функции, переменные и т.п.). Но тип File не поддерживается.

Как быть? Может можно как-нить его прочитать с использование ReadFile? Или может быть можно взять исходник какого-нибудь файла из комплекта Delphi, который отвечает за чтение бинарного файла и прицепить (uses) его?

/7y3uK 28.06.2005 23:20

Цитата:

Innerfuse Pascal Script 3 _http://www.carlo-kok.com/ Тоже OpenSource и тоже распротраняется с исходниками. Компонента сделана для Delphi 7 но поставить ее в 6-ой не состаляет труда. Язык - паскаль. Не поддерживает в описании типов классы и указатели. Может замещать события(events) делфи, тобиш можно назначать onClick onNewRecord и т.п. Есть возможность загружать dll. Дизассемблировать программу. Также может компилировать скрипты и затем запускать их позже.
Так какие проблемы то? я из описания понял, что это в первую очередь компонент - а значит ты имеешь доступ к классам, что мешает в скрипте дернуть метод, который откроет тебе файло и вернет нужные данные обратно в скрипт?

вот неплохой кратенький обзорчик на кингдоме нашел кому интересно... _http://delphi.olympus.ru/dk/tower/c006.htm

ПыСы
по твоей спецификации я не нашел что-то рекорда... признавайся что за формат ломаешь :)

LAndrew2 28.06.2005 23:24

проблема в том, что мне нужно написать скрипт на этом Pascal Script для одной программы (Ant Movie Catalog).
Цитата:

/7y3uK:
мешает в скрипте дернуть метод, который откроет тебе файло и вернет нужные данные обратно в скрипт
что ты под этим имеешь в виду?

/7y3uK 28.06.2005 23:36

Тю... так бы сразу и сказал... это тебе надо доки смотреть на реализованные в этой программе АПИ... я кстати в яндехе нашел пару скриптов... да и народ пишет что в комплект входят скрипты - почитай код... На пример sharereactor - там явно передается в скрипт какой то дескриптор Address: String, и пр.пр.пр.... а потом там выцепляют информацию об авторе, тайтл и пр. - вобщем доки...

LAndrew2 29.06.2005 00:08

Цитата:

/7y3uK:
это тебе надо доки смотреть на реализованные в этой программе АПИ
если ты имеешь в виду доки Ant Movie Catalog - то там этого нет. Сам автор пишет, что это скорее всего не возможно. Но мне кажется, что выход должен быть :)
Цитата:

/7y3uK:
да и народ пишет что в комплект входят скрипты
да, скрипты входят и я даже штуки три-четыре из них написал :), но там ни в одном из них нет чтения бинарного файла

пока единственный выход который я вижу - через uses подцепить недостающие модули... в настоящий момент у меня к сожалению не установлена Delphi, потому не могу поковыряться в её файлах...

Willow 08.07.2005 22:34

Цитата:

LAndrew2:
да, скрипты входят и я даже штуки три-четыре из них написал :Smilie:, но там ни в одном из них нет чтения бинарного файла
Можно ли это утверждение воспринять как наличие процедур чтения(записи) текстовых файлов. Если можно то проблема решаема.

/7y3uK 08.07.2005 23:34

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


Часовой пояс GMT +4, время: 14:27.

Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.