Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];

Вниз

Что быстрее?   Найти похожие ветки 

 
Sego   (2002-11-13 15:30) [0]

Вот нашкрябал неопытной рукой
var
Form1: TForm1;
AA:string;
f: File;
Size:longInt;
Buffer:TMemoryStream;
E:byte;
.............
AssignFile(f, "su" );
reset(f,1);
Size:= FileSize(f);
closefile(f);

buffer:=TMemoryStream.Create;
buffer.SetSize(Size);
buffer.LoadFromFile("su");
while buffer.Position<=size-1 do begin
buffer.Read(e,sizeof(e));
AA:= inttohex(e,2);
.......................

На выходе получаем последовательности типа AA 02 03 AB 34 45 44 56....

последовательность большая, мне нужно выхватить из нее в определенных местах другие последовательности но уже меньшей длинны, их около 60-70, например 1-я последовательность сосотоит из АА22, вторая 03 , третья АВ344(!!!), как лучше всего это реализовать?
Есть предположение заганят после преобразования в НЕХ сразу в
элементы tstringlist, но вроде не очень быстро получается.. (потом эти последовательности по-другому правилу надо будет записать в файл):(
Может уважаемые мастера знают более быстрый способ?


 
F1   (2002-11-13 15:36) [1]

Не понял, зачем тебе IntToHex, с числами удобнее и быстрее, чем со строками.


 
Sego   (2002-11-13 15:41) [2]

2 F1
AA:= inttohex(e,2);
AA-это конечный результат, его надо записать с ним работы никакой не будет, просто надо сгрупировать из АА разные последовательности. Считываю по символу потому как ищу флаг-признак, с которого момента данные поддаются тому или другому принципу группировки, все.


 
Jeer   (2002-11-13 15:43) [3]

Разговор сам с собой..


 
F1   (2002-11-13 15:45) [4]

Короче, скажи что надо сделать впринципе, может ты вообще не тем путем пошел???


 
Sego   (2002-11-13 15:48) [5]

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


 
F1   (2002-11-13 16:25) [6]

Ну если ты себе задачу придумал, так попробуй ее сам и реши, а то получается ты не для себя задачу придумал, да еще и какую-то геморойную ;)


 
Sego   (2002-11-13 17:53) [7]

2 F1 © (13.11.02 16:25)
:)

вообще-то программа только подготовка к работе, которая содержит такой модуль обработки данных.
Вот хочу все модулями попробывать, потом сложить.

А вообщето я совет конкретный спросил, а нфига он мне -это не важно, важно , что это применительно к Делфи, а это форум по Делфи. (ИМХО).
Тобишь , вместо критики хотелось бы более конструктивные предложения увидеть, а потрепаться и в другом месте можна.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.008 c
7-83014
Slawik2000
2002-09-23 12:30
2002.11.25
Помогите найти исходник сетевого сканера!


4-83067
Semion
2002-10-12 08:27
2002.11.25
как всеже рисовать на предмете хендл которого есть


7-83024
Bishop
2002-09-26 11:05
2002.11.25
Как сделать документ Word Landscape?


14-82909
Axill
2002-11-02 18:24
2002.11.25
Подскажите хорошие книги


3-82648
h1ma
2002-11-06 06:25
2002.11.25
Как из бд вывести картинку в Image ?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский